【正文】 本系統(tǒng)采用C/S模式，由VB實(shí)現(xiàn)的管理信息系統(tǒng)（Management Information System），與數(shù)據(jù)庫(kù)服務(wù)器相連。2. 數(shù)據(jù)庫(kù)處理事務(wù)失敗自動(dòng)回滾技術(shù)，保證數(shù)據(jù)庫(kù)表的數(shù)據(jù)一致性和完整性。4. 各個(gè)子系統(tǒng)的操作監(jiān)控，異常情況報(bào)告；并提供報(bào)表等跟蹤記錄。五、詳細(xì)設(shè)計(jì)說(shuō)明書 引言當(dāng)今社會(huì),隨著計(jì)算機(jī)的應(yīng)用和Internet的普及, Internet網(wǎng)絡(luò)給人類社會(huì)帶來(lái)了巨大變化,網(wǎng)絡(luò)在我們的生活中幾乎無(wú)處不在。網(wǎng)上書店系統(tǒng)可以實(shí)現(xiàn)人們遠(yuǎn)程逛書店、了解相應(yīng)圖書信息和購(gòu)買圖書的愿望?；竟δ馨ㄓ脩糇?cè)、會(huì)員登錄、圖書查詢、新書介紹、網(wǎng)上購(gòu)書以及后臺(tái)管理等。 定義MIS：（Management Information System）管理信息系統(tǒng)的英文縮寫。 算法 數(shù)據(jù)庫(kù)操作：SQL語(yǔ)言操作 報(bào)表操作：使用VB的報(bào)表生成程序存儲(chǔ)分配根據(jù)需要，說(shuō)明本程序的存儲(chǔ)分配。因此,建立網(wǎng)上電子書店的銷售管理系統(tǒng)是時(shí)代的潮流。要求系統(tǒng)實(shí)現(xiàn)的功能是實(shí)現(xiàn)網(wǎng)上購(gòu)書。本系統(tǒng)就是針對(duì)這方面的迫切需求而設(shè)計(jì)實(shí)現(xiàn)的。項(xiàng)目名稱：網(wǎng)上書店管理系統(tǒng)項(xiàng)目委托單位：軟件開發(fā)單位： MIS：（Management Information System）管理信息系統(tǒng)的英文縮寫。 部分實(shí)現(xiàn)時(shí)的數(shù)據(jù)庫(kù)設(shè)計(jì)1 “table4”表格：（管理員、用戶表格）Iden、用戶名、密碼、身份2 “table1”表格：（圖書信息表格）編號(hào)、圖書名、作者、出版社、價(jià)格、類型、簡(jiǎn)介、原價(jià)、會(huì)員價(jià)、svip價(jià)3 “shop”表格：（圖書所在店鋪表格）序號(hào)、書店名。輸入正確密碼即可進(jìn)入本系統(tǒng)。server=(local)。 amp。 39。 amp。 39。Load frm_main39。其中添加修改刪除操作，普通權(quán)限用戶無(wú)法進(jìn)行操作。添加圖書信息。ConnectString = Provider=。 amp。Persist Security Info=FalseConnectString = driver={sql server}。database=bookshop ConnectStringSet Rst = New sql = select * from TABLE1 sql, Cnn, adOpenKeyset, adLockOptimisticEnd SubPrivate Sub Text6_Change()End Sub。If Not Then = (編號(hào)) = (書名) = (新舊) = (出版日期) = (所在書店) = (原價(jià)) = (會(huì)員價(jià)) = (svip價(jià))39。If Not Then = (編號(hào)) = (書名) = (新舊) = (出版日期) = (所在書店) = (原價(jià)) = (會(huì)員價(jià)) = (svip價(jià))39。ConnectString = Provider=。 amp。Persist Security Info=FalseConnectString = driver={sql server}。database=bookshop ConnectStringSet Rst = New sql = select * from TABLE1 sql, Cnn, adOpenKeyset, adLockOptimistic = (編號(hào)) = (書名) = (新舊) = (出版日期) = (所在書店) = (原價(jià)) = (會(huì)員價(jià)) = (svip價(jià))End Sub。If Not Then = (編號(hào)) = (書名) = (新舊) = (出版日期) = (所在書店) = (原價(jià)) = (會(huì)員價(jià)) = (svip價(jià))39。If Not Then = (編號(hào)) = (書名) = (新舊) = (出版日期) = (所在書店) = (原價(jià)) = (會(huì)員價(jià)) = (svip價(jià))39。ConnectString = Provider=。 amp。Persist Security Info=FalseConnectString = driver={sql server}。database=bookshop ConnectStringSet Rst = New sql = select * from TABLE1 sql, Cnn, adOpenKeyset, adLockOptimistic = (編號(hào)) = (書名) = (新舊) = (出版日期) = (所在書店) = (原價(jià)) = (會(huì)員價(jià)) = (svip價(jià))End SubPrivate Sub Text6_Change()End Sub。Dim selstyle As IntegerPrivate Con As Private rs As Private Const constr = driver={sql server}。database=bookshopPrivate Sub Command1_Click()Dim sql, msgstring As String = False = False = False = False = False = FalseSelect Case selstyleCase 1:sql = select * from TABLE1 where 書名 like 39。 amp。Case 2:sql = select * from TABLE1 where 出版日期=39。 amp。End SelectSet Con = New With Con.ConnectionString = constr.OpenEnd WithSet rs = New sql, Con, adOpenKeyset, adLockOptimisticSet = rs = True = TrueEnd SubPrivate Sub Form_Load() = False = False = False = False = False = False = False = True = FalseEnd SubPrivate Sub Option1_Click() = True = True = False = False = True = False = Falseselstyle = 1End SubPrivate Sub Option2_Click() = False = False = True = True = False = Falseselstyle = 2End Sub，為用戶輸出所有書店的書籍信息。server=(local)。但需要安裝SQL server數(shù)據(jù)庫(kù)，才能運(yùn)行程序。軟件接口系統(tǒng)包括網(wǎng)上購(gòu)書、書籍查詢、會(huì)員登錄、用戶注冊(cè)、查看訂單、后臺(tái)管理這些模塊之間的接口。故障處理 當(dāng)系統(tǒng)遇到問(wèn)題時(shí)，首先查看運(yùn)行環(huán)境是否更該；如更改，只需修復(fù)運(yùn)行環(huán)境即可，若未更改，查看系統(tǒng)中各功能模塊之間的接口是否有問(wèn)題，可通過(guò)調(diào)試改正錯(cuò)誤。學(xué)習(xí)好幫手寧可累死在路上，也不能閑死在家里！寧可去碰壁，也不能面壁。什么是奮斗？奮斗就是每天很難，可一年一年卻越來(lái)越容易。能干的人，不在情緒上計(jì)較，只在做事上認(rèn)真；無(wú)能的人！不在做事上認(rèn)真，只在情緒上