ASP用戶登錄注冊(cè)代碼

1、ASP用戶登錄注冊(cè)代碼1，（index.asp 用戶登陸頁(yè)面）會(huì)員會(huì)員注冊(cè)系統(tǒng)用戶名:密 碼:注冊(cè)2，（login.asp 用戶數(shù)據(jù)處理文件）3，（change.asp 用戶信息修改頁(yè)面）修改用戶名：input name=username type=text id=username value=*密 碼：input name=password type=text id=password value=*性 別：input name=sex type=text id=sex value=QQ：input name=qq type=text id=qq value=Mail：input name=m

2、ail type=text id=mail value=地 址：input name=add type=text id=add value=介紹 退出系統(tǒng)4，（reg.asp 新用戶注冊(cè)頁(yè)面）用戶注冊(cè)用戶注冊(cè)用戶名：*密碼：*確定密碼：*性別：QQ：Mail：地址：個(gè)人介紹 5，（addnewdata.asp 新用戶注冊(cè)數(shù)據(jù)處理文件）成功%ac=request.QueryString(ac)msg=注冊(cè)錯(cuò)誤信息if request.Form(username)= thenmsg=msg&用戶名不能為空end ifif strcomp(cstr(request.Form(password),cs

3、tr(request.Form(password2)0 thenmsg=msg&兩次密碼輸入不同end ifif len(request.Form(password)6 thenmsg=msg&密碼太簡(jiǎn)單end ifif strcomp(msg,注冊(cè)錯(cuò)誤信息)0 thenresponse.Redirect(reg.asp?msg=&msg)end ifif ac=adduser thenset rsc=server.createobject(adodb.recordset)sql=select * from info where username=&request.Form(username)

4、&rsc.open sql,conn,1,1ck=rsc(username)set rsc=nothingif ck thenmsg=msg&用戶名被人注冊(cè)response.Redirect(reg.asp?msg=&msg)end ifdsql=select * from info where id is nullset rs=server.createobject(adodb.recordset)rs.open dsql,conn,1,3rs.addnewrs(username)=request.Form(username)rs(password)=request.Form(password)rs(mail)=request.Form(mail)rs(sex)=request.Form(sex)rs(qq)=request.Form(qq)rs(add)=request.Form(add)rs(personalinfo)=request.Form(personalinfo)rs(ntime)=nowrs.updateset rs=nothing%注冊(cè)成功,點(diǎn)擊登陸6，（conn.asp 數(shù)據(jù)庫(kù)連接文件）7，（userinfo.mdb ACCESS 數(shù)據(jù)庫(kù)）在ACCESS中建一個(gè)表，然后在這個(gè)表中建立字段名稱表名：info字段名稱 數(shù)據(jù)類型i