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