user_zj.asp

来自「吻宇考试管理系统源码 吻宇考试管理系统源码」· ASP 代码 · 共 38 行

<!--#include file="conn.asp"-->
<%
dim rs,sql,rs1,sql1
dim zkz,namer,pass,class1,school,jianjie
zkz=request.form("考生的准考证号")
namer=request.form("考生的真实姓名")
pass=request.form("考生登陆的密码")
class1=request.form("考生所在的班级")
school=request.form("school")
jianjie=request.form("考生的自身简介")
set rs1=server.createobject("adodb.recordset")
sql1="select * from user where zkz='"&zkz&"'"
rs1.open sql1,conn,1,1
if rs1.eof then
set rs=server.CreateObject("adodb.recordset")
sql="select * from user"
rs.open sql,conn,2,3
rs.addnew
rs("zkz")=zkz
rs("name")=namer
rs("password")=pass
rs("class")=class1
rs("school")=school
rs("jianjie")=jianjie
rs("kt")="unlock"
rs.update
rs.close
set rs=nothing

response.write"恭喜你注册增加成功~!<a href='javascript:history.go(-1)'>返回</a>"
else
response.write"该考生的资料已经存在！不能重复使用同一个准考证号！请<a href='javascript:history.go(-1)'>返回</a>"
end if
rs1.close
set rs1=nothing
set conn=nothing
%>