【正文】 參考文獻(xiàn) 瑞新 . ASP 動(dòng)態(tài)網(wǎng)站開(kāi)發(fā) 畢業(yè)設(shè)計(jì)指導(dǎo)及實(shí)例 .北京北京：北京：北京：北京： 張思亮 ,王曉峰 , 靳瑞勇 . 網(wǎng)上購(gòu)物系統(tǒng)的研發(fā) [J].商場(chǎng)現(xiàn)代化 . 北京： 李順云 ,郭勁夫 ,楊月輝 .網(wǎng)上購(gòu)物系統(tǒng)的建設(shè) [J].商場(chǎng)現(xiàn)代化 . 北京： 陳巧蓉 , 陳剛 , 熊恩成 .網(wǎng)上購(gòu)物系統(tǒng) html 版開(kāi)發(fā)研究 [J].西南民族大學(xué)學(xué)報(bào)：自然科學(xué)版 .2020,33 4 :961963. 尹成國(guó) . 基于 PHP 的網(wǎng)上購(gòu)物系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn) [J]. 瓊州學(xué)院學(xué)報(bào) .2020,15 2 :3941. 衡友躍 . 基于 MVC 模式的網(wǎng)上購(gòu)物系統(tǒng)應(yīng)用研究 [J]. 淮北職業(yè)技 術(shù)學(xué)院學(xué)報(bào) .2020,7 1 :7779. 李友國(guó) , 姜明富 . 基于 Microsoft ASP 和 Access 數(shù)據(jù)庫(kù)的 MIS 網(wǎng)上購(gòu)物系統(tǒng) [J], 農(nóng)業(yè)網(wǎng)絡(luò)信息 .2020 4 :110113. 袁愛(ài)香 . 基于 MDA 的網(wǎng)上購(gòu)物系統(tǒng)代碼自動(dòng)生成開(kāi)發(fā)研究 [J]. 北京聯(lián)合大學(xué)學(xué)報(bào)：自然科學(xué)版 .2020,22 1 :4145. 廖彥華 , 羅小亮 . 基于 JSP 技術(shù)的網(wǎng)上購(gòu)物系統(tǒng) [J]. 電腦知識(shí)與技術(shù)：學(xué)術(shù)交流 .2020 12 :12761279. 李賢華 . 基于 JSP 技術(shù)的大型網(wǎng)上購(gòu)物系統(tǒng)的設(shè)計(jì)與實(shí) 現(xiàn) [J]. 計(jì)算機(jī)與現(xiàn)代化 .2020 8 :8284,89. 基于 Web 的網(wǎng)上購(gòu)物系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn) III 2 系 高職計(jì)算機(jī)系 ASP 實(shí)現(xiàn)訪問(wèn)界面 瀏覽器 瀏覽器 Inter 瀏覽器 瀏覽器 網(wǎng)上購(gòu)物系統(tǒng) 注冊(cè)會(huì)員 管理員 管理員審查 處理訂單 購(gòu)買(mǎi)商品 定單查詢(xún) 商品查詢(xún) 商品審查 發(fā)貨查詢(xún) 會(huì)員審查 。PWD password //連接數(shù)據(jù)庫(kù) SQL select*fromtablename SetRS SQL //執(zhí)行查詢(xún) DoWhile Not ％ RS fieldname ％ ％ Loop ％ 上述是用 ASP 訪問(wèn)數(shù)據(jù)庫(kù)的全過(guò)程，由于應(yīng)用面向?qū)ο笏枷?，所有操作都比較簡(jiǎn)單，用戶需要注意的僅是對(duì)數(shù)據(jù)結(jié)構(gòu) 的了解、當(dāng)前所操作的對(duì)象及對(duì)象的屬性等等，只要對(duì)這些有了清晰的認(rèn)識(shí)，再加上 ASP 強(qiáng)大功能，在網(wǎng)絡(luò)上使用數(shù)據(jù)庫(kù)，實(shí)現(xiàn)用戶與頁(yè)面間交換信息，就再也不是什么難事了。 關(guān)閉創(chuàng)建的數(shù)據(jù)對(duì)象： Record Set .close Set Record Set Nothing 關(guān)閉創(chuàng)建的鏈接對(duì)象： Connect. close Set Connect Nothing 完整的程序片段： SetConnect //產(chǎn)生組件實(shí)例 DSN dsnname。 如執(zhí)行插入操作： sqlStr Insert Into b1Values 1,2 sqlStr 關(guān)閉數(shù)據(jù)對(duì)象和鏈接 在使用了 ADO 對(duì)象之后，一定要關(guān)閉數(shù)據(jù)對(duì)象和鏈接。例如： sqlStr SELECT*FROM b1 Set RecordSet sqlStr 這條語(yǔ)句執(zhí)行后，對(duì)象 RecordSet 中就保存了 b1 中的所有記錄。 RecordSet 是 ADO 中最復(fù)雜的對(duì)象，有許多屬性和方法，靈活運(yùn)用，可以達(dá)到許多好的效果。 dsnname 為數(shù)據(jù)源名； userID 為用戶名； password 為用戶口令。利用 ADODB 的成員函數(shù) Open 和先前設(shè)定的 DSN 與數(shù)據(jù)庫(kù)連接，其語(yǔ)法如下： SetConnect //創(chuàng)建了鏈接對(duì)象Connect。打開(kāi) Windows的 控制面板 ，雙擊 ODBC的圖標(biāo)，然后選擇 文件 DSN 的屬性頁(yè)，單擊 ，選擇數(shù)據(jù)庫(kù)驅(qū)動(dòng)程序，然后單擊 下一步 ，按照屏幕的指示鍵入數(shù)據(jù)源文件的名稱(chēng)，然后單擊“下一步 ，再單擊 完成 創(chuàng)建數(shù)據(jù)源。這兩個(gè)問(wèn)題貫穿了整個(gè)軟件系統(tǒng)的開(kāi)發(fā)過(guò)程，這也就是數(shù)據(jù)庫(kù)的設(shè)計(jì)問(wèn)題，軟件設(shè)計(jì)的一個(gè)核心?，F(xiàn)實(shí)世界的事物反映到人的頭腦中，人的大腦對(duì)它有個(gè)認(rèn)識(shí)過(guò)程，經(jīng)過(guò)分析（選擇、命名、分類(lèi)等）進(jìn)入信息世界。查找數(shù)據(jù)庫(kù)，檢查此管理員是否已經(jīng)存在 if 1 then if rs UserName uid then ?msg 此管理員帳號(hào)已經(jīng)存在，請(qǐng)選用其它名稱(chēng) ! end if end if set rs sqltext select * from Manage_User sqltext,conn,3,3 39。 39。 amp。 39。 amp。 contentID sqltext,conn,3,3 set rs nothing ?page amp。 id sqltext,conn,1,1 2 會(huì)員的刪除： 與訂單的刪除類(lèi)似，我也定義了一個(gè) java 腳本 來(lái) 調(diào) 用 頁(yè) 面（ ）來(lái)實(shí)現(xiàn)刪除操作： script language javascript function confirmdel id,page if confirm 真的要?jiǎng)h除這個(gè)用戶 ? wi ?id +id+amp。CurrentPage % 4． 2． 4 會(huì)員的審查 會(huì)員審查的頁(yè)面： 圖 會(huì)員審查 會(huì)員的審查實(shí)現(xiàn)了兩個(gè)功能：會(huì)員資料的查看和會(huì)員帳號(hào)的刪除。 contentID sqltext,conn,3,3 set rs nothing set rs sqltext delete from ShopList where Form_Id amp。 request Form_Id sqltext,conn,3,3 ?msg 訂貨單處理處理完畢，請(qǐng)按客戶詳細(xì)地址發(fā)貨！ end if 2 刪除訂單： 在這里，我使用了一個(gè) java 腳本，定義了刪除函數(shù)： script language javascript function confirmdel id,page if confirm 真的要?jiǎng)h除這個(gè)訂單 ? wi ?id +id+amp。39。amp。 1 處理訂單： set rs sqltext select Flag from OrderList where Form_Id amp。 contentID sqltext,conn,3,3 set rs nothing ?page amp。 set rs sqltext select * from Product where Product_no amp。 還沒(méi)任何商品資料 End if 商品審查包括對(duì)商品的編輯和對(duì)商品的刪除操作。 font color 39。假如沒(méi)有數(shù)據(jù)時(shí) If and then call showpages p align 39。 39。amp。 sqltext,conn,1,1 查找數(shù)據(jù)庫(kù)，檢查商品是否已經(jīng)存在 if 1 then if rs Product_name p_name then ?msg 此商品已經(jīng)存在，請(qǐng)?zhí)砑悠渌唐?! end if end if set rs sqltext select * from Product sqltext,conn,3,3 39。 p_name amp。 set rs sqltext select * from Product where Product_name 39。 if j 1 //說(shuō)明有字符不是數(shù)字 return 0。i 。 strTemp 0123456789.。 39。 amp。 39。 amp。 39。 amp。查找數(shù)據(jù)庫(kù)，檢查商品小類(lèi)是否已經(jīng)存在 if 1 then if rs Class_2_name class_2_name then ?msg 此商品小類(lèi)已經(jīng)存在，請(qǐng)選用其它名稱(chēng) ! end if end if set rs sqltext select * from Class_2 sqltext,conn,3,3 39。 39。 amp。 39。 amp。 return false。 sqltext2,conn,1,1 % 2 小類(lèi)添加 function FORM1_onsubmit if docus_2_th 1 alert 您必須輸入商品小類(lèi)名稱(chēng) ! 。 class_name amp。查找數(shù)據(jù)庫(kù)，檢查商品大類(lèi)是否已經(jīng)存在 if 1 then if rs Class_1_name class_name then ?msg 此商品大類(lèi)已經(jīng)存在，請(qǐng)選用其它名稱(chēng) ! end if end if set rs