注冊(cè)登錄系統(tǒng)課件_第1頁(yè)
注冊(cè)登錄系統(tǒng)課件_第2頁(yè)
注冊(cè)登錄系統(tǒng)課件_第3頁(yè)
注冊(cè)登錄系統(tǒng)課件_第4頁(yè)
注冊(cè)登錄系統(tǒng)課件_第5頁(yè)
已閱讀5頁(yè),還剩9頁(yè)未讀, 繼續(xù)免費(fèi)閱讀

下載本文檔

版權(quán)說(shuō)明:本文檔由用戶(hù)提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)

文檔簡(jiǎn)介

第6講ASP制作注冊(cè)登錄系統(tǒng)注冊(cè)登錄系統(tǒng)的實(shí)現(xiàn)建立站點(diǎn)

E:/注冊(cè)登錄系統(tǒng)二配置IIS三在站點(diǎn)下創(chuàng)建數(shù)據(jù)庫(kù)

數(shù)據(jù)庫(kù)名稱(chēng)為s1,“使用設(shè)計(jì)器創(chuàng)建表”,填寫(xiě)相應(yīng)的字段,具體如下表所示:數(shù)據(jù)表名稱(chēng)為“users”。字段名稱(chēng)數(shù)據(jù)類(lèi)型字段大小user文本20pwd文本20三打開(kāi)Dreamweaver,新建站點(diǎn)

四創(chuàng)建用戶(hù)登錄頁(yè)面index.asp1在站點(diǎn)下新建一動(dòng)態(tài)網(wǎng)頁(yè),并將其保存為index.asp2在該網(wǎng)頁(yè)中插入一表單,先插入表單,在表單中添加2個(gè)文本框和2個(gè)按鈕(提交和重置),文本框的名稱(chēng)分別為name、word(類(lèi)型為密碼).名稱(chēng):name名稱(chēng):Word,類(lèi)型:密碼3在表單的屬性面板中將動(dòng)作設(shè)置為find.asp:注意:find.asp網(wǎng)頁(yè)為用戶(hù)登錄信息處理頁(yè)面五創(chuàng)建用戶(hù)注冊(cè)頁(yè)面login.asp1在站點(diǎn)下新建一動(dòng)態(tài)網(wǎng)頁(yè),并將其保存為login.asp2在該網(wǎng)頁(yè)中插入一表單,先插入表單,在表單中添加3個(gè)文本框和2個(gè)按鈕(提交和重置),文本框的名稱(chēng)分別為user、pwd

(類(lèi)型為密碼)

、pwd1(類(lèi)型為密碼).名稱(chēng):user名稱(chēng):pwd,類(lèi)型:密碼名稱(chēng):pwd1,類(lèi)型:密碼3在表單的屬性面板中將動(dòng)作設(shè)置為main.asp:注意:main.asp網(wǎng)頁(yè)為用戶(hù)注冊(cè)信息處理頁(yè)面六創(chuàng)建用戶(hù)注冊(cè)信息處理頁(yè)面main.asp功能1判斷用戶(hù)名或密碼是否為空;2判斷用戶(hù)名是否已經(jīng)被注冊(cè)(數(shù)據(jù)檢索);3判斷兩次輸入的密碼是否一致;4判斷密碼的長(zhǎng)度是否大于等于6位;5若符合注冊(cè)條件,則將注冊(cè)信息寫(xiě)入s1數(shù)據(jù)庫(kù)中。main.asp代碼

<body><%Setcn1=Server.CreateObject("ADODB.Connection")cn1.Open"Driver={MicrosoftAccessDriver(*.mdb)};Dbq="&Server.Mappath("s1.mdb")a1=trim(Request.form("user"))a2=trim(Request.form("pwd"))a3=trim(Request.form("pwd1"))Setcm=Server.CreateObject("ADODB.Recordset")cm.Open"select*fromuserswhereuser='"&a1&"'","Driver={MicrosoftAccessDriver(*.mdb)};Dbq="&Server.Mappath("s1.mdb") ifnot(cm.eof)then

response.Write("此用戶(hù)名已被注冊(cè),請(qǐng)重新選擇")

response.Write"<palign=center><ahref=login.asp>點(diǎn)擊返回</a></p>"

cm.closesetcm=nothing

response.Endendif

ifa1=""ora2=""ora3=""then

response.Write("用戶(hù)名或密碼不能為空")

response.Write"<palign=center><ahref=login.asp>點(diǎn)擊返回</a></p>"elseifa2<>a3then

response.Write("兩次密碼不匹配,請(qǐng)重試")

response.Write"<palign=center><ahref=login.asp>點(diǎn)擊返回</a></p>"elseif

len(request.Form("pwd"))<6then

response.Write("密碼太簡(jiǎn)單,請(qǐng)輸入至少6位的密碼")

response.Write"<palign=center><ahref=login.asp>點(diǎn)擊返回</a></p>"elsecn2="'"&a1&"','"&a2&"'" cn1.execute("Insertintousers(user,pwd)values("&cn2&")")cn1.closeresponse.Write("注冊(cè)成功,感謝您的支持")response.Write"<palign=center><ahref=index.asp>點(diǎn)擊登陸</a></p>"endif%></body></html>七創(chuàng)建用戶(hù)登錄信息處理頁(yè)面find.asp功能1判斷用戶(hù)名或密碼是否為空;2查詢(xún)記錄,判斷用戶(hù)名是否存在3查詢(xún)記錄,判斷用戶(hù)名與密碼是否匹配代碼

<html><head><title>登陸處理頁(yè)面</title></head><body><%n1=trim(Request.form("name"))n2=trim(Request.form("word"))ifn1=""orn2=""then

response.Write("用戶(hù)名或密碼不能為空")

response.Write"<palign=center><ahref=index.asp>點(diǎn)擊返回</a></p>"

response.EndendifSetcn=Server.CreateObject("ADODB.Recordset")cn.Open"select*fromuserswhereuser='"&n1&"'andpwd='"&n2&"'","Driver={MicrosoftAccessDriver(*.mdb)};Dbq="&Server.Mappath("s1.mdb") ifcn.eofthen

response.Write("用戶(hù)名不存在或用戶(hù)名與密碼不匹配")

response.Write"<palign=center><ahref=in

溫馨提示

  • 1. 本站所有資源如無(wú)特殊說(shuō)明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶(hù)所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒(méi)有圖紙預(yù)覽就沒(méi)有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫(kù)網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶(hù)上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶(hù)上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶(hù)因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。

最新文檔

評(píng)論

0/150

提交評(píng)論