reg1.asp

来自「实验室设备管理系统目标：通过对多种一维条码的编码进行分析和算法设计在系统中能实现」· ASP 代码 · 共 46 行

<!--#include file="conn.asp"-->
<%
	dim rs,sql
	dim title
	dim content
	dim sbbh,sbmc
	dim classid,Nclassid
	dim Nkey
	dim price
	dim images
	dim state
	dim errmsg
	dim recommend
	dim founderr
	founderr=false

if trim(request.form("name"))="" then
  		founderr=true
  		errmsg=errmsg+"<li>用户名称不能为空</li>"
	end if

	if trim(request.form("pass"))="" then
  		founderr=true
  		errmsg=errmsg+"<li>用户密码不能为空</li>"
	end if	
	if trim(request.form("bj"))="" then
  		founderr=true
  		errmsg=errmsg+"<li>班级不能为空</li>"
	end if
	
	set rs=server.createobject("adodb.recordset")
	
	sql="select * from userinfor" 
	rs.open sql,conn,1,3

	rs.addnew
	rs("name")=trim(request.form("name"))
	rs("pass")=trim(request.form("pass"))
						rs("bj")=trim(request.form("bj"))
	rs.update
	response.write"恭喜！注册成功！"
	rs.close
	set rs=nothing
	conn.close
	set conn=nothing
%>