【正文】 name=button2 type=button onclick=(7,1) value=打印預(yù)覽 //span/p圖39 打印商品收據(jù)數(shù)據(jù)報(bào)表模塊包括制定銷(xiāo)售報(bào)表，進(jìn)貨報(bào)表，退貨報(bào)表和庫(kù)存報(bào)表，這四種報(bào)表實(shí)現(xiàn)類(lèi)似，所以這里就只選銷(xiāo)售報(bào)表來(lái)說(shuō)明。銷(xiāo)售報(bào)表是以銷(xiāo)售時(shí)間段來(lái)制定報(bào)表，包括這個(gè)時(shí)間段內(nèi)各種商品銷(xiāo)售的明細(xì)信息，可為商場(chǎng)管理者提供商場(chǎng)銷(xiāo)售業(yè)績(jī)的參考，如圖310所示。 圖310 商品銷(xiāo)售報(bào)表生成結(jié)果報(bào)表生成的實(shí)現(xiàn)代碼是：date1 =y1amp。amp。m1amp。amp。d139。起始日期date2 =y2amp。amp。m2amp。amp。d2 39。終止日期set rs = ()sql=select * from Xiaoshoudan inner join Spcangku on amp。_ = where between amp。_ 39。amp。date1amp。39。and39。amp。date2amp。39。 Order by desc sql,conn,0,2,1 在相應(yīng)的字段中嵌入代碼。如銷(xiāo)售單號(hào)中嵌入%=rs(xsdanhao)%，其它字段也類(lèi)似，在此省略。銷(xiāo)售利潤(rùn)的計(jì)算代碼：dim lrheji,lrzongji,shuliang,heji lrzongji=0 39。初始利潤(rùn)總計(jì) shuliang=0 39。初始銷(xiāo)售數(shù)量總計(jì)heji=0 39。初始銷(xiāo)售金額合計(jì) if or then exit forxsheji=rs(xsheji) 39。商品銷(xiāo)售合計(jì)xsshuliang=rs(xsshuliang) 39。商品銷(xiāo)售數(shù)量 lrheji=rs(xsshuliang)*(rs(xsjiage)rs(jiage)) 39。商品銷(xiāo)售利潤(rùn)合計(jì)lrzongji=lrzongji+lrheji 39。累積每件商品的利潤(rùn)合計(jì)成利潤(rùn)總計(jì)shuliang=shuliang+xsshuliangheji=heji+xsheji…… 39。在利潤(rùn)字段中嵌入代碼%=lrheji% next 用戶密碼設(shè)置用戶密碼設(shè)置可以修改當(dāng)前登錄用戶的密碼，而且每個(gè)用戶的初始密碼都是1234，所以建議用戶及時(shí)修改自己的密碼。密碼修改算法是首選判斷登錄名是否正確，然后判斷舊密碼是否正確，再判斷兩次輸入的新密碼是否一致，如果都通過(guò)則修改成功，否則修改失敗。用戶名和舊密碼的驗(yàn)證是通過(guò)兩個(gè)函數(shù)來(lái)實(shí)現(xiàn)的，其代碼是：%Function CheckID(ID) 39。檢查用戶名是否已存在 set rs=() sql = Select * From users Where LoginId=39。 amp。 ID amp。 39。 sql,Conn If Then CheckID = True39。不存在 Else CheckID = False39。存在 End IfEnd Function%%Function CheckPwd( ID, Pwd1 )39。驗(yàn)證帳號(hào)，密碼是否正確set rs=()sql = Select * From users Where LoginId=39。amp。IDamp。39。 And Pwd = 39。amp。Pwd1amp。39。 sql,Conn If Then CheckPwd = False39。否 Else CheckPwd = True39。是 End IfEnd Function%密碼修改的完整代碼如下：%ID = Request(ID)Pwd= Request(Pwd)Pwd1= Request(Pwd1)Pwd2= Request(Pwd2)if pwd1=pwd2 thenIf CheckID(ID) Then scriptalert(該用戶名稱不存在! )。 =。/script ElseIf ID = Or Pwd = Or Pwd1 = Or Pwd2= Then scriptalert(請(qǐng)輸入您的完整資料! )。 =。/script ElseIf Not CheckPwd( ID, Pwd ) Thenscriptalert(你的原密碼錯(cuò)誤,請(qǐng)重新輸入您的原始密碼! )。 =。/script Else set rs=() sql=update users set Pwd=39。amp。Pwd1amp。39。 where LoginId=39。amp。IDamp。39。 sql,Conn scriptalert(修改成功! )。 =。/script End Ifelse scriptalert(兩次密碼輸入不一致,請(qǐng)重修輸入! )。 =。/scriptend if call endconn()% 用戶權(quán)限設(shè)置用戶權(quán)限設(shè)置是系統(tǒng)管理員根據(jù)不同的管理用戶所要使用的功能來(lái)授予相應(yīng)的權(quán)限，用戶管理員（admin）為最高權(quán)限，不需要修改。系統(tǒng)初始建立的用戶沒(méi)有任何權(quán)限，必須由系統(tǒng)管理員來(lái)授予相應(yīng)的權(quán)限，當(dāng)然也可以隨時(shí)修改用戶的權(quán)限。由于考慮到權(quán)限授予的靈活性，所以沒(méi)用使用角色來(lái)統(tǒng)一分配權(quán)限。用戶權(quán)限修改的實(shí)現(xiàn)代碼就是將具體權(quán)限更新到用戶權(quán)限表（Quanxian）中,使用SQL中UPDATE命令即可實(shí)現(xiàn)，詳細(xì)代碼在此省略。 賬套備份賬套備份可將整個(gè)數(shù)據(jù)庫(kù)進(jìn)行備份，以防數(shù)據(jù)丟失時(shí)可及時(shí)進(jìn)行數(shù)據(jù)還原。其實(shí)現(xiàn)代碼是：set rck=() sql=backup database amp。bfname amp。 to disk=39。amp。bfpathamp。39。 with init sql,Conn 39。保存?zhèn)浞菸募et rck=nothingset rck=() sql=insert into Beifen (bfname,bfpath,bfdate) values(39。amp。bfname amp。39。,amp。_39。amp。bfpathamp。39。,39。amp。bfdateamp。39。) sql,Conn 39。寫(xiě)入備份記錄 賬套還原賬套還原是將備份的數(shù)據(jù)庫(kù)進(jìn)行還原，賬套還原界面包括賬套還原和賬套刪除。賬套還原的實(shí)現(xiàn)代碼是：rck=() sql=restore database amp。bfname amp。 from disk=39。amp。bfpathamp。39。 sql,conset rck=nothing賬套刪除的實(shí)現(xiàn)代碼是：id=Trim(Request(id)) bfpath=Trim(Request(path)) set rck=() sql=delete from Beifen where id=39。amp。id amp。39。 sql,Conn 39。刪除備份記錄dim objFSOset objFSO=()if (bfpath) then bfpath 39。刪除備份文件else …… 39。報(bào)錯(cuò)處理end ifset objFSO=nothing 數(shù)據(jù)清空數(shù)據(jù)清空是將數(shù)據(jù)庫(kù)所有表的記錄清空，所以清空時(shí)要謹(jǐn)慎，而且要先備份，以防萬(wàn)一。數(shù)據(jù)清空后系統(tǒng)管理員的登陸名為admin ，密碼為1234。數(shù)據(jù)清空的實(shí)現(xiàn)代碼是：try=Trim(Request(try)) if try =1 then 39。確定進(jìn)行數(shù)據(jù)清空操作 set rst=() sql=truncate table Users sql,Conn sql=truncate table Shangpin sql,Conn …… 39。其它表清空代碼省略sql=insert into Users (gonghao,name,LoginId,Pwd) values(39。000139。,39。系統(tǒng)管amp。_理員39。,39。admin39。,39。123439。) 39。插入系統(tǒng)管理員賬號(hào)密碼 sql,Conn sql=insert into Quanxian values (39。000139。,39。系統(tǒng)管理員39。,39。admin39。,1,1,1,1,amp。_ 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1) sql,Conn 39。插入系統(tǒng)管理員使用權(quán)限，為最高權(quán)限 else... 39。報(bào)錯(cuò)處理end if4 特殊問(wèn)題解決方案 用戶使用權(quán)限的控制由于考慮到用戶擁有權(quán)限的靈活性，沒(méi)有使用角色對(duì)用戶權(quán)限進(jìn)行分類(lèi)管理，所以在不同用戶登錄時(shí)對(duì)用戶權(quán)限的驗(yàn)證就會(huì)比較困難。本系統(tǒng)在用戶登錄時(shí)使用一個(gè)叫LoginArray的數(shù)組全局變量來(lái)記錄登錄用戶的權(quán)限，用戶對(duì)系統(tǒng)的每一模塊的使用權(quán)限可簡(jiǎn)單的用0和1來(lái)約束。1表示用戶擁有該模塊的權(quán)限，0表示用戶沒(méi)有該模塊的權(quán)限，這些數(shù)據(jù)均記錄在Quanxian表中，在用戶登錄系統(tǒng)時(shí)從Quanxian表中讀取數(shù)據(jù)并以數(shù)組的方式記錄在LoginArray變量中。其實(shí)現(xiàn)的關(guān)鍵代碼是：sql=select * from Quanxian where gonghao=39。amp。gonghaoIDamp。39。 sql,conn,1,3 if not () then LoginArray= () Session(LoginArray)=LoginArray 39。用數(shù)組方式保存員工操作權(quán)限else scriptalert(權(quán)限讀取錯(cuò)誤!)。 =。/script end if 在用戶成功登錄系統(tǒng)后，系統(tǒng)會(huì)將LoginArray變量傳遞給LimitArray變量保存，代碼如下：LimitArray=Session(LoginArray) 39。登錄用戶管理權(quán)限數(shù)組在訪問(wèn)每一模塊時(shí)系統(tǒng)都會(huì)先判斷當(dāng)前用戶是否具有訪問(wèn)權(quán)限，如果擁有該模塊的訪問(wèn)權(quán)限則鏈接到相應(yīng)頁(yè)面，如果沒(méi)有則提示訪問(wèn)錯(cuò)誤。實(shí)現(xiàn)的關(guān)鍵代碼如下：onClick==39。%if LimitArray(4,0)=1 then% shangpin/ %else XiTong/ end if %39。 其中用onClick事件來(lái)打開(kāi)相應(yīng)的頁(yè)面，LimitArray(4,0)表示的是在Quanxian表中第四個(gè)字段的值，即代表“商品詳情”的訪問(wèn)權(quán)限，如果為1就打開(kāi)相應(yīng)的頁(yè)面， 頁(yè)面報(bào)錯(cuò)。其它模塊的訪問(wèn)權(quán)限控制的實(shí)現(xiàn)也是類(lèi)似，在此就省略。使用這種方法很好的解決了這一問(wèn)題，不僅代碼簡(jiǎn)潔，提高了代碼的執(zhí)行效率，而且更為方便安全，有效的實(shí)現(xiàn)了訪問(wèn)權(quán)限的控制。 自動(dòng)計(jì)算總值在很多地方需要用到計(jì)算金額等總值，如果手動(dòng)的計(jì)算的話明顯不現(xiàn)實(shí)，當(dāng)然也沒(méi)必要，那我們?nèi)绾蝸?lái)實(shí)現(xiàn)自動(dòng)計(jì)算總值呢？其實(shí)解決這個(gè)問(wèn)題也并非難事，ASP提供的強(qiáng)大的腳本支持可以輕松實(shí)現(xiàn)這些功能。下面以商品銷(xiāo)售模塊為例來(lái)說(shuō)明如何解決這一問(wèn)題的。商品銷(xiāo)售中當(dāng)售貨員輸入了商品單價(jià)和商品數(shù)量后，會(huì)根據(jù)當(dāng)前商品所打的折扣來(lái)計(jì)算金額小計(jì)，多個(gè)商品輸入完后會(huì)自動(dòng)計(jì)算此次銷(xiāo)售的金額總計(jì)，這樣不僅提高了效率，而且也不會(huì)發(fā)生計(jì)算錯(cuò)誤。本系統(tǒng)我們使用的是javascript的腳本來(lái)寫(xiě)的方法來(lái)實(shí)現(xiàn)金額的計(jì)算，比如計(jì)算商品金額的小計(jì)的方法的代碼是：script language=javascriptfunction jiagehe1(){=* * 。}/script然后在相應(yīng)的位置用事件onMouseDown來(lái)執(zhí)行該方法，如：onMouseDown=javascript:jiagehe1()當(dāng)鼠標(biāo)點(diǎn)擊相應(yīng)的輸入框時(shí)就會(huì)調(diào)用方法計(jì)算出金額的小計(jì)，其它地方的實(shí)現(xiàn)也是類(lèi)似的，在此就不一一說(shuō)明。結(jié) 論本系統(tǒng)使用了ASP為開(kāi)發(fā)語(yǔ)言，以Microsoft SQL Server2000數(shù)據(jù)庫(kù)產(chǎn)品作為后臺(tái)數(shù)據(jù)庫(kù)，構(gòu)建了一個(gè)高效簡(jiǎn)潔的基于WEB技術(shù)的現(xiàn)代商場(chǎng)管理系統(tǒng)。從系統(tǒng)的設(shè)計(jì)到最后系統(tǒng)的實(shí)現(xiàn)歷時(shí)數(shù)月，一點(diǎn)一點(diǎn)的修改，一步一步的完善，走過(guò)了軟件開(kāi)發(fā)的這一完整的過(guò)程。本文作為對(duì)系統(tǒng)的論述，重點(diǎn)介紹了系統(tǒng)開(kāi)發(fā)工具、開(kāi)發(fā)語(yǔ)言等關(guān)鍵技術(shù)以及系統(tǒng)的數(shù)據(jù)庫(kù)設(shè)計(jì)及搭建，系統(tǒng)流程設(shè)計(jì)和功能模塊的詳細(xì)設(shè)計(jì)與實(shí)現(xiàn)代碼的分析。論述了系統(tǒng)從設(shè)計(jì)到實(shí)現(xiàn)的一個(gè)完整的過(guò)程。系統(tǒng)采用了流行的B/S模式，比傳統(tǒng)的C/S模式更具優(yōu)越性，實(shí)現(xiàn)了商場(chǎng)管理的大部分功能，整個(gè)系統(tǒng)簡(jiǎn)潔明了，層次清晰，實(shí)用性強(qiáng)。但系統(tǒng)在一些細(xì)節(jié)的功能還不夠完善，如在對(duì)商品銷(xiāo)售時(shí)沒(méi)有提供手持商品條碼掃描器的接口支持等，使系統(tǒng)在實(shí)現(xiàn)性上又有所減弱。由于篇幅有限，未能將所有模塊的實(shí)現(xiàn)一一列出，只挑選了重要的部分加以說(shuō)明。由于這次畢業(yè)設(shè)計(jì)是對(duì)大學(xué)學(xué)習(xí)的知識(shí)的一個(gè)綜合運(yùn)用，也是自己第一次完成一個(gè)完整的系統(tǒng)的設(shè)計(jì)和實(shí)現(xiàn)，所以在很多地方還有不足之處，但這次實(shí)踐的經(jīng)驗(yàn)是寶貴的。在這個(gè)過(guò)程中也學(xué)到了很多實(shí)用的東西，同時(shí)也看到了自己知識(shí)的匱乏，所以這次畢業(yè)設(shè)計(jì)的意義是重大的，對(duì)以后的學(xué)習(xí)和工作也有很大的幫助。參考文獻(xiàn)[1] [M].北京：中國(guó)鐵道出版社,2005。[2] 梁喜超,[M].北京：冶金工業(yè)出版社,2001。[3] Greg [M].北京：科學(xué)出版社,2000。[4] 方睿,[M].四川：四川大學(xué)出版社,2005。[5] 張莉, Server數(shù)據(jù)庫(kù)原理及應(yīng)用[M].北京：清華大學(xué)出版社,2003。[6] [M].北京：清華大學(xué)出版社,2002。[7] 屈喜龍,朱杰. ASP+SQL Server開(kāi)發(fā)動(dòng)態(tài)網(wǎng)站實(shí)例薈萃[M].北京：機(jī)械工業(yè)出版社,20