?? comreg.asp
字號:
<!--#include file="../dbconn.asp"-->
<%
sql="select username from company where username='" & Request("user_name") & "'"
set Rs=conn.Execute(sql)
%>
<html>
<head>
<link rel="stylesheet" type="text/css" href="../css/cdol.css">
<META content="Microsoft FrontPage 4.0" name=GENERATOR>
<title>注冊結果</title>
</head>
<body bgcolor="#E6E5B8">
現(xiàn)在位置：<a href="index.asp">首頁</a>—<a href="postcom.htm">會員注冊</a>--注冊結果
<p> </p>
<p> </p>
<p align="center">
<%If not Rs.Eof Then
Response.Write "<center>您的用戶名已經(jīng)有人使用,請使用其他名稱注冊!<p>"
Response.Write "<center><a href='postcom.htm'> 請重新登陸好嗎？ </a>"
else
%>
<%
login=trim(Request.Form("user_name"))
passwd=trim(Request.Form("user_pass_1"))
name=trim(Request.Form("company_name"))
owner=trim(Request.Form("company_owner"))
cclass=trim(Request.Form("company_class"))
address=trim(Request.Form("company_address"))
zipcode=trim(Request.Form("zipcode"))
email=trim(Request.Form("company_email"))
tel=trim(Request.Form("tel"))
fax=trim(Request.Form("fax"))
web=trim(Request.Form("web_site"))
info=trim(Request.Form("company_info"))
sz = "'" & login & "', '"&passwd & "', '"& name & "','"& owner & "','"& cclass & "','"& address & "', '"& zipcode & "','"& email & "','"& tel & "','"& fax & "','"& web & "' ,'"& info & "'"
sql1 = "insert company (username,pwd,name,owner,class,address,zipcode,email,tel,fax,web,info) values (" & sz & ")"
conn.Execute(sql1)
conn.Close
set conn=nothing
Response.Write "<center>您已經(jīng)注冊成功!<p>"
Response.Write "<center><a href='viewcom.asp'> 查看結果 </a>"
end if%>
</p>
</body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -