源代码使用方法？？？

来源：百度知道 编辑：UC知道 时间：2024/06/14 16:50:42
add_user.asp原代码
<!--#include file="..\conn1.asp"-->
<%
xuehao=request.form("xuehao")
passwd1=request.form("passwd1")
passwd2=request.form("passwd2")
name=request.form("name")
year1=request.form("year1")
month1=request.form("month1")
day1=request.form("day1")
year2=request.form("year2")
mail=request.form("mail")
area=request.form("area")
tell=request.form("tell")
phone=request.form("phone")
address=request.form("address")
set rs1=server.CreateObject("adodb.recordset")
sqlstr1="select * from stunum where xuehao2='"&xuehao&"'"
rs1.open sqlstr1,conn,1,3
set rs=server.CreateObject("adodb.recordset")
sqlstr="select * from person where xuehao='"&xuehao&"'"
rs.open

这是添加代码
xuehao=request.form("xuehao") 获取上一个页面表单信息

set rs1=server.CreateObject("adodb.recordset")
sqlstr1="select * from stunum where xuehao2='"&xuehao&"'"
rs1.open sqlstr1,conn,1,3
set rs=server.CreateObject("adodb.recordset")
sqlstr="select * from person where xuehao='"&xuehao&"'"
rs.open sqlstr,conn,1,3
if rs.eof and not rs1.eof and passwd1=passwd2 then 这一段是检查是否已经存在了

exec="insert into person(name,xuehao,passwd1,passwd2,year1,year2,month1,day1,mail,area,tell,phone,address)values('"+name+"',
'"+xuehao+"','"+passwd1+"','"+passwd2+"','"+year1+"','"+year2+"','"+month1+"','"+day1+"','"+mail+"','"+area+"','"+tell+"','"+phone+&q