版權(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ì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 二零二五版模具生產(chǎn)質(zhì)量控制合同4篇
- 2025年偵探領(lǐng)英和解合同
- 二零二五版美容院線(xiàn)上線(xiàn)下?tīng)I(yíng)銷(xiāo)推廣合同4篇
- 二零二五年度面粉產(chǎn)品食品安全認(rèn)證服務(wù)合同4篇
- 2025年定制旅行合同
- 2025年代理商品授權(quán)合同
- 2025年度個(gè)人委托代繳工傷保險(xiǎn)合同范本4篇
- 2025年度影視劇組演員聘用合同模板4篇
- 2025年度派遣人力資源管理顧問(wèn)全面支持合同4篇
- 2025年度醫(yī)療廢物處理服務(wù)外包合同書(shū)4篇
- 電纜擠塑操作手冊(cè)
- 浙江寧波鄞州區(qū)市級(jí)名校2025屆中考生物全真模擬試卷含解析
- 2024-2025學(xué)年廣東省深圳市南山區(qū)監(jiān)測(cè)數(shù)學(xué)三年級(jí)第一學(xué)期期末學(xué)業(yè)水平測(cè)試試題含解析
- IATF16949基礎(chǔ)知識(shí)培訓(xùn)教材
- 【MOOC】大學(xué)生創(chuàng)新創(chuàng)業(yè)知能訓(xùn)練與指導(dǎo)-西北農(nóng)林科技大學(xué) 中國(guó)大學(xué)慕課MOOC答案
- 勞務(wù)派遣公司員工考核方案
- 基礎(chǔ)生態(tài)學(xué)-7種內(nèi)種間關(guān)系
- 2024年光伏農(nóng)田出租合同范本
- 《阻燃材料與技術(shù)》課件 第3講 阻燃基本理論
- 2024-2030年中國(guó)黃鱔市市場(chǎng)供需現(xiàn)狀與營(yíng)銷(xiāo)渠道分析報(bào)告
- 新人教版九年級(jí)化學(xué)第三單元復(fù)習(xí)課件
評(píng)論
0/150
提交評(píng)論