📄 inc_zhuce.asp
字号:
<!--#include file="conn.asp"-->
<%
user_name=request.Form("user_name")
user_pwd=request.Form("user_pwd")
tmp_pwd=request.Form("tmp_pwd")
sex=request.Form("sex")
user_email=request.Form("user_email")
if user_name="" then
%>
<script language="javascript">
msgstr("您没有输入用户名!","zhuce.asp");
</script>
<%
elseif user_pwd="" then
%>
<script language="javascript">
msgstr("您没有输入密码!","zhuce.asp");
</script>
<%
elseif user_pwd<>tmp_pwd then
%>
<script language="javascript">
msgstr("您两次输入密码不一致!","zhuce.asp");
</script>
<%
elseif user_email="" or instr(user_email,"@")=false or instr(user_email,".")=false then
%>
<script language="javascript">
msgstr("请正确输入您的EMAIL地址!","zhuce.asp");
</script>
<%
else
sql="select user_name from user_data where user_name='"&user_name&"'"
set rs=conn_str(sql)
if rs.eof and rs.bof then
sql="insert into user_data(user_name,user_pwd,user_sex,user_email) values('"&user_name&"','"&user_pwd&"','"&sex&"','"&user_email&"')"
objconn.execute sql
response.Cookies("user_name")=user_name
close_str(rs)
%>
<script language="javascript">
msgstr("恭喜,注册成功!","index.asp");
</script>
<%
else
%>
<script language="javascript">
msgstr("对不起,此用户名已被占用!","zhuce.asp");
</script>
<%end if
end if
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -