📄 reg_user_ok.asp
字号:
<%@ language="vbscript"%>
<%response.Expires = 0%>
<!--#include file="conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
sqltext="select * from RegUser where UserId='" & request.form("uid") & "'"
rs.open sqltext,conn,1,1
'查找数据库，检查用户名是否已经注册过
if rs.recordcount >= 1 then
if rs("userid")=request.form("uid") then
Response.Redirect "messagebox.asp?msg=此用户名已经注册过，请选用其他用户名!"
response.end
rs.close
end if
end if
set rs=server.createobject("adodb.recordset")
sqltext="select * from RegUser"
rs.open sqltext,conn,3,3
'添加一个用户到数据库
rs.addnew
rs("UserId")=request.form("uid")
rs("PassWD")=request.form("pwd")
rs("WtPass")=request.form("question")
rs("DaPass")=request.form("answer")
rs("Name")=request.form("Name")
rs("Sex")=request.form("Sex")
rs("Email")=request.form("Email")
rs("Phone")=request.form("usephone")
rs("Address")=request.form("haddr")
rs("Zip")=request.form("postcode")
rs.update
%>
<%
set rs_detail=server.createobject("adodb.recordset")
sqltext2="select * from RegUser where UserId='" & request.form("uid") & "'"
rs_detail.open sqltext2,conn,1,1
%>
<head>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<STYLE type=text/css>.main {
FONT-SIZE: 12px
}
.main1 {
FONT-SIZE: 14px
}
.main2 {
FONT-SIZE: 16px
}
.main3 {
FONT-SIZE: 7px
}
.main4 {
FONT-SIZE: 10px
}
A:link {
COLOR: #000000; TEXT-DECORATION: none
}
A:visited {
COLOR: #000000; TEXT-DECORATION: none
}
A:active {
COLOR: #ff0000; TEXT-DECORATION: none
}
A:hover {
COLOR: #aa0000; TEXT-DECORATION: underline
}
</STYLE>
<META content="Microsoft FrontPage 4.0" name=GENERATOR></HEAD>
<BODY bgColor=#ffffff>
<DIV align=center>
<TABLE cellSpacing=0 cellPadding=0 width=750>
<TBODY>
<TR>
<TD height=62>
<DIV align=center><BR>
<TABLE class=main cellSpacing=1 cellPadding=2 width=602 bgColor=#416327 height="280">
<TBODY>
<TR>
<TD class=main2 bgColor=#6d8e4d colSpan=2 width="592" height="18">
<p align="center"><FONT
color=#ffffff><B>您的注册信息</B></FONT></p>
</TD></TR>
<TR>
<TD width=129 bgColor=#ffffff align="right" height="25">您的会员帐号： </TD>
<TD bgColor=#ffffff width="455" height="25"><%=rs_detail("userid")%> </TD></TR>
<TR>
<TD width=129 bgColor=#ffffff align="right" height="25">您的姓名：</TD>
<TD bgColor=#ffffff width="455" height="25"><%=rs_detail("name")%> </TD></TR>
<TR>
<TD width=129 bgColor=#ffffff align="right" height="25"><FONT color=#000000>性别：</FONT></TD>
<TD bgColor=#ffffff width="455" height="25"><%=rs_detail("sex")%> </TD></TR>
<TR>
<TD width=129 bgColor=#ffffff align="right" height="26">密码：</TD>
<TD bgColor=#ffffff width="455" height="26">（保密）</TD></TR>
<TR>
<TD width=129 bgColor=#ffffff align="right" height="26">密码提问：</TD>
<TD bgColor=#ffffff width="455" height="26"><%=rs_detail("wtpass")%> </TD></TR>
<TR>
<TD width=129 bgColor=#ffffff align="right" height="26">密码答案：</TD>
<TD bgColor=#ffffff width="455" height="26"><%=rs_detail("dapass")%> </TD></TR>
<TR>
<TD width=129 bgColor=#ffffff align="right" height="26">E-MAIL：</TD>
<TD bgColor=#ffffff width="455" height="26"><%=rs_detail("email")%> </TD></TR>
<TR>
<TD width=129 bgColor=#ffffff align="right" height="26">常用电话：</TD>
<TD bgColor=#ffffff width="455" height="26"><%=rs_detail("phone")%> </TD></TR>
<TR>
<TD width=129 bgColor=#ffffff align="right" height="26">收货地址：</TD>
<TD bgColor=#ffffff width="455" height="26"><%=rs_detail("address")%>
</TD></TR>
<TR>
<TD width=129 bgColor=#ffffff align="right" height="26">邮编：</TD>
<TD bgColor=#ffffff width="455" height="26"><%=rs_detail("zip")%>
</TD></TR>
</TBODY></TABLE>
<BR> <input type="button" value="进入商城" name="B4" onclick="window.location.href='default.asp';">
</DIV></TD></TR></TBODY></TABLE>
</DIV></BODY>
<%
rs.close
rs_detail.close
conn.close
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -