網(wǎng)上訂餐系統(tǒng)

課程設(shè)計(jì)課程名稱：題目名稱：學(xué)生學(xué)院：專業(yè)班級(jí)：學(xué)號(hào)：學(xué)生姓名：指導(dǎo)教師：2007年3月4日目錄1．系統(tǒng)分析31.1用戶需求31.2目標(biāo)系統(tǒng)的流程41.3目標(biāo)系統(tǒng)的數(shù)據(jù)存儲(chǔ)分析：72.系統(tǒng)設(shè)計(jì)102.1網(wǎng)站總體設(shè)計(jì)10一般關(guān)系模型設(shè)計(jì)10前臺(tái)總體結(jié)構(gòu)設(shè)計(jì)10后臺(tái)總體結(jié)構(gòu)設(shè)計(jì)112.2網(wǎng)頁詳細(xì)設(shè)計(jì)12數(shù)據(jù)庫結(jié)構(gòu)的具體設(shè)計(jì)12主頁總體布局設(shè)計(jì)12或類設(shè)計(jì)14基礎(chǔ)數(shù)據(jù)頁面設(shè)計(jì)14核心處理功能網(wǎng)頁設(shè)計(jì)153.系統(tǒng)實(shí)現(xiàn)與運(yùn)行183.1數(shù)據(jù)庫表結(jié)構(gòu)的建立與數(shù)據(jù)輸入183.2網(wǎng)站系統(tǒng)設(shè)計(jì)與測試213.3系統(tǒng)操作使用的簡要說明263.4運(yùn)行系統(tǒng)并打印出運(yùn)行結(jié)果263.5系統(tǒng)評價(jià)：29概述：本系統(tǒng)是以B/S模式設(shè)計(jì)了一個(gè)網(wǎng)上訂餐系統(tǒng)，可滿足大多數(shù)中小型的餐飲商務(wù)網(wǎng)站要求。系統(tǒng)統(tǒng)實(shí)現(xiàn)了一個(gè)完整的網(wǎng)上交易過程，系統(tǒng)結(jié)構(gòu)簡單但功能齊全,系統(tǒng)中絕大多數(shù)ASP頁都直接訪問WEB服務(wù)器的文件系統(tǒng)或數(shù)據(jù)庫服務(wù)器的數(shù)據(jù)庫系統(tǒng)，快餐添加功能中的圖片上傳采用組件訪問WEB服務(wù)器。企業(yè)中利用計(jì)算機(jī)信息化管理是不可阻擋的趨勢，也是21世紀(jì)企業(yè)取得成功關(guān)鍵的一步。餐飲系統(tǒng)的主要目標(biāo)是實(shí)現(xiàn)對餐飲內(nèi)部各種管理的電子化、自動(dòng)化、提高各個(gè)模塊的辦公效率，為高質(zhì)量餐飲服務(wù)提供保證。系統(tǒng)是以dreamweaver為前臺(tái)開發(fā)工具，以Microsoftaccess為后臺(tái)數(shù)據(jù)庫服務(wù)器，采用當(dāng)前最流行的B/S架構(gòu),利用數(shù)據(jù)庫及分布式處理技術(shù)、模塊化功能設(shè)計(jì)等。系統(tǒng)著眼于餐飲業(yè)的當(dāng)前管理與未來發(fā)展。系統(tǒng)結(jié)構(gòu)圖如下：ASP頁ASP頁上傳組件數(shù)據(jù)庫服務(wù)器WEB服務(wù)器系統(tǒng)分析1.1用戶需求：網(wǎng)上訂餐系統(tǒng)是一種具有交互功能的商業(yè)信息系統(tǒng)，它在網(wǎng)絡(luò)上建立一個(gè)虛擬的快餐商城，使得訂餐過程變得輕松、快捷、方便，同時(shí)會(huì)員也可以在網(wǎng)上免費(fèi)開一家自己的網(wǎng)上餐店，本系統(tǒng)包括了會(huì)員管理、快餐管理和訂餐車管理3種功能，另外添加了必要的系統(tǒng)管理。自從計(jì)算機(jī)應(yīng)用于管理領(lǐng)域以來，短短的30多年，發(fā)生了驚人的變化；在信息系統(tǒng)開發(fā)與應(yīng)用方面的進(jìn)展相當(dāng)神速,在餐飲業(yè)競爭越來越激烈的今天，餐飲業(yè)該如何提高服務(wù)質(zhì)量和管理能力顯得越來越重要。尤其是大型餐飲企業(yè)，企業(yè)內(nèi)部服務(wù)項(xiàng)目眾多，即要完成前臺(tái)的一般性服務(wù)工作，又要完成后臺(tái)的管理工作，前臺(tái)包括：客人點(diǎn)菜管理、收銀管理、會(huì)員管理、菜品分類管理、菜品品種管理、每日統(tǒng)計(jì)營業(yè)狀況等；后臺(tái)包括：原料的進(jìn)出、原料庫存量即時(shí)監(jiān)控、原料消耗日盤點(diǎn)、原料的損耗、人員管理、成績考核等眾多的內(nèi)容。如果沒有一套可靠的管理系統(tǒng)，單憑原始的手工操作，不僅管理效率低，而且經(jīng)常出現(xiàn)錯(cuò)誤。再加上一些未知的人為因素，不僅影響企業(yè)的經(jīng)營成本，降低利潤，還會(huì)極大的影響餐飲業(yè)的服務(wù)質(zhì)量?？尚行苑治觯簱?jù)我們調(diào)查：一些酒店、飯店采用手工點(diǎn)菜、結(jié)帳；客人就餐率為30%的時(shí)候，服務(wù)員可以應(yīng)付自如，服務(wù)員人數(shù)供過于求；當(dāng)就餐率為60%的時(shí)候，服務(wù)員顯得有些忙碌，尤其是遇到分樓層的情況，服務(wù)員需要不停地上下走動(dòng)，有點(diǎn)供不應(yīng)求；當(dāng)就餐率為90%--100%的時(shí)候，服務(wù)員就顯得過于忙碌，忙亂時(shí)常常顧此失彼，出現(xiàn)這樣那樣的錯(cuò)誤，大大影響了服務(wù)質(zhì)量；在結(jié)帳時(shí)，還會(huì)出現(xiàn)客人等待、算錯(cuò)帳、跑單的現(xiàn)象。在原料倉庫中，菜品原料數(shù)量不很確實(shí)，浪費(fèi)嚴(yán)重。因?yàn)槠髽I(yè)的營業(yè)收入就在菜品售價(jià)與原料的差額中，無論是原料管理還是收銀管理，只要其中一項(xiàng)出現(xiàn)錯(cuò)誤，就會(huì)直接影響企業(yè)的效益。利用計(jì)算機(jī)系統(tǒng)來管理店內(nèi)的所有業(yè)務(wù)，不僅速度快、效率高，而且大大提高了數(shù)據(jù)的準(zhǔn)確率。即排除了人為因素的干擾，又使各方面的數(shù)據(jù)得到嚴(yán)格控制，降低了經(jīng)營成本，增加了企業(yè)效益，大大提高了餐飲業(yè)務(wù)辦公的自動(dòng)化程度。無形中就提高了工作效率和企業(yè)的管理水平，使企業(yè)贏得了時(shí)間，贏得了客戶，贏得了效益。這才符合現(xiàn)代化企業(yè)管理的要求。使企業(yè)全面提升了一個(gè)檔次。所以，餐飲企業(yè)使用計(jì)算機(jī)系統(tǒng)來管理各種業(yè)務(wù)是當(dāng)今社會(huì)的一個(gè)必然發(fā)展趨勢。計(jì)算機(jī)還可以實(shí)現(xiàn)數(shù)據(jù)遠(yuǎn)程傳輸，您只要輕輕一擊鼠標(biāo)，即可對整個(gè)企業(yè)的運(yùn)營狀況了如支撐。1.2目標(biāo)系統(tǒng)的流程所選業(yè)務(wù)相關(guān)的組織機(jī)構(gòu)圖：說明：本站是提供免費(fèi)為會(huì)員開店的多店方案快餐系統(tǒng)，特點(diǎn)是店鋪可分布在不同地區(qū)，甚至是不同城市,系統(tǒng)管理員審核通過的店主可掌管理各店鋪的經(jīng)營狀態(tài),包括快餐管理，訂單管理，留言管理等等。注冊會(huì)員可根據(jù)實(shí)際需要在不同店鋪都可以訂餐。各分店運(yùn)用同一套系統(tǒng)，進(jìn)行各自的管理，單獨(dú)核算。前臺(tái)客戶登陸數(shù)據(jù)流程圖：后臺(tái)管理數(shù)據(jù)流程圖：畫出網(wǎng)上訂餐系統(tǒng)圖T圖T：網(wǎng)上訂餐系統(tǒng)根據(jù)功能－數(shù)據(jù)（P-D）分析法，敘述分析過程并畫出U/C矩陣如下：數(shù)據(jù)資料過程購買訂單客戶檔案未注冊用戶注冊用戶錯(cuò)誤單據(jù)正確單據(jù)錯(cuò)誤通知單庫存檔案缺貨通知單購買單配送單錯(cuò)誤單據(jù)正確單據(jù)發(fā)貨單庫存臺(tái)帳發(fā)票收據(jù)購買商品U1審核客戶UCCCC拒絕購買UUC審核單據(jù)CCUC拒絕購買UC審核庫存UUCCU2登記購買UC生產(chǎn)配送單UCUCC審核單據(jù)UCC生成發(fā)貨單UC3修改庫存信息UC發(fā)貨配送UC畫出網(wǎng)上訂餐系統(tǒng)0層圖圖0：網(wǎng)上訂餐系統(tǒng)1.3目標(biāo)系統(tǒng)的數(shù)據(jù)存儲(chǔ)分析：從設(shè)計(jì)E-R圖的基本原則：原則1：能獨(dú)立存在的事物，例如人、物、事、地、團(tuán)體、機(jī)構(gòu)、活動(dòng)、事項(xiàng)等等，在其有多個(gè)由基本項(xiàng)描述的特征需要被關(guān)注時(shí)，就應(yīng)把它作為實(shí)體。原則2：兩個(gè)或多個(gè)實(shí)體間的關(guān)聯(lián)與結(jié)合，如主管、從屬、組成、占有、作用、配合、協(xié)同等等當(dāng)需要予以關(guān)注時(shí)，應(yīng)作為聯(lián)系。聯(lián)系通常是某類行為動(dòng)作，ERD中關(guān)注的是其狀態(tài)與結(jié)果而非其過程。原則3：實(shí)體的屬性是實(shí)體的本質(zhì)特征。實(shí)體應(yīng)有標(biāo)識(shí)屬性（能把不同個(gè)體區(qū)分開來的屬性組），并指定其中一個(gè)作為主標(biāo)識(shí)。聯(lián)系的屬性是聯(lián)系的結(jié)果或狀態(tài)。屬性具有如下幾個(gè)特點(diǎn)：a.非多值性；b.非復(fù)合性；c.非導(dǎo)出性。而實(shí)體的屬性還應(yīng)有非關(guān)聯(lián)性。原則4（一事一地原則）：所有基本項(xiàng)在同一E-R圖中作為屬性要在且僅在一個(gè)地方出現(xiàn)。畫出ERD系統(tǒng)管理員系統(tǒng)管理員管理員密碼管理員賬號(hào)管理員密碼管理員賬號(hào)編號(hào)系統(tǒng)管理員E-R圖用戶（包括掌柜）用戶（包括掌柜）聯(lián)系……聯(lián)系………用戶密碼用戶賬號(hào)用戶編號(hào)用戶信息表E-R圖快餐信息表快餐信息表快餐大類……快餐大類………快餐名稱用戶編號(hào)快餐編號(hào)快餐信息表E-R圖訂單信息表訂單信息表用戶姓名……用戶姓名………用戶賬號(hào)用戶編號(hào)訂單編號(hào)訂單信息表E-R圖系統(tǒng)信息表系統(tǒng)信息表網(wǎng)站LOGO地址……網(wǎng)站LOGO地址………網(wǎng)站地址網(wǎng)站名稱編號(hào)系統(tǒng)信息表E-R圖留言表留言表用戶頭像……用戶頭像………用戶賬號(hào)用戶編號(hào)留言ID留言表E-R圖總體的E-R圖根據(jù)從E-R圖導(dǎo)出一般關(guān)系模型的4個(gè)原則：原則1：E-R圖中的每一個(gè)獨(dú)立實(shí)體變換為一個(gè)關(guān)系，其屬性變?yōu)殛P(guān)系的屬性，其主標(biāo)識(shí)變?yōu)殛P(guān)系的主碼。原則2：E-R圖中的從實(shí)體及相應(yīng)的“的”聯(lián)系變換為一個(gè)關(guān)系，從實(shí)體的屬性加上主實(shí)體關(guān)系的主碼構(gòu)成這個(gè)關(guān)系的屬性。如果“的”聯(lián)系是1：1的，則以主實(shí)體關(guān)系的主碼加上同一主實(shí)體個(gè)體聯(lián)系的不同從屬實(shí)體個(gè)體賴以相互區(qū)分的屬性組，組成該關(guān)系的主碼。原則3：M聯(lián)系通過在“多”實(shí)體關(guān)系中增加相聯(lián)系的“1”實(shí)體關(guān)系的主碼及聯(lián)系本身的屬性來表達(dá)。其中“1”實(shí)體主碼為外來碼。原則4：M：M聯(lián)系轉(zhuǎn)換成一個(gè)獨(dú)立的關(guān)系，被聯(lián)系實(shí)體關(guān)系的主碼（作為外來碼）和聯(lián)系本身的屬性作為該關(guān)系的屬性，被聯(lián)系實(shí)體關(guān)系的主碼組成其復(fù)合主碼。=5\*GB3⑤整理伴隨著DFD的繪制畫出的功能層次圖（FHD），得到新系統(tǒng)的FHD。系統(tǒng)功能模塊圖(會(huì)員管理模塊、在線訂餐模塊和系統(tǒng)管理模塊)會(huì)員管理模塊用戶注冊用戶審核會(huì)員管理模塊用戶注冊用戶審核用戶登錄驗(yàn)證在線訂餐模塊快餐查找訂餐車管理訂單查詢系統(tǒng)管理模塊快餐信息管理交易信息管理系統(tǒng)信息管理根據(jù)這些功能，設(shè)計(jì)出系統(tǒng)的功能層次，如下圖快餐管理訂單管理留言管理會(huì)員管理系統(tǒng)管理瀏覽快餐MF網(wǎng)上訂餐系統(tǒng)快餐管理訂單管理留言管理會(huì)員管理系統(tǒng)管理瀏覽快餐MF網(wǎng)上訂餐系統(tǒng)搜索快餐搜索快餐前臺(tái)管理后臺(tái)管理前臺(tái)管理后臺(tái)管理用戶注冊用戶注冊在線訂餐在線訂餐瀏覽新聞瀏覽新聞?dòng)脩艄芾砉δ苣K系統(tǒng)用戶信息管理系統(tǒng)用戶信息管理創(chuàng)建修改刪除店主信息創(chuàng)建修改刪除店主信息系統(tǒng)管理員系統(tǒng)管理員修改刪除用戶信息修改刪除用戶信息管理系統(tǒng)信息管理系統(tǒng)信息修改自身密碼修改自身密碼管理店鋪站務(wù)信息管理店鋪站務(wù)信息店主店主修改自身密碼修改自身密碼創(chuàng)建修改自身信息信息創(chuàng)建修改自身信息信息會(huì)員創(chuàng)建修改個(gè)人資料會(huì)員創(chuàng)建修改個(gè)人資料查看訂單留言信息等信息查看訂單留言信息等信息2.系統(tǒng)設(shè)計(jì)2.1網(wǎng)站總體設(shè)計(jì)2.1.1一般關(guān)系模型設(shè)計(jì)用戶編號(hào)用戶編號(hào)用戶編號(hào)用戶編號(hào)2.1.2前臺(tái)總體結(jié)構(gòu)設(shè)計(jì)：2.1.3后臺(tái)總體結(jié)構(gòu)設(shè)計(jì)：2.2網(wǎng)頁詳細(xì)設(shè)計(jì)2.2.1數(shù)據(jù)庫結(jié)構(gòu)的具體設(shè)計(jì)：a.用戶信息：用戶編號(hào)、用戶賬號(hào)、密碼、姓名、性別、QQ號(hào)碼、、EMAIL、收餐地址、注冊時(shí)間等b.快餐信息：快餐編號(hào)、快餐ID、快餐名、所屬大類、所屬小類、快餐介紹、市場價(jià)、會(huì)員價(jià)和加入時(shí)間等c.訂單信息：訂單ID、用戶賬號(hào)、姓名、QQ號(hào)碼、、收餐地址和付款方式等2.2.2主頁總體布局設(shè)計(jì)：前臺(tái)主頁面布局：亮麗快餐網(wǎng)主頁面設(shè)計(jì)獨(dú)特而引人入目，不僅在主菜單上面提供了最新快餐，購物車，客戶留言和關(guān)于本站信息，而且還在頁面一角提供了新品推薦供顧客瀏覽和了解。除此之外，還提供了大量可供查看的快餐供顧客能立即定購。顧客還可以通過用戶注冊而成為網(wǎng)站的會(huì)員，注冊成會(huì)員后，顧客就可以通過查詢自己想要訂購的快餐來進(jìn)行網(wǎng)上定購，整個(gè)過程非常方便。顧客能夠享受到優(yōu)質(zhì)的服務(wù)質(zhì)量。主頁面：后臺(tái)管理布局：后臺(tái)主要有用戶管理，快餐管理，站務(wù)管理，退出系統(tǒng)和系統(tǒng)信息等幾個(gè)模塊，用戶管理里面包括添加管理員，管理員審核兩個(gè)功能；快餐管理包括管理快餐，添加快餐，添加大類，添加小類等4個(gè)功能；站務(wù)管理包括會(huì)員管理，客戶訂單處理，客戶訂單查看和管理客戶留有等4個(gè)功能；后臺(tái)登陸頁面：后臺(tái)管理系統(tǒng)頁面：2.2.3JavaBeans或類設(shè)計(jì)：我們可以把可重用的代碼部分（如數(shù)據(jù)庫的連接）和頁面邏輯部分寫入JavaBean中，還可以通過使用JavaBean來減少在Jsp頁面中腳本語言的使用率，這樣可以使得Jsp頁面更簡潔、更容易維護(hù)、更容易被非編程人員接受。在開發(fā)過程中經(jīng)常需要對數(shù)據(jù)庫操作，這就需要連接數(shù)據(jù)庫和操作數(shù)據(jù)庫（包括數(shù)據(jù)的插入、更新、刪除和查詢等），因此將連接數(shù)據(jù)庫和操作數(shù)據(jù)庫的代碼寫成了一個(gè)JavaBean：connDB.java。具體代碼請查看網(wǎng)站目錄下\WEB-INF\classes\beans的connDB.java文件。在開發(fā)過程中經(jīng)常需要考慮中文亂碼問題、過濾一些特殊字符（如空格與Null值等）和顯示文本中的回車換行、空格。此功能通常都需要編寫成一個(gè)獨(dú)立的JavaBean：chStr.java完成，具體代碼請查看網(wǎng)站目錄下\WEB-INF\classes\beans的chStr.java文件。在購物車中程序需要使用一個(gè)foodelement對象保存所選食物信息，生成該對象的JavaBean：bookelement.java。具體代碼請查看網(wǎng)站目錄下\WEB-INF\classes\beans的bookelement.java文件。2.2.4基礎(chǔ)數(shù)據(jù)頁面設(shè)計(jì)：例如對客戶的信息刪除頁面如下：如果要?jiǎng)h除掉賬號(hào)為1234，姓名為li的客戶，直接點(diǎn)擊操作中的刪除鈕，就可以把該客戶注冊信息刪除掉，出現(xiàn)刪除后的頁面如下，這是記錄中就減少了一條數(shù)據(jù)。如圖：2.2.5核心處理功能網(wǎng)頁設(shè)計(jì)：例1：購物車網(wǎng)頁設(shè)計(jì)：當(dāng)你在主頁面中點(diǎn)擊了一下三種快餐的訂購后，在查看購物車欄里就出現(xiàn)以下頁面：訂購?fù)旰筮x擇“去收銀臺(tái)”付賬，出現(xiàn)下圖：點(diǎn)擊下一步，出現(xiàn)訂單信息框，如下：出現(xiàn)確認(rèn)信息如下圖：點(diǎn)擊提交訂單，出現(xiàn)訂單成功框，并記下你的訂單號(hào)，如下：例2：客戶留言網(wǎng)頁設(shè)計(jì)：點(diǎn)擊客戶留言后，你就可以在網(wǎng)頁上面留下你對本網(wǎng)站服務(wù)或者快餐質(zhì)量的各種意見，點(diǎn)擊右邊的“簽寫新留言”就出現(xiàn)一下頁面：填寫留言信息后，如下圖：點(diǎn)擊“提交留言”后，出現(xiàn)提交成功對話框：在主頁面的客戶留言中就可以瀏覽到自己的留言信息，如下圖：3.系統(tǒng)實(shí)現(xiàn)與運(yùn)行3.1數(shù)據(jù)庫表結(jié)構(gòu)的建立與數(shù)據(jù)輸入：數(shù)據(jù)庫邏輯設(shè)計(jì)：圖1：系統(tǒng)管理員圖2：用戶信息表圖3：快餐信息表圖4：快餐大類圖5：快餐小類圖6：訂單信息表圖7：系統(tǒng)信息表圖8：留言表圖9：快餐新聞表3.2網(wǎng)站系統(tǒng)設(shè)計(jì)與測試：會(huì)員管理模塊(包含以下幾個(gè)子模塊,會(huì)員注冊、會(huì)員審核、用戶登錄驗(yàn)證）reguser.asp頁面代碼functionFORM1_onsubmit()//通過returnFORM1_onsubmit()來判斷用戶輸入是否合法;{ if(chkitem(document.FORM1.uid.value)==0) { alert("請輸入正確的會(huì)員帳號(hào)。"); document.FORM1.uid.focus(); returnfalse;……}</SCRIPT><FORMlanguage=javascriptname=FORM1onsubmit="returnFORM1_onsubmit()"action=reguser2.aspmethod=post>//將uid的值送入reguser2頁面?！?lt;INPUTmaxLength=16size=12name=uid></tr>……………<INPUTclass=maintype=submitsize=3value=立刻注冊name=Submit22style="border:1pxdottedgray;">……………</FORM>reguser2.asp頁面代碼<%@LANGUAGE="VBSCRIPT"%><!--#includefile="conn.asp"-->//引用數(shù)據(jù)庫連接對象文件<%setrs=server.createobject("adodb.recordset")//創(chuàng)建一個(gè)記錄集對象sqltext="select*fromRegUserwhereUserId='"&request.form("uid")&"'"http://執(zhí)行查詢操作，查找是否用戶輸入的名稱己存在；rs.opensqltext,conn,1,1//打開記錄集對象'查找數(shù)據(jù)庫，檢查用戶名是否已經(jīng)注冊過ifrs.recordcount>=1thenifrs("userid")=request.form("uid")thenResponse.Redirect"loginsb.asp?msg=此用戶名已經(jīng)注冊過，請選用其他用戶名!"response.endrs.closeendifendif%>reguser3.asp頁面代碼如果會(huì)員庫中不存大此用戶名，剛同意注冊，以下是執(zhí)行添加新用戶操作<%setrs=server.createobject("adodb.recordset")sqltext="select*fromRegUser"rs.opensqltext,conn,3,3'添加一個(gè)用戶到數(shù)據(jù)庫rs.addnewrs("UserId")=request.form("uid")rs("PassWD")=request.form("pwd")rs("WtPass")=request.form("question")rs("DaPass")=request.form("answer")rs("Name")=request.form("Name")rs("Sex")=request.form("Sex")rs("Email")=request.form("Email")rs("Phone")=request.form("usephone")rs("Address")=request.form("haddr")rs("qq")=request.form("qq")rs.update…………%>user_check.asp為管理員對用戶信息進(jìn)行操作<!--#includefile="conn.asp"--><%setrs=server.createobject("adodb.recordset")sqltext="select*fromRegUser"rs.opensqltext,conn,1,1dimMaxPerPageMaxPerPage=20//每頁顯示20條記錄'假如沒有數(shù)據(jù)時(shí)Ifrs.eofandrs.bofthencallshowpagesresponse.write"<palign='center'><fontcolor='#ff0000'>還沒任何用戶資料</font></p>"response.endEndif'取得頁數(shù),并判斷用戶輸入的是否數(shù)字類型的數(shù)據(jù)，如不是將以第一頁顯示dimtext,checkpagetext="0123456789"Rs.PageSize=MaxPerPagefori=1tolen(request("page"))checkpage=instr(1,text,mid(request("page"),i,1))ifcheckpage=0thenexitforendifnext‘分頁顯示模塊Ifcheckpage<>0thenIfNOTIsEmpty(request("page"))ThenCurrentPage=Cint(request("page"))IfCurrentPage<1ThenCurrentPage=1IfCurrentPage>Rs.PageCountThenCurrentPage=Rs.PageCountElseCurrentPage=1EndIfIfnotRs.eofThenRs.AbsolutePage=CurrentPageendifElseCurrentPage=1EndifcallshowpagescalllistIfRs.recordcount>MaxPerPagethencallshowpagesendifSublist()%>'顯示帖子的子程序……………<%ifnotrs.eoftheni=0dowhilenotrs.eof%><trclass=main1>………<tdwidth="15%"align="center"height="25"><%response.write"<ahref='user_detail.asp?ID="&rs("Id")&"&page="&CurrentPage&"'><fontcolor=#0000FF>詳細(xì)資料</font></a>"%></td>//傳遞用戶編號(hào)到user_detail.asp查看相應(yīng)的用戶信息<tdwidth="14%"align="center"height="25"><%response.write"<ahref='javascript:confirmdel("&rs("Id")&","&CurrentPage&")'><fontcolor=#0000FF>刪除</font></a>"%></td></tr>//執(zhí)行刪除用戶操作，通過confirmdel函數(shù)確定用戶是否執(zhí)行操作，是不話則通過傳遞用戶編號(hào)到DEL_USER.ASP文件去執(zhí)行刪除用戶命令<%i=i+1ifi>=MaxPerpagethenexitdors.movenextloopendif%>……<%Endsubrs.close‘關(guān)閉記錄集對象conn.close‘關(guān)閉數(shù)據(jù)庫連接%>………subshowpages()%>'顯示翻頁的子程序<%endsub%>orderloginsb.asp驗(yàn)證用戶登錄<%Name=Request.form("uid")//接收送來的用戶名Pwd=Request.form("pwd")//接收表單密碼setRs=Server.CreateObject("ADODB.recordset")//建立記錄集對象sql="select*fromRegUserwhereUserId='"&Name&"'andPassWD='"&Pwd&"'"rs.opensql,conn,1,1//根據(jù)用戶名和密碼查找表RegUserIFrs.RecordCount>=1then//如果存在 Session("LoginSuccess")=rs("UserId")//利用SESSION保存用戶信息 Session("regtime")=rs("RegTime")response.redirect"index.asp"http://轉(zhuǎn)到首頁else//否則提示出錯(cuò) response.Write("<scriptlanguage='javascript'>alert('請輸入正確帳號(hào)和密碼！');history.go(-1);</script>")Endifrs.close//關(guān)閉記