【正文】 衷心感謝所有關心、幫助過本人的師長、朋友和同學們，使本人在大學四年的求學經(jīng)歷更加美好，終生難忘。在論文即將完成之際，謹向輔導老師表示深深的謝意。在設計過程中兩位指導老師為我們提出了許多寶貴的意見和建議，使本人受益非淺。另一面由于畢業(yè)設計時間有限，系統(tǒng)難免還存在很多的不足，需要進一步的改善，主要在以下幾個方面： （ 1）系統(tǒng)功能還需要進一步的完善，以適用于更多的領域 （ 2）系統(tǒng)某些權限的分配還存在一些 不合理地方 （ 3）系統(tǒng)的安全性設計方面還應該考慮全面一些 總之，在這次設計中，本人學到了大量的知識，開闊了視野，也為日后從事軟件開發(fā)工作奠定了堅實的基礎。 通過本次畢業(yè)設計 ,我也感受到了開源的方便 ,遇到什么問題 ,上網(wǎng)一查 ,就知道該怎么弄了 ,以前做個課程設計都是怕別人和我的一樣 ,不愿意給別人看 ,現(xiàn)在知道了程序弄不出來是多么的 著急 ,學習都是相互的 ,互相研究才能共同進步的 .以后要多多注意這方面的事情 ,本次畢業(yè)設計是我工作前一次很好的演練和實踐的機會 ,是培養(yǎng)獨立思考問題和自學能力的鍛煉 ,使我意識到必須努力學習才能才工作中體現(xiàn)自己的價值 ,適應社會的需要。并對其組成部分進行了闡述。據(jù)此 提出了電子商務網(wǎng)站的層次結構模型。系統(tǒng)界面美觀友好，操作方便，將在很大程度上提高 數(shù)碼商品 信息管理的效率，基本達到本次畢業(yè)設計的目的。webnameamp。td width=70總 計 /td Message=message amp。td width=40郵費 /td Message=message amp。td width=40積分 /td Message=message amp。td width=300商 品 名 稱 /td Message=message amp。tr bgcolor=FFFFFF height=25 align=center Message=message amp。 關鍵代碼如下： % Function GetOrderNo(dDate) GetOrderNo = RIGHT(0000+Trim(Year(dDate)),4)+RIGHT(00+Trim(Month(dDate)),2)+RIGHT(00+Trim(Day(dDate)),2)+RIGHT(00 + Trim(Hour(dDate)),2)+RIGHT(00+Trim(Minute(dDate)),2)+RIGHT(00+Trim(Second(dDate)),2) End Function goods=GetOrderNo(Now()) Dim strMth,LngMth,strMian,Message,strtxtdeposit,LngState strMian = Message = strtxtdeposit = LngState = 2 Message=html Message=message amp?？蛻?可以將購物車中的產(chǎn)品放入訂單，進行交易。/script end select % 用戶 網(wǎng)上交易 管理的實現(xiàn) 用戶網(wǎng)上交易 管理 模塊的功能描述： 功能描述：此模塊實現(xiàn)的功能是 通過用戶的在線購物 訂單付款實現(xiàn)網(wǎng)上交易的流程 。)。,conn,1,3 rs(UserPassword)=md5(trim((UserPassword1))) set rs=nothing set conn=nothing script language=javascriptalert(39。trim((username2))amp。/script else rs(UserPassword)=md5(trim((UserPassword1))) set rs=nothing set conn=nothing end if case repass set rs=() select UserPassword from [user] where username=39。)。,conn,1,3 if md5(trim((UserPassword)))trim(rs(UserPassword)) then set rs=nothing set conn=nothing script language=javascriptalert(39。usernameamp。/script case changepass set rs=() select UserPassword from [user] where username=39。)。/script set conn = nothing end if rs(user)=trim((user)) rs(realname)=trim((realname)) if (UserQuestion)= then set conn = nothing end if rs(UserQuestion)=trim((UserQuestion)) if trim((UserAnswer))then rs(UserAnswer)=md5(trim((UserAnswer))) end if set rs=nothing set conn=nothing script language=javascriptalert(39。)。,conn,1,3 if (user)= then script language=javascriptalert(39。usernameamp。//用戶資料 case customerinfo set rs=() select user,realname,UserQuestion,UserAnswer from [user] where username=39。(1)。 您的收貨信息保存成功！39。39。amp。 此模塊頁面如圖： 圖 公司信息管理界面 用戶個人資料管理 模塊的關鍵代碼： 其部分關鍵代碼如下： % dim action,username action=FormatSQL(SafeRequest(action,0)) username=strUserName select case action 39。如果有則出現(xiàn)出錯提示框，提示重新輸入；否則成功修改，數(shù)據(jù)庫被更新。(1)。 修 改 成 功 ！39。 sql 39。 where id=amp。trim((pweight))amp。,pweight=39。trim((code))amp。,code=39。strDetailamp。,detail=39。trim((Supplier))amp。,Supplier=39。,remend=amp。trim((type))amp。,type=39。trim((grade)) amp。,grade=39。,stock=amp。,score=amp。,discount=amp。productdateamp。,productdate=39。,categoryid=amp。trim((spic))amp。,spic=39。trim((pic)) amp。,pic=39。,vipprice=amp。,price6=amp。,price5=amp。,price4=amp。,price3=amp。,price2=amp。,price1=amp。trim((introduce)) amp。,introduce=39。trim((mark)) amp。,mark=39。trim((name))amp。 (detail)(i) Next sql = Update product set name=39。 sql 39。39。amp。39。amp。39。amp。39。amp。39。amp。39。amp。39。amp。39。amp。trim((stock))amp。trim((score))amp。discountamp。39。amp。trim((categoryid))amp。39。amp。39。amp。trim((vipprice))amp。trim((price6))amp。trim((price5))amp。trim((price4))amp。trim((price3))amp。trim((price2))amp。trim((price1))amp。39。amp。39。amp。39。amp。/script end if dim productdate,discount discount=round((price2)/(price1),2) productdate=trim((date)) dim action,id,temp,strContent,i,strDetail id=SafeRequest(id,1) action=FormatSQL(SafeRequest(action,0)) select case action case add For i = 1 To (detail).Count strDetail = strDetail amp。)。/script end if if Not isNumeric((stock)) then set conn = nothing script language=javascriptalert(39。)。/script end if if Not isNumeric((stock)) then set conn = nothing script language=javascriptalert(39。)。/script end if if Not isNumeric((price6)) then set conn = nothing script language=javascriptalert(39。)。/script end if if Not isNumeric((price5)) then set conn = nothing script language=javascriptalert(39。)。/script end if if Not isNumeric((price4)) then set conn = nothing script language=javascriptalert(39。)。/script end if if Not isNumeric((price3)) then set conn = nothing script language=javascriptalert(39。)。/script end if if Not isNumeric((price2)) then set conn = nothing script language=javascriptalert(39。)。/script end if if Not isNumeric((price1)) then set conn = nothing script language=javascriptalert(39。)。/script end if if Not isNumeric((vipprice)) then set conn = nothing script language=javascriptalert(39。)。/script end if if (name)= then set conn