?? adduserchick.asp
字號:
<!--#include file="conn.asp"-->
<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from userlogin"
rs.open sql,conn,1,3
%>
<%
dim user,psw,psw1,kaohao
kaohao=request.form("kaohao")
user=request.form("kaohao")
psw=request.form("psw")
psw1=request.form("psw1")
if kaohao="" or user="" or psw="" or psw1="" then
response.Write("<script>alert('添加信息填寫不完整,請重新填寫');window.location.href('adduser.asp')</script>")
response.end
end if
if psw<>psw1 then
response.Write("<script>alert('兩次密碼輸入不一樣');window.location.href('adduser.asp')</script>")
response.end
end if
%>
<%
set rs1=server.createobject("adodb.recordset")
cmd="select * from userlogin where kaohao='"&kaohao&"'"
rs1.open cmd,conn,1,1
if not rs1.eof then
response.Write("<script>alert('已經存在該考生');window.location.href('adduser.asp')</script>")
response.end
end if
rs.addnew
rs("user")=user
rs("passwd")=psw
rs("kaohao")=kaohao
rs.update
response.Write("<script>alert('添加用戶成功');window.location.href('adduser.asp')</script>")
%>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -