基于bs的信息化企業(yè)網(wǎng)絡(luò)組建畢業(yè)設(shè)計(jì)

1、<p><b>　　摘要</b></p><p>　　隨著Internet的不斷普及，人們對(duì)于互聯(lián)網(wǎng)技術(shù)的要求已不單單是瀏覽一下網(wǎng)頁(yè)，收發(fā)電子郵件，日益忙碌的人們開始追求足不出戶的利用互聯(lián)網(wǎng)這一強(qiáng)大的平臺(tái)來(lái)實(shí)現(xiàn)的網(wǎng)上購(gòu)物。對(duì)于企業(yè)來(lái)講，無(wú)論是企業(yè)之間(A to B),還是企業(yè)和客戶之間(A to C)的交易，如果能夠?qū)崿F(xiàn)網(wǎng)上交易將大大提高交易速度節(jié)約交易成本。近幾年，隨著網(wǎng)絡(luò)數(shù)據(jù)庫(kù)

2、技術(shù)的進(jìn)一步發(fā)展，使得這一設(shè)想逐漸成為現(xiàn)實(shí)。</p><p>　　運(yùn)用ASP技術(shù)和網(wǎng)絡(luò)數(shù)據(jù)庫(kù)原理，基于B/S模式我開發(fā)了一個(gè)網(wǎng)上購(gòu)物系統(tǒng)。在我的系統(tǒng)中，顧客可以很方便的注冊(cè)成為會(huì)員，對(duì)商品進(jìn)行瀏覽檢索，查看商品的詳細(xì)資料，然后根據(jù)各人的喜好購(gòu)買心儀的商品。系統(tǒng)會(huì)自動(dòng)為顧客生成訂單，按照顧客所填寫的信息提交訂單并發(fā)貨。系統(tǒng)管理員則可以對(duì)現(xiàn)有的商品進(jìn)行添加和編輯，審查已注冊(cè)的用戶并對(duì)提交的訂單進(jìn)行處理。</p&

3、gt;<p>　　關(guān)鍵詞: B/S結(jié)構(gòu)，Access 數(shù)據(jù)庫(kù)，ASP技術(shù)</p><p><b>　　Abstract</b></p><p>　　With the continuous development and popularization of the Internet, Internet technology is not just br

4、owse the news pages, e-mail, life stress more and more people began to enjoy the use of the Internet a powerful platform to achieve cheaper and affordable online shopping. For businesses in terms of whether it is between

5、 businesses (the A to B), or (A to C) transactions between merchants and customers, if we can achieve that online trading will save a lot of costs to get a win-win. In recent yea</p><p>　　Based on B / S mode

6、, the use of ASP technology and network database theory, I developed a small, online shopping system. In this system, to achieve three convenient customer registered as a member is very easy, very convenient to browse an

7、d search for goods, view product details is very convenient, and then according to the customers to buy goods. The system will automatically generate orders, and submitted in accordance with the customers to fill in the

8、details of the order and delivery. The sy</p><p>　　Key words: B / S structure, Access database, ASP technology</p><p><b>　　目 錄</b></p><p><b>　　第一章 緒論1</b>&

9、lt;/p><p>　　一、研究背景及目的1</p><p>　　二、國(guó)內(nèi)外研究方向1</p><p><b>　　三、研究意義2</b></p><p>　　四、研究的可行性分析2</p><p>　　第二章 相關(guān)技術(shù)簡(jiǎn)介4</p><p><b>　　一

10、、B/S概述4</b></p><p><b>　　二、ASP簡(jiǎn)介5</b></p><p>　　三、Access2003數(shù)據(jù)庫(kù)6</p><p>　　四、HTML語(yǔ)言7</p><p>　　第三章 系統(tǒng)總體設(shè)計(jì)8</p><p><b>　　一、網(wǎng)站規(guī)劃9<

11、;/b></p><p>　　二、系統(tǒng)流程結(jié)構(gòu)圖9</p><p>　?。ㄒ唬┛蛻艚缑?0</p><p>　　（二）管理界面10</p><p>　?。ㄈ┫到y(tǒng)功能結(jié)果圖和E-R圖11</p><p>　?。ㄋ模?shù)據(jù)表設(shè)計(jì)介紹13</p><p>　　第四章 系統(tǒng)詳細(xì)設(shè)計(jì)16

12、</p><p>　　一、系統(tǒng)設(shè)計(jì)原則16</p><p>　　二、系統(tǒng)基本功能示意圖16</p><p>　　三、系統(tǒng)詳細(xì)實(shí)現(xiàn)17</p><p><b>　?。ㄒ唬┦醉?yè)17</b></p><p>　?。ǘ┯脩粲嗁?gòu)商品的流程18</p><p>　?。ㄈ┲?/p>

13、要功能模塊的說(shuō)明及代碼19</p><p>　　（四）訂購(gòu)商品模塊：20</p><p>　　第五章 系統(tǒng)測(cè)試結(jié)論31</p><p><b>　　第六章 結(jié)論32</b></p><p><b>　　參考文獻(xiàn)33</b></p><p><b>　　致謝

14、34</b></p><p>　　基于B/S的信息化企業(yè)網(wǎng)絡(luò)組建</p><p><b>　　第一章 緒論</b></p><p><b>　　一、研究背景及目的</b></p><p>　　B/S結(jié)構(gòu)，即Browser/Server(瀏覽器/服務(wù)器)結(jié)構(gòu)，是隨著Internet技術(shù)的

15、興起，對(duì)C/S結(jié)構(gòu)的一種變化或者改進(jìn)的結(jié)構(gòu)。在這種結(jié)構(gòu)下，用戶界面完全通過(guò)WWW瀏覽器實(shí)現(xiàn)，一部分事務(wù)邏輯在前端實(shí)現(xiàn)，但是主要事務(wù)邏輯在服務(wù)器端實(shí)現(xiàn)，形成所謂3-tier結(jié)構(gòu)。B/S結(jié)構(gòu)，主要是利用了不斷成熟的WWW瀏覽器技術(shù)，結(jié)合瀏覽器的多種Script語(yǔ)言(VBScript、JavaScript…)和ActiveX技術(shù)，用通用瀏覽器就實(shí)現(xiàn)了原來(lái)需要復(fù)雜專用軟件才能實(shí)現(xiàn)的強(qiáng)大功能，并節(jié)約了開發(fā)成本，是一種全新的軟件系統(tǒng)構(gòu)造技術(shù)。隨著W

16、indows 98/Windows 2000將瀏覽器技術(shù)植入操作系統(tǒng)內(nèi)部，這種結(jié)構(gòu)更成為當(dāng)今應(yīng)用軟件的首選體系結(jié)構(gòu)。顯然B/S結(jié)構(gòu)應(yīng)用程序相對(duì)于傳統(tǒng)的C/S結(jié)構(gòu)應(yīng)用程序?qū)⑹蔷薮蟮倪M(jìn)步。</p><p>　　B/S結(jié)構(gòu)采用星形拓?fù)浣Y(jié)構(gòu)建立企業(yè)內(nèi)部通信網(wǎng)絡(luò)或利用Internet虛擬專網(wǎng)（VPN）。前者的特點(diǎn)是安全、快捷、準(zhǔn)確。后者則具有節(jié)省投資、跨地域廣的優(yōu)點(diǎn)。須視企業(yè)規(guī)模和地理分布確定。企業(yè)內(nèi)部通過(guò)防火墻接入Int

17、ernet，再整個(gè)網(wǎng)絡(luò)采用TCP/IP協(xié)議。</p><p><b>　　二、國(guó)內(nèi)外研究方向</b></p><p>　　進(jìn)入二十一世紀(jì)，隨著科技的進(jìn)步以及經(jīng)濟(jì)化的發(fā)展。人們的生活節(jié)奏也向著更快、更實(shí)惠、更全面的方向發(fā)展。所以信息技術(shù)以工具的身份被引入商業(yè)領(lǐng)域來(lái)方便人們的一些生活需求。尤其是互聯(lián)網(wǎng)和多媒體技術(shù)的應(yīng)用，已經(jīng)以很快的速度改變著人們的生產(chǎn)方式、工作方式和生活

18、方式。</p><p>　　WWW(World Wide Web,萬(wàn)維網(wǎng))是互聯(lián)網(wǎng)上基于客戶/服務(wù)器體系結(jié)構(gòu)的分布式多平臺(tái)的超文本超媒體信息服務(wù)系統(tǒng)，它是Internet的最主要的信息服務(wù)，近年來(lái)，隨著萬(wàn)維網(wǎng)技術(shù)的興起和消費(fèi)人群的需求，出現(xiàn)了大量的網(wǎng)上購(gòu)物平臺(tái)，由于Internet提供了雙向的交互通信，網(wǎng)上商品省去租店面、召雇員及儲(chǔ)存保管等一系列費(fèi)用，所以其價(jià)格較一般商場(chǎng)的同類商品更便宜很多。又因?yàn)橄M(fèi)者也享受到

19、足不出戶可以買到自己想要并且廉價(jià)的東西，所以網(wǎng)上購(gòu)物沒有傳統(tǒng)商務(wù)的障礙，無(wú)論對(duì)消費(fèi)者、企業(yè)還是市場(chǎng)都有著巨大的吸引力和影響力，在新經(jīng)濟(jì)時(shí)期無(wú)疑是達(dá)到“多贏”效果的理想模式，他將會(huì)迅速蓬勃發(fā)展</p><p><b>　　三、研究意義</b></p><p>　　隨著Internet和WWW的流行，以往的主機(jī)/終端和C/S都無(wú)法滿足當(dāng)前的全球網(wǎng)絡(luò)開放、互連、信息隨處可見

20、和信息共享的新要求，于是就出現(xiàn)了B/S型模式，即瀏覽器/服務(wù)器結(jié)構(gòu)。B/S模式最大特點(diǎn)是：用戶可以通過(guò)WWW瀏覽器去訪問(wèn)Internet上的文本、數(shù)據(jù)、圖像、動(dòng)畫、視頻點(diǎn)播和聲音信息，這些信息都是由許許多多的Web服務(wù)器產(chǎn)生的，而每一個(gè)Web服務(wù)器又可以通過(guò)各種方式與數(shù)據(jù)庫(kù)服務(wù)器連接，大量的數(shù)據(jù)實(shí)際存放在數(shù)據(jù)庫(kù)服務(wù)器中?？蛻舳顺薟WW瀏覽器，一般無(wú)須任何用戶程序，只需從Web服務(wù)器上下載程序到本地來(lái)執(zhí)行，在下載過(guò)程中若遇到與數(shù)據(jù)庫(kù)有關(guān)

21、的指令，由Web服務(wù)器交給數(shù)據(jù)庫(kù)服務(wù)器來(lái)解釋執(zhí)行，并返回給Web服務(wù)器，Web服務(wù)器又返回給用戶。在這種結(jié)構(gòu)中，將許許多多的網(wǎng)連接到一塊，形成一個(gè)巨大的網(wǎng)，即全球網(wǎng)。而各個(gè)企業(yè)可以在此結(jié)構(gòu)的基礎(chǔ)上建立自己的Internet。</p><p>　　四、研究的可行性分析</p><p>　　B/S最大的優(yōu)點(diǎn)就是可以在任何地方進(jìn)行操作而不用安裝任何專門的軟件，只要有一臺(tái)能上網(wǎng)的電腦就能使用，客戶

22、端零維護(hù)，系統(tǒng)的擴(kuò)展非常容易，只要能上網(wǎng)，再由系統(tǒng)管理員分配一個(gè)用戶名和密碼，就可以使用了。甚至可以在線申請(qǐng)，通過(guò)公司內(nèi)部的安全認(rèn)證（如CA證書）后，不需要人的參與，系統(tǒng)可以自動(dòng)分配給用戶一個(gè)賬號(hào)進(jìn)入系統(tǒng)。</p><p>　　其次是維護(hù)和升級(jí)方式簡(jiǎn)單，目前，軟件系統(tǒng)的改進(jìn)和升級(jí)越來(lái)越頻繁，B/S架構(gòu)的產(chǎn)品明顯體現(xiàn)著更為方便的特性。對(duì)于較大點(diǎn)的單位來(lái)說(shuō)，系統(tǒng)管理人員如果需要在幾百甚至上千臺(tái)電腦之間來(lái)回奔跑，效率和

23、工作量是可想而知的。而B/S架構(gòu)的軟件只需要管理服務(wù)器就行了，所有的客戶端只是瀏覽器，根本不需要做任何的維護(hù)。無(wú)論用戶的規(guī)模有多大，有多少分支機(jī)構(gòu)都不會(huì)增加任何維護(hù)升級(jí)的工作量，所有的操作只需要針對(duì)服務(wù)器進(jìn)行。</p><p>　　再次是成本降低，選擇更多，我們都知道windows在桌面電腦上幾乎一統(tǒng)天下，瀏覽器成為了標(biāo)準(zhǔn)配置，但在服務(wù)器操作系統(tǒng)上windows并不是處于絕對(duì)的統(tǒng)治地位?，F(xiàn)在的趨勢(shì)是凡使用B/S架

24、構(gòu)的應(yīng)用管理軟件，只需安裝在Linux服務(wù)器上即可，而且安全性高。所以服務(wù)器操作系統(tǒng)的選擇是很多的，不管選用那種操作系統(tǒng)都可以讓大部分人使用windows作為桌面操作系統(tǒng)電腦不受影響，這就使得最流行免費(fèi)的Linux操作系統(tǒng)快速發(fā)展起來(lái)。</p><p>　　還有就是應(yīng)用服務(wù)器運(yùn)行數(shù)據(jù)負(fù)荷較重，由于B/S架構(gòu)管理軟件只安裝在服務(wù)器端（Server）上，網(wǎng)絡(luò)管理人員只需要管理服務(wù)器就行了，用戶界面主要事務(wù)邏輯在服務(wù)器

25、（Server）端完全通過(guò)WWW瀏覽器實(shí)現(xiàn)，極少部分事務(wù)邏輯在前端（Browser）實(shí)現(xiàn)，所有的客戶端只有瀏覽器，網(wǎng)絡(luò)管理人員只需要做服務(wù)器的硬件維護(hù)。但應(yīng)用服務(wù)器運(yùn)行數(shù)據(jù)負(fù)荷較重，一旦發(fā)生服務(wù)器“崩潰”等問(wèn)題，后果不堪設(shè)想。因此，許多單位都備有數(shù)據(jù)庫(kù)存儲(chǔ)服務(wù)器，以防萬(wàn)一。 </p><p>　　嚴(yán)格來(lái)說(shuō)，B/S結(jié)構(gòu)也是一種C/S結(jié)構(gòu)。二者在技術(shù)和實(shí)施上主要的比較是：C/S 采用Intranet技術(shù)，適用于局域網(wǎng)

26、環(huán)境；可連接用戶數(shù)有限，當(dāng)用戶數(shù)量增多時(shí)，性能會(huì)明顯下降；客戶端都要安裝應(yīng)用程序，系統(tǒng)擴(kuò)展維護(hù)復(fù)雜；代碼可重用性差，開發(fā)費(fèi)用較低，開發(fā)周期較短。B/S采用Internet/Intranet技術(shù)，適用于廣域網(wǎng)環(huán)境；支持更多的客戶，可根據(jù)訪問(wèn)量動(dòng)態(tài)配置WEB服務(wù)器、應(yīng)用服務(wù)器，以保證系統(tǒng)性能；客戶端只需標(biāo)準(zhǔn)的瀏覽器，采用面向?qū)ο蠹夹g(shù)，代碼可重用性好，系統(tǒng)擴(kuò)展維護(hù)簡(jiǎn)單；但開發(fā)費(fèi)用較高，開發(fā)周期較長(zhǎng)。</p><p>　

27、　第二章 相關(guān)技術(shù)簡(jiǎn)介</p><p><b>　　一、B/S概述</b></p><p>　　B/S結(jié)構(gòu)（Browser/Server結(jié)構(gòu)）結(jié)構(gòu)即瀏覽器和服務(wù)器結(jié)構(gòu)。它是隨著Internet技術(shù)的興起，對(duì)C/S結(jié)構(gòu)的一種變化或者改進(jìn)的結(jié)構(gòu)。在這種結(jié)構(gòu)下，用戶工作界面是通過(guò)WWW瀏覽器來(lái)實(shí)現(xiàn)，極少部分事務(wù)邏輯在前端（Browser）實(shí)現(xiàn)，但是主要事務(wù)邏輯在服務(wù)器端（S

28、erver）實(shí)現(xiàn)，形成所謂三層3-tier結(jié)構(gòu)。這樣就大大簡(jiǎn)化了客戶端電腦載荷，減輕了系統(tǒng)維護(hù)與升級(jí)的成本和工作量，降低了用戶的總體成本（TCO）。以目前的技術(shù)看，局域網(wǎng)建立B/S結(jié)構(gòu)的網(wǎng)絡(luò)應(yīng)用，并通過(guò)Internet/Intranet模式下數(shù)據(jù)庫(kù)應(yīng)用，相對(duì)易于把握、成本也是較低的。它是一次性到位的開發(fā)，能實(shí)現(xiàn)不同的人員，從不同的地點(diǎn)，以不同的接入方式（比如LAN, WAN, Internet/Intranet等）訪問(wèn)和操作共同的數(shù)據(jù)庫(kù)

29、；它能有效地保護(hù)數(shù)據(jù)平臺(tái)和管理訪問(wèn)權(quán)限，服務(wù)器數(shù)據(jù)庫(kù)也很安全。</p><p><b>　　B/S結(jié)構(gòu)的優(yōu)點(diǎn) </b></p><p>　　1.具有分布性特點(diǎn)，可以隨時(shí)隨地進(jìn)行查詢、瀏覽等業(yè)務(wù)處理。 </p><p>　　2.業(yè)務(wù)擴(kuò)展簡(jiǎn)單方便，通過(guò)增加網(wǎng)頁(yè)即可增加服務(wù)器功能。 </p><p>　　3.維護(hù)起來(lái)相對(duì)簡(jiǎn)單方

30、便，只需要改變網(wǎng)頁(yè)，即可實(shí)現(xiàn)所有用戶的同步更新。 </p><p>　　4.普通程序員就可開發(fā)，共享性強(qiáng) 。</p><p>　　工作的原理如圖2.1： </p><p>　　圖2.1 B/S模式工作原理</p><p>　　在系統(tǒng)的性能方面，B/S占有優(yōu)勢(shì)的是其異地瀏覽和信息采集的靈活性。任何時(shí)間、任何地點(diǎn)、任何系統(tǒng)，只要可以使用瀏覽器上網(wǎng)

31、，就可以使用B/S系統(tǒng)的終端。</p><p>　　工作原理：在B／S模式中，客戶端運(yùn)行瀏覽器軟件。瀏覽器以超文本形式向Web服務(wù)器提出訪問(wèn)數(shù)據(jù)庫(kù)的要求，Web服務(wù)器接受客戶端請(qǐng)求后，將這個(gè)請(qǐng)求轉(zhuǎn)化為SQL語(yǔ)法，并交給數(shù)據(jù)庫(kù)服務(wù)器，數(shù)據(jù)庫(kù)服務(wù)器得到請(qǐng)求后，驗(yàn)證其合法性，并進(jìn)行數(shù)據(jù)處理，然后將處理后的結(jié)果返回給Web服務(wù)器，Web服務(wù)器再一次將得到的所有結(jié)果進(jìn)行轉(zhuǎn)化，變成HTML文檔形式，轉(zhuǎn)發(fā)給客戶端瀏覽器以友好的

32、Web頁(yè)面形式顯示出來(lái)。</p><p><b>　　二、ASP簡(jiǎn)介</b></p><p>　　ASP是Active Server Page的縮寫就是 “動(dòng)態(tài)服務(wù)器頁(yè)面”。ASP是微軟公司開發(fā)的代替CGI腳本程序的一種應(yīng)用，它可以與數(shù)據(jù)庫(kù)和其它程序進(jìn)行交互，是一種簡(jiǎn)單、方便的編程工具。</p><p>　　早期的Web程序開發(fā)是十分繁瑣的，以

33、至于要制作一個(gè)很簡(jiǎn)單的動(dòng)態(tài)頁(yè)面就需要編寫大量的C代碼才能完成，這對(duì)于普通的程序員來(lái)說(shuō)有點(diǎn)太難了。而ASP卻允許使用VBScript這種的簡(jiǎn)單腳本語(yǔ)言，編寫嵌入在HTML網(wǎng)頁(yè)中的代碼。在進(jìn)行程序設(shè)計(jì)的時(shí)候可以使用它的內(nèi)部組件來(lái)實(shí)現(xiàn)一些高級(jí)功能(例如Cookie)。是一種服務(wù)器端腳本編寫環(huán)境，可以用來(lái)創(chuàng)建和運(yùn)行動(dòng)態(tài)網(wǎng)頁(yè)或Web應(yīng)用程序。ASP網(wǎng)頁(yè)可以包含HTML標(biāo)記、普通文本、腳本命令以及COM組件等。ASP網(wǎng)頁(yè)具有以下特點(diǎn)： </p

34、><p>　　1.利用ASP可以實(shí)現(xiàn)突破靜態(tài)網(wǎng)頁(yè)的一些功能限制，實(shí)現(xiàn)動(dòng)態(tài)網(wǎng)頁(yè)技術(shù)； </p><p>　　2.ASP文件是包含在HTML代碼所組成的文件中的，易于修改和測(cè)試；asp 網(wǎng)頁(yè)界面(5張)</p><p>　　3.服務(wù)器上的ASP解釋程序會(huì)在服務(wù)器端執(zhí)行ASP程序，并將結(jié)果以HTML格式傳送到客戶端瀏覽器上，因此使用各種瀏覽器都可以正常瀏覽ASP所產(chǎn)生的網(wǎng)頁(yè)；

35、 </p><p>　　4.ASP提供了一些內(nèi)置對(duì)象，使用這些對(duì)象可以使服務(wù)器端腳本功能更強(qiáng)。例如可以從web瀏覽器中獲取用戶通過(guò)HTML表單提交的信息，并在腳本中對(duì)這些信息進(jìn)行處理，然后向web瀏覽器發(fā)送信息； </p><p>　　5.ASP可以使用服務(wù)器端ActiveX組件來(lái)執(zhí)行各種各樣的任務(wù)，例如存取數(shù)據(jù)庫(kù)、發(fā)送Email或訪問(wèn)文件系統(tǒng)等。 </p><p>

36、;　　6.由于服務(wù)器是將ASP程序執(zhí)行的結(jié)果以HTML格式傳回客戶端瀏覽器，因此使用者不會(huì)看到ASP所編寫的原始程序代碼，可防止ASP程序代碼被竊取。 </p><p>　　7.方便連接ACCESS與SQL數(shù)據(jù)庫(kù)。</p><p>　　由于其種種的優(yōu)點(diǎn)所以本人選擇了ASP結(jié)合Macromedia Dreamweaver MX結(jié)構(gòu)進(jìn)行改論文的設(shè)計(jì)。</p><p>　

37、　三、Access2003數(shù)據(jù)庫(kù)</p><p>　　Access數(shù)據(jù)庫(kù)是美國(guó)Microsoft公司早年年推出的微機(jī)數(shù)據(jù)庫(kù)管理系統(tǒng)。它具有界面友好、易學(xué)易用、開發(fā)簡(jiǎn)單、接口靈活等特點(diǎn)，是典型的新一代桌面數(shù)據(jù)庫(kù)管理系統(tǒng)。其主要特點(diǎn)如下： </p><p>　　1.完善地管理各種數(shù)據(jù)庫(kù)對(duì)象，具有強(qiáng)大的數(shù)據(jù)組織、用戶管理、安全檢查等功能。 </p><p>　　2.強(qiáng)大的

38、數(shù)據(jù)處理功能，在一個(gè)工作組級(jí)別的網(wǎng)絡(luò)環(huán)境中，使用Access開發(fā)的多用戶數(shù)據(jù)庫(kù)管理系統(tǒng)具有傳統(tǒng)的XBASE(DBASE、FoxBASE的統(tǒng)稱)數(shù)據(jù)庫(kù)系統(tǒng)所無(wú)法實(shí)現(xiàn)的客戶服務(wù)器(Cient/Server)結(jié)構(gòu)和相應(yīng)的數(shù)據(jù)庫(kù)安全機(jī)制，Access具備了許多先進(jìn)的大型數(shù)據(jù)庫(kù)管理系統(tǒng)所具備的特征，如事務(wù)處理/出錯(cuò)回滾能力等。 </p><p>　　3.可以方便地生成各種數(shù)據(jù)對(duì)象，利用存儲(chǔ)的數(shù)據(jù)建立窗體和報(bào)表，可視性好。

39、</p><p>　　4.作為Office套件的一部分，可以與Office集成，實(shí)現(xiàn)無(wú)縫連接。 </p><p>　　5.能夠利用Web檢索和發(fā)布數(shù)據(jù)，實(shí)現(xiàn)與Internet的連接。 Access主要適用于中小型應(yīng)用系統(tǒng)，或作為客戶機(jī)/服務(wù)器系統(tǒng)中的客戶端數(shù)據(jù)庫(kù)。</p><p><b>　　數(shù)據(jù)庫(kù)常用操作語(yǔ)言</b></p>&

40、lt;p>　　※ 數(shù)據(jù)定義語(yǔ)言(DDL)，例如：CREATE、DROP、ALTER等語(yǔ)句。 </p><p>　　※ 數(shù)據(jù)操作語(yǔ)言(DML)，例如：INSERT（插入）、UPDATE（修改）、DELETE（刪除）語(yǔ)句。 </p><p>　　※ 數(shù)據(jù)查詢語(yǔ)言(DQL)，例如：SELECT語(yǔ)句。 </p><p>　　※ 數(shù)據(jù)控制語(yǔ)言(DCL)，例如：GRANT

41、、REVOKE、COMMIT、ROLLBACK等語(yǔ)句。</p><p><b>　　四、HTML語(yǔ)言</b></p><p>　　HTML（HyperTextMark-upLanguage）即超文本標(biāo)記語(yǔ)言，是WWW的描述語(yǔ)言。html 是在 sgml 定義下的一個(gè)描述性語(yǔ)言，設(shè)計(jì)HTML語(yǔ)言的目的是為了能把存放在一臺(tái)電腦中的文本或圖形與另一臺(tái)電腦中的文本或圖形方便地

42、聯(lián)系在一起，形成有機(jī)的整體，人們不用考慮具體信息是在當(dāng)前電腦上還是在網(wǎng)絡(luò)的其它電腦上。只需使用鼠標(biāo)在某一文檔中點(diǎn)取一個(gè)圖標(biāo)，Internet就會(huì)馬上轉(zhuǎn)到與此圖標(biāo)相關(guān)的內(nèi)容上去，而這些信息可能存放在網(wǎng)絡(luò)的另一臺(tái)電腦中。 HTML文本是由HTML命令組成的描述性文本，HTML命令可以說(shuō)明文字、圖形、動(dòng)畫、聲音、表格、鏈接等。HTML的結(jié)構(gòu)包括頭部（Head）、主體（Body）兩大部分，其中頭部描述瀏覽器所需的信息，而主體則包含所要說(shuō)明的具體

43、內(nèi)容。 </p><p>　　另外，HTML是網(wǎng)絡(luò)的通用語(yǔ)言，一種簡(jiǎn)單、通用的全置標(biāo)記語(yǔ)言。它允許網(wǎng)頁(yè)制作人建立文本與圖片相結(jié)合的復(fù)雜頁(yè)面，這些頁(yè)面可以被網(wǎng)上任何其他人瀏覽到，無(wú)論使用的是什么類型的電腦或?yàn)g覽器。神奇嗎?一點(diǎn)都不神奇,因?yàn)楝F(xiàn)在你看到的就是這種語(yǔ)言寫的頁(yè)面。</p><p>　　第三章 系統(tǒng)總體設(shè)計(jì)</p><p>　　通過(guò)多方面研究調(diào)查，現(xiàn)在人們都熱

44、衷于網(wǎng)上購(gòu)物尤其是年輕人。通過(guò)網(wǎng)上的一些數(shù)據(jù)顯示，網(wǎng)上購(gòu)物是一種很實(shí)用很方便的生活方式了。</p><p><b>　　1.使用網(wǎng)上的原因</b></p><p>　　圖3.1 消費(fèi)者在網(wǎng)上購(gòu)物的原因</p><p>　　通過(guò)對(duì)圖3.1的分析越來(lái)越能說(shuō)明，對(duì)于現(xiàn)在經(jīng)濟(jì)壓力過(guò)大并且越來(lái)越忙碌的人們來(lái)說(shuō)，網(wǎng)上購(gòu)物可以大幅度的來(lái)減輕一些生活上的壓力，

45、也更適用于現(xiàn)在的社會(huì)。</p><p>　　2.消費(fèi)者選擇購(gòu)買商品配送的方式</p><p>　　圖3.2消費(fèi)者選擇購(gòu)買商品配送方式</p><p>　　通過(guò)對(duì)圖3.2的分析來(lái)看，消費(fèi)者十分希望可以更快的看到自己的商品并且可以對(duì)商品能夠當(dāng)面對(duì)其性能之類的檢測(cè)，同時(shí)這也是對(duì)網(wǎng)上購(gòu)物還存在一些疑惑和對(duì)賣家的信譽(yù)的擔(dān)憂。</p><p><b

46、>　　一、網(wǎng)站規(guī)劃</b></p><p>　　網(wǎng)上購(gòu)物，就是通過(guò)互聯(lián)網(wǎng)檢索商品信息，并通過(guò)電子訂購(gòu)單發(fā)出購(gòu)物請(qǐng)求，然后填上私人支票帳號(hào)或信用卡的號(hào)碼，廠商通過(guò)郵購(gòu)的方式發(fā)貨，或是通過(guò)快遞公司送貨上門。在這個(gè)平臺(tái)上賣家可以經(jīng)常變動(dòng)或更新的資源，如公司簡(jiǎn)介、管理規(guī)范和公司制度等并且隨時(shí)變化的信息，如商品報(bào)價(jià)，會(huì)議安排和培訓(xùn)信息等。而買家則可以隨時(shí)來(lái)關(guān)注這些動(dòng)向，并選擇自己需要的信息或物品。網(wǎng)上購(gòu)物

47、突破了傳統(tǒng)商務(wù)的障礙，進(jìn)行互聯(lián)網(wǎng)交易，實(shí)現(xiàn)不出門逛百店，無(wú)論對(duì)消費(fèi)者、企業(yè)還是市場(chǎng)都有著巨大的吸引力和影響力，我做的這個(gè)系統(tǒng)就是實(shí)現(xiàn)在網(wǎng)上可以方便進(jìn)行的小商品銷售功能。</p><p><b>　　二、系統(tǒng)流程結(jié)構(gòu)圖</b></p><p>　　網(wǎng)店在線交易商品流程如下：買家可以在頁(yè)面選擇自己感興趣的商品，點(diǎn)擊就會(huì)出現(xiàn)關(guān)于這個(gè)商品的價(jià)格，功能之類的詳細(xì)情況，如果買家想

48、買就可以把這個(gè)商品放入購(gòu)物車然后付款。</p><p>　　以下是系統(tǒng)流程圖4.3。</p><p>　　圖3.3 系統(tǒng)流程圖</p><p>　　Unified Modeling Language (UML) 中的用例圖用于對(duì)系統(tǒng)，子系統(tǒng)或類的行為的直觀可視化，以便使觀看者更加清楚明白的了解要表達(dá)的含義，也便利軟件開發(fā)者最終實(shí)現(xiàn)這些元素。UML中的用例圖是描述一組

49、用例，參與者以及它們之間的關(guān)系。</p><p><b>　?。ㄒ唬┛蛻艚缑?lt;/b></p><p>　　普通用戶的用例圖如下圖3.4所示</p><p><b>　　圖3.4</b></p><p><b>　?。ǘ┕芾斫缑?lt;/b></p><p>

50、　　管理員的用例圖如下圖3.5所示</p><p><b>　　圖3.5 </b></p><p>　　為了作好該系統(tǒng)的可行性，可操作性,完善系統(tǒng)的各項(xiàng)功能,加強(qiáng)各個(gè)環(huán)節(jié)的聯(lián)系,能夠正常有序的完成整個(gè)程序的運(yùn)行。為了做好該系統(tǒng)的個(gè)子系統(tǒng)模塊之間的聯(lián)系和配合，完善該系統(tǒng)的有效，做好有關(guān)的技術(shù)問(wèn)題的解決。</p><p>　　運(yùn)行的環(huán)境：WINDO

51、W98/2000/NT。界面要求直觀整潔,能夠合理明白的反應(yīng)整個(gè)購(gòu)物流程的特點(diǎn),流暢.并能實(shí)現(xiàn)各種功能正常運(yùn)行。</p><p>　　（三）系統(tǒng)功能結(jié)果圖和E-R圖</p><p>　　1.實(shí)體之間關(guān)系得E-R圖如圖3.6所示。</p><p>　　圖3.6實(shí)體間的關(guān)系E-R圖</p><p>　　2.管理員信息實(shí)體E-R圖如下所圖3.7所示

52、。</p><p>　　圖3.7 管理員信息實(shí)體E-R圖</p><p>　　3.注冊(cè)用戶信息實(shí)體E-R圖如圖4.8所示。</p><p>　　圖3.8用戶注冊(cè)信息實(shí)體E-R圖</p><p>　　4.產(chǎn)品實(shí)體E-R圖如圖3.9所示。</p><p>　　圖3.9產(chǎn)品實(shí)體E-R圖</p><p>

53、;　　5.產(chǎn)品分類實(shí)體E-R圖如圖3.10所示。</p><p>　　圖3.10產(chǎn)品分類實(shí)體E-R圖</p><p>　　6.訂單詳細(xì)信息實(shí)體E-R圖如圖3.11所示。</p><p>　　圖3.11 訂單詳細(xì)信息實(shí)體E-R圖</p><p>　　7.訂單列表實(shí)體E-R圖如圖4.12所示。</p><p>　　圖3.1

54、2 訂單列表實(shí)體E-R圖</p><p>　?。ㄋ模?shù)據(jù)表設(shè)計(jì)介紹</p><p>　　這個(gè)程序我使用的是微軟開發(fā)的關(guān)聯(lián)式數(shù)據(jù)庫(kù)管理系統(tǒng)Microsoft Office Access數(shù)據(jù)庫(kù)，他是一個(gè)非常關(guān)鍵的環(huán)節(jié)，因?yàn)榱己?、高效的?shù)據(jù)組織結(jié)構(gòu)能使系統(tǒng)的編碼簡(jiǎn)潔、可靠，使我的整個(gè)系統(tǒng)結(jié)構(gòu)清晰流暢，并能大大地提高工作效率。</p><p>　　1.A表: 此表用來(lái)記載管

55、理員的記錄,見表3.1所示。</p><p><b>　　表3.1 管理員表</b></p><p>　　2.B表: 此表用來(lái)記管理員的管理內(nèi)容的，見表3.2所示。</p><p><b>　　表3.2管理內(nèi)容表</b></p><p>　　3.C表: 此表用來(lái)記錄用戶的情況，見表3.3所示。<

56、;/p><p><b>　　表3.3 客戶表</b></p><p>　　4.D表: 此表用來(lái)記錄商品類別的情況，見表3.4所示。</p><p>　　表3.4 商品類別表</p><p>　　5.E表: 此表用來(lái)登記商品的一些情況，見表3.5所示。</p><p><b>　　表3.5商品

57、表</b></p><p>　　6.F表: 此表用來(lái)記訂單的，見表3.6所示。</p><p><b>　　表3.6訂單表</b></p><p>　　7.G表: 用來(lái)記送貨的方式，見表3.7。</p><p><b>　　表3.7 貨運(yùn)表</b></p><p>

58、;　　第四章 系統(tǒng)詳細(xì)設(shè)計(jì)</p><p><b>　　一、系統(tǒng)設(shè)計(jì)原則</b></p><p>　　商店在線交易系統(tǒng)不僅要符合管理信息系統(tǒng)的理論性體系，還得考慮網(wǎng)上商店的行業(yè)特殊性，如對(duì)可靠性、保密性、商品信息傳遞及時(shí)等要求比較高。系統(tǒng)分為前臺(tái)系統(tǒng)和后臺(tái)系統(tǒng)倆部分，系統(tǒng)在設(shè)計(jì)時(shí)在遵循信息系統(tǒng)的一般原則外，還要更具前后臺(tái)系統(tǒng)的特殊性遵循一些特殊原則。</p>

59、;<p>　　二、系統(tǒng)基本功能示意圖</p><p>　　商店在線交易系統(tǒng)，是使得人們?cè)谫?gòu)買商品時(shí)節(jié)省更多時(shí)間和金錢的一個(gè)平臺(tái)。其最主要的為客戶界面部分和管理界面?zhèn)z個(gè)模塊。前者顧名思義就是顧客登錄的商店首頁(yè)，其主要實(shí)現(xiàn)的是對(duì)整個(gè)網(wǎng)店內(nèi)容的體現(xiàn)包括（用戶注冊(cè)、登錄、新品推薦、打折商品、購(gòu)物車、查看商品詳細(xì)內(nèi)容等），管理界面主要實(shí)現(xiàn)的是商品類別設(shè)計(jì)，商品設(shè)定、用戶管理和訂單管理的功能。</p>

60、;<p>　　客戶界面的功能模塊圖如圖4.1所示。</p><p>　　圖4.1客戶界面的功能模塊</p><p>　　管理界面的功能模塊圖如圖4.2所示。</p><p>　　圖4.2管理界面的功能模塊</p><p><b>　　三、系統(tǒng)詳細(xì)實(shí)現(xiàn)</b></p><p><

61、b>　　（一）首頁(yè)</b></p><p>　　此模塊為網(wǎng)上商店的主頁(yè)，也是整個(gè)網(wǎng)站的門面所在。顧客可以更具首頁(yè)的提示和介紹很方便的熟悉應(yīng)用。其最主要的目的就是把該網(wǎng)站一些常用的功能模塊能羅列出來(lái)，如“商品展示”功能，“查詢”功能，“搜索”功能等等。圖4.3即為本網(wǎng)上商店的主頁(yè)面。</p><p><b>　　圖4.3主頁(yè)面</b></p>

62、;<p>　　（二）用戶訂購(gòu)商品的流程</p><p>　　進(jìn)入首頁(yè)后顧客首先需用自己注冊(cè)過(guò)的帳號(hào)登錄，如圖4.4。</p><p>　　圖4.4 以注冊(cè)過(guò)會(huì)員的用戶入口</p><p>　　帳號(hào)登錄以后，顧客就可以點(diǎn)擊自己想要的商品，放入購(gòu)物車時(shí)可以查看商品詳細(xì)信息和訂購(gòu)了。如圖4.5所示。</p><p>　　圖4.5查看商

63、品詳細(xì)信息</p><p>　　選擇訂購(gòu)這件商品的話，將顯示出你所商品的一些信息。并會(huì)出現(xiàn)下一張運(yùn)貨單出圖4.6。</p><p>　　圖4.6 運(yùn)貨單填寫</p><p>　　單擊確定將顯示一些商品信息，你可以選擇馬上訂購(gòu)和取消訂購(gòu)。選擇取消訂購(gòu)將清除你所選的東西，選擇馬上訂購(gòu)就可以付款將要填寫表格如圖4.7。</p><p>　　圖4.7

64、確認(rèn)付款界面</p><p>　　單擊完成后將后彈出一個(gè)畫面，告訴你的訂單號(hào)，以便以后查詢。</p><p>　?。ㄈ┲饕δ苣K的說(shuō)明及代碼</p><p><b>　　1.主頁(yè)：</b></p><p>　　主頁(yè)的背景是一副天藍(lán)色的圖片。網(wǎng)頁(yè)上有六種商品供用戶選擇，同時(shí)放置了各項(xiàng)功能菜單。</p>&

65、lt;p>　　connstr="DBQ="+server.mappath("shopping.mdb")+";DefaultDir=;</p><p>　　定義路徑為相對(duì)路徑</p><p>　　DRIVER={Microsoft Access Driver (*.mdb)};"</p><p>　

66、　驅(qū)動(dòng)程序，數(shù)據(jù)庫(kù)用的MICROSOFT ACCESS 最后的文件以MDB結(jié)束</p><p>　　set conn=server.createobject("ADODB.CONNECTIon”)</p><p>　　創(chuàng)建對(duì)象名字為CONN</p><p>　　conn.open connstr </p><p>　　打開名為CON

67、N的對(duì)象</p><p><b>　?。ㄋ模┯嗁?gòu)商品模塊</b></p><p>　　1.某種商品的訂購(gòu)頁(yè)面，見圖4.8。</p><p><b>　　圖4.8 訂購(gòu)頁(yè)面</b></p><p>　　<%@ LANGUAGE="VBSCRIPT" %></p&g

68、t;<p><b>　　<%</b></p><p><b>　　dim sqlo</b></p><p><b>　　dim rso</b></p><p>　　dim filtersql</p><p>　　dim conn </p>

69、<p>　　dim connstr</p><p>　　on error resume next</p><p>　　connstr="DBQ="+server.mappath("shopping.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"

70、</p><p>　　set conn=server.createobject("ADODB.CONNECTION")</p><p>　　conn.open connstr </p><p><b>　　dim sql</b></p><p><b>　　dim objrs</b&g

71、t;</p><p>　　dim listname</p><p>　　set objrs=server.createobject("adodb.recordset")</p><p>　　sql="select * from Products where 目錄ID="&request("id")&

72、lt;/p><p>　　objrs.open sql,conn,1,1</p><p>　　lngCatalogid = objRS("目錄ID")</p><p>　　strCcode = objRS("編號(hào)")</p><p>　　strCname = objRS("名稱")<

73、/p><p>　　memCdescription = objRS("描述")</p><p>　　curCprice = objRS("價(jià)格")</p><p>　　strCimageurl = objRS("小圖片地址")</p><p>　　datCdateavailable = o

74、bjRS("有效日期")</p><p>　　lngCstock = objRS("庫(kù)存")</p><p>　　lngCcategory = objRS("類別ID")</p><p>　　strCategory = objRS("類別")</p><p>　　

75、strDescurl=objRS("大圖片地址")</p><p>　　if isNull(objRS("特征")) then</p><p>　　strFeatures=""</p><p><b>　　else</b></p><p>　　strFeatur

76、es=objRS("特征")</p><p><b>　　end if</b></p><p>　　strButtonImage=objRS("按鈕圖片")</p><p>　　strWeight=objRS("重量")</p><p>　　strSyxs=ob

77、jRS("首頁(yè)顯示")</p><p>　　strPrice=FormatCurrency(curCprice,2)</p><p>　　dim mytext</p><p>　　mytext="訂購(gòu)"</p><p><b>　　%></b></p><

78、p>　　2.訂購(gòu)的確認(rèn)頁(yè)面，將會(huì)出現(xiàn)一張訂購(gòu)確認(rèn)單子，見圖4.9。</p><p><b>　　圖4.9訂購(gòu)確認(rèn)單</b></p><p>　　<%Response.buffer=TRUE%></p><p>　　<!-- #include file="shop$db.asp" --></

79、p><p><b>　　<%</b></p><p>　　Dim prodid, quantity, arrCart, scartItem</p><p>　　Dim strAction</p><p>　　strAction = Trim(Request.Form("action"))</p

80、><p>　　if strAction<>"" then</p><p>　　ReprocessForm</p><p><b>　　else</b></p><p>　　ProcessNewadd</p><p><b>　　end if</b>

81、</p><p>　　Sub ProcessNewAdd()</p><p><b>　　Dim rc</b></p><p><b>　　ShopInit</b></p><p>　　GetInputValues</p><p>　　arrCart = Session(&q

82、uot;MyCart")</p><p>　　scartItem = Session("cartItem")</p><p>　　If scartItem = 0 and prodid="" Then</p><p>　　Response.Redirect "shoperror.asp?msg="

83、 & Server.URLEncode ("您的購(gòu)物車?yán)镞€沒有任何商品！")</p><p><b>　　End If</b></p><p>　　If prodid <> "" Then</p><p>　　CartAddItem prodid, rc</p><

84、p>　　if rc > 0 then</p><p>　　sError="Item not found in database id=" & prodid</p><p><b>　　end if </b></p><p><b>　　end if</b></p>&

85、lt;p>　　DisplayForm</p><p><b>　　end sub</b></p><p>　　Sub GetInputValues </p><p>　　Dim sOption</p><p>　　Dim optionnum</p><p>　　Dim maxFeatures

86、</p><p>　　prodid = Request.Form("productid")</p><p>　　quantity = Request.Form("quantity")</p><p>　　if prodid ="" then</p><p>　　prodid=Requ

87、est.querystring("productid")</p><p>　　quantity = Request.querystring("quantity")</p><p><b>　　end if</b></p><p>　　Response.write "Product="

88、& prodid & " quantity " & quantity</p><p>　　There can be up to 4 different features for a product option1, option2</p><p>　　maxfeatures=cMaxFeatures</p><p>　　S

89、ession("Maxfeatures")=maxfeatures</p><p>　　for i =1 to MaxFeatures</p><p>　　sOption= "Feature" & i</p><p>　　ProductOptions(i)=request.form(soption)</p>

90、<p>　　response.write " i=" & i & " Feature= " & ProductOptions(i)</p><p>　　If ProductOptions(i)="" then</p><p>　　ProductOptions(i)=request.querys

91、tring(soption)</p><p><b>　　end if</b></p><p><b>　　next</b></p><p><b>　　end sub</b></p><p>　　Sub ReprocessForm</p><p>　　

92、arrCart = Session("MyCart")</p><p>　　scartItem = Session("cartItem")</p><p>　　Select Case strAction</p><p>　　Case "繼續(xù)購(gòu)物"</p><p>　　if sessi

93、on("home") <> "" then</p><p>　　Response.Redirect Session("home")</p><p><b>　　else </b></p><p>　　Response.Redirect "default.asp&q

94、uot;</p><p><b>　　end if</b></p><p>　　Case "重新計(jì)算"</p><p>　　Response.write "recalculating"</p><p>　　Dim quantities(20)</p><p>

95、;　　For i = 1 To scartItem</p><p>　　Dim tquantity</p><p>　　tquantity = Request.Form("Quantity" & Cstr(i))</p><p>　　if Not isnumeric(tquantity) then </p><p>

96、;　　tquantity=1</p><p><b>　　end if</b></p><p>　　If tquantity < 0 then</p><p>　　tquantity = abs(tquantity)</p><p><b>　　end if </b></p>&

97、lt;p>　　arrCart(cQuantity,i) = CInt(tquantity)</p><p>　　Quantities(i)=tquantity</p><p><b>　　Next</b></p><p>　　For i = 1 to scartItem</p><p>　　Dim confirm&

98、lt;/p><p>　　confirm = Request.Form("selected" & CStr(i))</p><p>　　If confirm <> "yes" or quantities(i)=0 Then </p><p>　　scartItem = scartItem - 1</p&

99、gt;<p><b>　　Dim x</b></p><p>　　For x = 1 to UBound(arrCart,1)</p><p>　　arrCart(x,i) = ""</p><p><b>　　Next </b></p><p><b>

100、　　Dim n</b></p><p><b>　　n = i</b></p><p>　　while n < UBound(arrCart,2)</p><p>　　For x = 1 to UBound(arrCart,1)</p><p>　　arrCart(x,n) = arrCart(x,n

101、+ 1)</p><p>　　arrCart(x,n + 1) = ""</p><p><b>　　Next</b></p><p><b>　　n = n + 1</b></p><p><b>　　wend</b></p><p&

102、gt;<b>　　end If</b></p><p><b>　　Next</b></p><p>　　Session("cartItem") = scartItem</p><p>　　Session("MyCart") = arrCart</p><p>

103、;　　Case "去收銀臺(tái)"</p><p>　　Response.Redirect "shopcustomer.asp"</p><p>　　End Select</p><p>　　DisplayForm</p><p><b>　　End Sub</b></p>

104、<p>　　Sub DisplayForm()</p><p>　　ShopPageHeader</p><p>　　arrCart = Session("MyCart")</p><p>　　scartItem = Session("cartItem")</p><p>　　FormatF

105、ormFields</p><p>　　ShopPageTrailer</p><p><b>　　end sub</b></p><p>　　Sub FormatFormFields</p><p><b>　　%></b></p><p><b>　　&l

106、t;center></b></p><p>　　<table border="0" width="600" cellpadding="4"></p><p><b>　　<tr></b></p><p>　　<td width="

107、;100%" valign="top"> </p><p>　　<h3 align="center">購(gòu)物車?yán)锏纳唐贩N類:&nbsp;<%=scartitem%></h3></p><p><b>　　</td></b></p><p&g

108、t;<b>　　</tr></b></p><p><b>　　<tr></b></p><p>　　<td valign="top"> 以下是您所購(gòu)買的商品清單。<br></p><p>　　您可以改變購(gòu)買的數(shù)量，或通過(guò)取消復(fù)選框來(lái)清除所購(gòu)買的商品，然后

109、單擊重新計(jì)算！ </p><p><b>　　</table></b></p><p><b>　　<P></b></p><p>　　<FORM action="shopaddtocart.asp" method="POST"></p>

110、;<p><b>　　<%</b></p><p>　　dim allowdelete</p><p>　　allowdelete="TRUE"</p><p>　　CartFormat allowdelete</p><p><b>　　%></b>&

111、lt;/p><p>　　<br><INPUT name="action" type=submit value="繼續(xù)購(gòu)物"></p><p><b>　　&nbsp; </b></p><p>　　<INPUT name=action type=submit value=

112、"重新計(jì)算"></p><p>　　&nbsp;<INPUT name=action type=submit value="去收銀臺(tái)"></p><p><b>　　<P> </b></p><p>　　</P></FORM></p>

113、;<p><b>　　<%</b></p><p><b>　　End Sub</b></p><p><b>　　%></b></p><p>　　3.新用戶注冊(cè)功能：</p><p>　　當(dāng)新用戶選擇好商品后，接下來(lái)就是收銀，新用戶需注冊(cè)自己信息，

114、</p><p><b>　　見圖4.10。</b></p><p>　　圖4.10會(huì)員注冊(cè)界面</p><p>　　<!--#include file="shop$db.asp"--></p><p><b>　　<%</b></p><p

115、>　　Dim msg, newcust</p><p>　　Session("CurrentURL")="ShopCustomer.asp"</p><p>　　Session("FollowonURL")="ShopShipping.asp"</p><p>　　if Sessi

116、on("cartItem")=0 or Session("cartitem")="" then</p><p>　　Response.Redirect "shoperror.asp?msg=" & Server.URLEncode ("您還沒有購(gòu)買任何商品！")</p><p>&

117、lt;b>　　end if</b></p><p>　　If request("new")<>"" then</p><p>　　ResetCustomerSessionData</p><p><b>　　end if</b></p><p>　　I

118、f Session("LastName")<> "" and Session("Customerid") <>"" then</p><p>　　response.redirect Session("followonurl")</p><p><b>　　e

119、nd if </b></p><p>　　ShopGetContact</p><p>　　Sub ShopGetContact()</p><p>　　sAction=Request.form("Action")</p><p>　　If sAction = "" Then</p&g

120、t;<p>　　ShopPageHeader</p><p>　　GetCustomerSessionData()</p><p>　　DisplayForm()</p><p>　　ShopPageTrailer</p><p><b>　　Else</b></p><p>　　V

121、alidateData()</p><p>　　if sError = "" Then</p><p>　　UpdateContact</p><p>　　UpdateCustomerSessionData</p><p>　　response.redirect Session("followonurl"

122、;)</p><p><b>　　else</b></p><p>　　ShopPageHeader</p><p>　　DisplayForm</p><p>　　ShopPageTrailer</p><p><b>　　end if</b></p><

123、;p><b>　　end if</b></p><p><b>　　end Sub</b></p><p>　　Sub DisplayForm()</p><p>　　Dim sRowColor</p><p>　　sRowColor="#007766"</p>

124、<p>　　Response.Write("<blockquote>")</p><p>　　response.write ("<p align=center><a href=shoplogin.asp>已經(jīng)注冊(cè)過(guò)的用戶入口</a></p>")</p><p>　　if sEr

125、ror<> "" then</p><p>　　response.write "<b align=center>" & SError & "</b>"</p><p><b>　　Serror=""</b></p><

126、p><b>　　end if</b></p><p>　　Response.Write("<font color=red>" & sError & "</font><p>")</p><p>　　Response.Write("<form name=for

127、m1 method=Post action=" & Session("currenturl") & ">")</p><p>　　Response.Write("<table cellpadding=2 cellspacing=1 align=center bgcolor=#000000>")</p&g

128、t;<p>　　Response.Write("<trbgcolor="&sRowColor&"><td>姓名:</td><td><input size=50 name=strLastname value=" & Chr(34) & strLastname & Chr(34) & &

129、quot;></td></tr>")</p><p>　　Response.Write("<trbgcolor="&sRowColor&"><td>地址:</td><td><input size=50 name=strAddress value=" & Ch

130、r(34) & strAddress & Chr(34) & "></td></tr>")</p><p>　　Response.Write("<trbgcolor="&sRowColor&"><城市:</td><td><input size=50