【正文】 BigClassID 自動編號 大類 ID（主鍵） BigClassName 文本 大類名 （ 8） SmallClass_New 表的設計 ：該表用于添加 小類分類，比如添加大類考研專業(yè)課后，可以添加自動化，計算機應用技術等為小類。 如下 表 58 所示： 表 58 SmallClass_New 表的設計 字 段 名 稱 數(shù) 據(jù) 類 型 說 明 SmallClassID 自動編號 小類 ID（主鍵） SmallClassName 文本 小類名稱 BigClassName 文本 所屬大類名稱 （ 9） OrderDetail 表的設計：該表用于存儲書的詳細信息，包括Product_Id， ProductName， OrderTime 等字段。如 下 表 59 所示： 表 59 OrderDetail 表 的設計 字 段 名 稱 數(shù) 據(jù) 類 型 說 明 ID 自動編號 定單 ID（主鍵） OrderNum 文本 定單號碼 UserName 文本 用戶名 Product_Id 文本 書的編號 ProductName 文本 書的 名稱 ProductUnit 數(shù)字 單位 BuyPrice 數(shù)字 售價 OrderTime 日期 /時間 下單 日期 管理員可以在后臺管理書的分類，包括添加大小類，刪除大小類；前臺注冊用戶也可以根據(jù)圖書的大小類分類進行查詢。 數(shù)據(jù)庫中還包括 Aboutus 表， Affiche 表， Aboutus 表是關于支付方式的表，此處只設為郵寄方式； Affiche 表用來存儲公告信息的表。 后臺管理員可以添加公告，修改收銀信息（可以修改郵寄地址，聯(lián)系方式等）。要想管理和使用好第 10 頁 共 22 頁 表中的數(shù)據(jù)，就必須建立表與表之間的關系，只有這樣才能 將不同表中的相關數(shù)據(jù)連接在一起，為建立查詢打下基礎表 表與表之間的關系 ：表 BigClass，表 SmallClass 通過 字段 BigClassName（大類名稱） 和 SmallClassName（小類名稱） 與 Product 表相關聯(lián)；新添加大小類表 BigClass_New 與 SmallClass_New 通過 BigClassID（大類編號） 和SmallClassID（小類編號） 與大類表 BigClass 小類表 SmallClass 相關聯(lián)。OrderDetail 表 通過 Product_ID（書的編號） 與 Product 表相關聯(lián)， 又通過OrderNum（定單編號） 與 OrderList 表相關聯(lián)。 OrderDetail 表和 OrderList表通過 UserName（下單人姓名） 與 User 表相關聯(lián)。 數(shù)據(jù)庫的連接 數(shù)據(jù)庫系統(tǒng)往往是一個大型 WEB 應用程序的核心 。同其他 WEB 應用程序的編寫方法相比，強大的數(shù)據(jù)庫訪問能力，簡單一致的數(shù)據(jù)庫訪問方式正是 ASP的突出優(yōu)點之一。在 ASP 中，我們可以輕松的利用 Microsoft 提供的強大的 ADO技術對各種各樣的數(shù)據(jù)庫進行訪問，當然可以訪問 ACCSEE 這樣的文件型數(shù)據(jù)庫。 ADO 提供的對象接口主要為有 Connection,我們可以利用 Connection，Command,Recordset 三個對象訪問數(shù)據(jù)庫。 Connection 對象就是使 ADO 與數(shù)據(jù)庫之間建立一個通道，起到一個類似撥號連線的作用，任何對數(shù)據(jù)庫的造作必須先建立 Connection，然后才能進行。本系統(tǒng)數(shù)據(jù)庫連接代碼如下所示： % dim conn dim connstr dim db?聲明變量 db=../Databases/ 39。數(shù)據(jù)庫文件位置 on error resume next connstr=DBQ=+(amp。dbamp。)+。DefaultDir=。DRIVER={Microsoft Access Driver (*.mdb)}。?用 方法將當前目錄下的數(shù)據(jù)庫相對路徑轉(zhuǎn)換成服務器的真實路徑 set conn=()?創(chuàng)建名為 conn 的 Connection if err then else connstr?使用 open 方法打開數(shù)據(jù)庫連接 end if 第 11 頁 共 22 頁 sub CloseConn() set conn=nothing?在使用 conn 對象后應該關閉連接，釋放資源 end sub % 用戶登陸模塊的實現(xiàn) 用戶 只有通過 登錄界面才能進入主頁面進行相應的操作。 進入登錄界面：通過注冊頁面讓用戶提交注冊并保存在 user 表里，并通過登錄頁面讀取用戶提交的登錄信息與保存在數(shù)據(jù)庫中的數(shù)據(jù)進行比較以驗證是否成功登錄。 用戶登錄界面如下 圖 51 所示： 圖 51 用戶登錄界面 用戶登錄模塊主 要是 通過數(shù)據(jù)庫 連接 來實現(xiàn)。 數(shù)據(jù)庫的連接必須使用 ADO的內(nèi)置 Connection 對象，并且調(diào)用 Recordset 對象來進行與數(shù)據(jù)庫的查找、刪除、更改等功能，在數(shù)據(jù)庫中添加 User 表，用來保存用戶信息。 User ID 列，用于保存用戶名，設置為主鍵，可以標識每個用戶。 PWD 列用于保存用戶的密碼 , 用于保護用戶的 地址，當然還有其他列，可以根據(jù)自己需要添加一些保存用戶信息的列。 如果用戶還未注冊，可以點 新用戶注冊 注冊，進入注冊頁面，填寫注冊信息，提交后顯示注冊成功，進入會員中心，可以修改自己的資料 ，修改密碼 ，查詢訂單處理情況 等。注冊頁面如下圖 52 所示： 圖 52 新用戶注冊頁面 第 12 頁 共 22 頁 用戶查詢 模塊的實現(xiàn) 書的查詢：注冊會員可以根據(jù)書的 名稱，或者書的作者查找，也可以根據(jù)大小類分類查找。 查詢 效果圖如下圖 53 所示 ： 圖 53 書的查詢 按書的名稱進行查詢，比如在書的名稱中輸入 2021 考研英語，所有大類中選擇考研公共課，小類中選擇英語， 具體操作如下圖 54 所示： 圖 54 書的分類查詢 訂單 模塊的實現(xiàn) 在數(shù)據(jù)庫中添加一個名為 OrderList 的表，訂單號碼用于標識每份訂單，設為主鍵。 Name 用于存貯下單 人 ID,address 用于保存定貨人的地址， time 保存下單時間， phone 用于保存定貨人的電話， status 用于保存訂單的處理狀態(tài)，0 為未處理， 1 為已經(jīng)處理。購物車的實現(xiàn)模塊具體代碼如下： % UserName=session(UserName) 39。登陸用戶 id Receiver=(Receiver) 39。必填字段 ?從登錄頁面獲取收貨人地址 Sex=(Sex) 39。從登錄頁面獲取性別 Phone=(Phone) 39。必填字段 ?從登錄頁面獲取電話 Add=(Add) 39。必填字段 ?從登錄頁面獲取地址 Notes=(Notes) ?從登錄頁面獲取記錄 Email=(Email) ?從登錄頁面獲取郵箱 Subject=(Subject)?從登錄頁面獲取主題 第 13 頁 共 22 頁 CompanyName=(CompanyName) ?從登錄頁面獲取公司名稱 Fax=(Fax) ?從登錄頁面獲取傳真 if UserName= then UserName=游客 ?如果登錄名稱為空，則為游客 end if if Add= then Add=null end if if Fax= then Fax=null end if 39。判斷購物車是否為空 ProductList = Session(ProductList) if productlist= then ?error=007?重 新定位到 else sql_product=select * from Product where Product_Id in (amp。productlistamp。) order by Product_Id?從 productlist 表中按 Product_Id 排序來查找產(chǎn)品 Set rs_order = (sql_product)?將查詢結(jié)果賦給 rs_order end if BranchID=0022 CoNo=000040 39。交易日期，格式： YYYYMMDD yy=right(year(date),2) mm=right(00amp。month(date),2) dd=right(00amp。day(date),2) riqi=yy amp。 mm amp。 dd 39。生成訂單號所有所需元素 ,格式為：小時，分鐘，秒 xiaoshi=right(00amp。hour(time),2) fenzhong=right(00amp。minute(time),2) miao=right(00amp。second(time),2) 39。產(chǎn)生外部和內(nèi)部定單號 BillNo=xiaoshi amp。 fenzhong amp。 miao 第 14 頁 共 22 頁 inBillNo=yy amp。 mm amp。 dd amp。 amp。 xiaoshi amp。 fenzhong amp。 miao Set rsadd=()?創(chuàng)建名為 rsadd 的 recordset 對象 select * from OrderList ,conn,1,3?打開 從 OrderList 查詢返回的記錄 Set rsdetail=()?創(chuàng)建名為 rsdetail 的 recordset 對象 select * from OrderDetail ,conn,1,3?打開 從 OrderDetail 查詢返回的記錄 39。事務定義開始 39。 39。操作之一開始寫入訂單列表信息 ?使用 AddNew 方法添加記錄 rsadd(UserName)=UserName rsadd(OrderNum)=inBillNo