基于web的商場(chǎng)管理系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn)—免費(fèi)-資料下載頁(yè)

【導(dǎo)讀】求，設(shè)計(jì)并實(shí)現(xiàn)了一個(gè)基于WEB技術(shù)的商場(chǎng)管理系統(tǒng)。該系統(tǒng)由七個(gè)功能模塊。銷(xiāo)售管理模塊、人事信息管理模塊、數(shù)據(jù)報(bào)表模塊和系統(tǒng)配置模塊。設(shè)計(jì)，以及功能模塊的劃分等，而且詳盡敘述了各個(gè)功能模塊的具體實(shí)現(xiàn)方法，行用戶權(quán)限分配等。系統(tǒng)的開(kāi)發(fā)采用了ASP技術(shù)，以SQLServer2021作為后。且安裝方便，配置簡(jiǎn)易。系統(tǒng)設(shè)計(jì)目的及意義···········································································5

　　

【正文】 ass=password Sys_CheckCode=replace(trim(Request(Sys_CheckCode)),39。,) 39。獲取驗(yàn)證碼 if username= or password= then 39。判斷用戶名和密碼是否正確 scriptalert( 用 戶 名 和 密 碼 不 能 為 空 ！ )。 =。/script end if if Sys_CheckCodeCStr(session(CheckCode)) then scriptalert(驗(yàn)證碼不正確，請(qǐng)刷新后重新登陸 ! )。 =。/script end if set rs=() sql=select * from Users where loginid=39。amp。usernameamp。39。and pwd=39。amp。Md5_Passamp。39。 sql,conn,1,3 if not then 39。登錄成功 gonghaoID=Rs(gonghao) =120 Session(AdminID)=gonghaoID39。保存員工工號(hào) Session(adminName)=Rs(name) 39。保存員工姓名 Session(adminLoginId)=Rs(loginid) 39。保存員工登錄帳號(hào)名 set rst=() 39。讀取權(quá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 set rst=nothing () 39。驗(yàn)證成功 ,跳轉(zhuǎn)主頁(yè)面 else 39。登錄失敗 scriptalert( 密碼錯(cuò)誤或者無(wú)此用戶！ )。 =。/script end if set rs=nothing end if if request(Action)=LoginOut then Session(AdminID)= 39。用戶安全注銷(xiāo)，結(jié)束會(huì)話 Session(adminName)= Session(adminLoginId)= Session(LoginArray)= end if % 圖 32 用戶身份驗(yàn)證算法 商品信息管理模塊的實(shí)現(xiàn) 商品分類(lèi) 對(duì)商品分類(lèi)可以便于對(duì)商品的管理， 本系統(tǒng)中采用二級(jí) 商 品 分 類(lèi)的方法，一級(jí)類(lèi)別描述 產(chǎn)品所屬的大致類(lèi)別，二級(jí)類(lèi)別則在一級(jí)類(lèi)別的基礎(chǔ)上，對(duì)商 品進(jìn)行細(xì)致的劃分。 跳轉(zhuǎn)到系統(tǒng)主頁(yè) 輸入用戶名和密碼及驗(yàn)證碼 用戶名或密碼 是否為空 驗(yàn)證碼是否正確 用戶名或密碼 是否 正確 用戶信息數(shù)據(jù)庫(kù) 密碼錯(cuò)誤或者無(wú)此用戶 商品 信息數(shù)據(jù)庫(kù) 驗(yàn)證錯(cuò)誤，請(qǐng)重新登錄 密碼或 用戶名不能為空 是 否 否 是 是 否 商品分類(lèi)包括對(duì)商品類(lèi)型的增加，修改和刪除， 商品類(lèi)型增加的界面如圖33 所示。 圖 33 增加商品類(lèi)型 用戶輸入類(lèi)型信息增加后會(huì)在數(shù)據(jù)庫(kù)中增加相應(yīng)的記錄，其實(shí)現(xiàn) 代碼是： set rst=() sql=insert into Spfenlei(fenleiname,fenleimatou,beizhu)amp。_ values(39。amp。fenleinameamp。39。,upper(39。amp。fenleimatouamp。39。),39。amp。beizhuamp。39。) sql,Conn 用戶輸入類(lèi)型信息修改后會(huì)在數(shù)據(jù)庫(kù)中對(duì)相應(yīng)的記錄進(jìn)行更新，其實(shí)現(xiàn)代碼是： sql=update Spfenlei set fenleiname=39。amp。fenleinameamp。39。,amp。_ fenleimatou=upper(39。amp。fenleimatouamp。39。), beizhu=39。amp。beizhuamp。39。 where amp。_ id=39。amp。idamp。39。 sql,Conn 刪除商品類(lèi)型的實(shí)現(xiàn)代碼是： sql=Delete From Spfenlei Where id=39。amp。idamp。39。 sql,Conn 商品增加 用戶在系統(tǒng)初期時(shí)會(huì)錄入商品詳細(xì)信息，其錄入界面如圖 34所示。 商品編號(hào)是根據(jù)當(dāng)前日期自動(dòng)生成的唯一編號(hào)，不能由用戶修改。類(lèi)型為商品的實(shí)際類(lèi)型，如果當(dāng)前列表中無(wú)該類(lèi)型可點(diǎn)擊右邊的 [增加類(lèi)型 ]增加商品類(lèi)型。商品供貨商可以直接雙擊選擇相應(yīng)的供貨商，該供貨商是已經(jīng)在客戶管理中增加的。商品增加是將商品信息增加到數(shù)據(jù)庫(kù)中，首先是檢查該商品是否已經(jīng)存在，其實(shí)現(xiàn)代碼是： set rs=(select * from [Shangpin] where bianhao =39。amp。bianhaoamp。39。) if not ( or ) then ... 39。報(bào)錯(cuò)處理 如果沒(méi)有該商品就將其添加到商品信息表中和商品倉(cāng)庫(kù)表中，代碼是： sql=insert into Shangpin (fenleiname,bianhao,name,xinghao,danwei,amp。_ gonghuoshang,beizhu) values(39。amp。fenleiname amp。39。,39。amp。bianhao amp。39。,39。amp。nameamp。_ amp。39。, 39。 amp。 xinghao amp。39。,39。 amp。 danwei amp。39。,39。 amp。 gonghuoshang amp。39。,39。 amp。beizhu amp。39。) sql,Conn 39。增加商品信息表資料 sqlck=insert into Spcangku(bianhao,name,fenleiname,xinghao,danwei,amp。_ gonghuoshang,shuliang,jiage,jiagehe,beizhu) values(39。amp。bianhaoamp。39。,amp。_ 39。amp。nameamp。39。,39。amp。fenleinameamp。39。,39。amp。xinghaoamp。39。,39。amp。danweiamp。39。,39。amp。gonghuoshangamp。_ amp。39。,39。amp。shuliangamp。39。,amp。jiageamp。,amp。jiageheamp。,39。amp。beizhuamp。39。) sqlck,Conn 39。增加商品倉(cāng)庫(kù)信息表資料 圖 34 商品增加 商品修改 商品修改可以在商品列表中選擇對(duì)應(yīng)的商品進(jìn)行修改，商品修改界面如圖35 所示。 圖 35 商品修改 商品修改是對(duì)相應(yīng)的商品信息進(jìn)行更新，即更新其商品信息表和商品倉(cāng)庫(kù)表，代碼是： sql=update shangpin set name=39。amp。nameamp。39。,fenleiname=39。amp。fenleinameamp。_ amp。39。,xinghao=39。amp。xinghaoamp。39。,danwei=39。amp。danweiamp。39。,gonghuoshang=39。amp。gonghuoshamp。_ angamp。39。,beizhu=39。amp。beizhuamp。39。 where bianhao=39。amp。bianhaoamp。 39。 sql,Conn 39。修改商品信息表資料 sql=update Spcangku set name=39。amp。nameamp。39。,fenleiname=39。amp。fenleinameamp。_ amp。39。,xinghao=39。amp。xinghaoamp。39。,danwei=39。amp。danweiamp。39。,gonghuoshang=39。amp。gonghuosamp。_ hangamp。39。,beizhu=39。amp。beizhuamp。39。 where bianhao=39。amp。bianhaoamp。 39。 sql,Conn 39。修改商品倉(cāng)庫(kù)信息表資料 商品刪除 商品刪除可以在商品列表中選擇對(duì)應(yīng)的商品進(jìn)行刪除，商品刪除即刪除商品信息表和商品倉(cāng)庫(kù)表中相應(yīng)的商品，代碼是： sql=delete from shangpin where bianhao=39。amp。bianhaoamp。39。 sql,Conn 39。刪除商品信息表資料 sql=delete from spcangku where bianhao=39。amp。bianhaoamp。39。 sql,Conn 39。刪除商品倉(cāng)庫(kù)信息表資料 商品查詢 商品查詢可以滿足用戶對(duì)商品多種關(guān)鍵字類(lèi)型進(jìn)行模糊查詢，包括商品名稱(chēng)，商品編號(hào)，商品類(lèi)型和商品供貨商四種類(lèi)型的關(guān)鍵字。其查詢界面如圖 36所示 。 圖 36 商品信息查詢 商品查詢是根據(jù)關(guān)鍵字進(jìn)行模糊查詢，實(shí)現(xiàn)代碼是： key=Trim(Request(key)) 39。關(guān)鍵字 name=Trim(Request(name)) 39。查詢類(lèi)型 if not (key = or name=) then set rs = () sql=select * from shangpin where amp。nameamp。 like 39。%amp。 key amp。%39。 Order by idamp。_ desc sql,conn,0,2,1 else 39。報(bào)錯(cuò) ? end if 商品進(jìn)貨管理模塊的實(shí)現(xiàn) 商品 入庫(kù) 當(dāng)根據(jù)采購(gòu)單進(jìn)貨時(shí)可在商品入庫(kù)中錄入進(jìn)貨信息并入庫(kù)，其界面如圖 37所示。 圖 37 商品入庫(kù) 在該界面中可以一次為同一供貨商提供的商品添加最多 10 條商品記錄，而且分別添加到商品入庫(kù)單中和入庫(kù)基本信息表中，其實(shí)現(xiàn)代碼是： set rck=()39。在 Rudujiben庫(kù)中增 加入庫(kù)記錄 sql=insert into Rukujiben (rkbianhao,rkghsbianhao,rkghsname,rkshijian,amp。_ rkflag,rkcaigouyuan,rkfangshi,rkzongji,beizhu) values( 39。amp。rkbianhaoamp。39。,amp。_ 39。amp。rkghsbianhaoamp。39。,39。amp。rkghsnameamp。39。,39。amp。rkshijianamp。39。,39。amp。rkflagamp。39。,39。amp。rkcaamp。_ igouyuanamp。39。,39。amp。rkfangshiamp。39。,convert(money,39。amp。rkzongjiamp。39。),39。amp。beizhuamp。39。) sql,Conn 因?yàn)樽疃嗫赏瑫r(shí)為同一供貨商提供的商品添加 10 條記錄，所以當(dāng)不足 10條記錄時(shí)在增加時(shí)會(huì)產(chǎn)生空值，所以添加記錄時(shí)排除空值記錄，其代碼如下： for i=1 to 10 39。在 Rukudan庫(kù)中增加商品詳情入庫(kù)單 if rkshangpinbianhao([i])= then exit for 39。當(dāng)?shù)?N條記錄為空時(shí) ,直接跳出循環(huán) ,無(wú)需插入無(wú)效記錄！ set rst=() sql=insert into Rukudan(rkbianhao,rkshangpinbianhao,rkshangpinname,amp。_ rkfenleiname,rkshangpinxinghao,rkshanpindanwei,rkshuliang,rkjiage,rkjiaamp。_ gehe) values(39。amp。rkbianhaoamp。39。,39。amp。rkshangpinbianhao([i])amp。39。,39。amp。rkshangamp。_ pinname([i])amp。39。,39。amp。rkfenleiname([i])amp。39。,39。amp。rkshangpinxinghao([i])amp。39。, amp。_ 39。amp。rkshangpindanwei([i])amp。39。,39。amp。rkshuliang([i])amp。39。,convert(money,39。amp。rkjiamp。_ age([i])amp。39。),convert(money,39。amp。rkjiagehe([i])amp。39。)) sql,Conn set rst=nothing next 如果是直接審核入庫(kù)那將增加庫(kù)存， 根據(jù)入庫(kù)單編號(hào)查出商品編號(hào)以及數(shù)量然后循環(huán) UPDATE 更新值 。 if rkflag=是 then set rs = () sql=select * from Rukudan where rkbianhao=39。amp。rkbianhaoamp。39。 sql,conn,0,2,1 for i=1 to 10 if or then exit for bianhao=rs(rkshangpinbianhao) shuliang=rs(rkshuliang) jiage=rs(rkjiage) set rst=() sql=update Spcangku set shuliang=shuliang+39。amp。shuliangamp。39。,amp。_ jiage=amp。jiageamp。 where bianhao=39。amp。bianhaoamp。39。 sql ,conn sql=update Spcangku set jiagehe=jiage*shuliang where bianhao=amp。_ 39。amp。bianhaoamp。39。 sql ,conn set rst=nothing next end if 商品 入庫(kù)審核 商品入庫(kù)審核可對(duì)商品入庫(kù)操作進(jìn)行再次審核，以保證商品的正確入庫(kù)，如果審核不通過(guò)可刪除本次入庫(kù)操作。并且可以查看已通過(guò)審核的入庫(kù)單，且可根據(jù)實(shí)際情況執(zhí)行反審核入庫(kù)，即將已審核入庫(kù)的商品進(jìn)行出庫(kù)操作。 入庫(kù)審核的實(shí)現(xiàn)代碼如下： set rst=() 39。添加倉(cāng)庫(kù)的商品數(shù)量 sql=update Spcangku set shuliang=shuliang+39。amp。shuliangamp。39。,jiage=amp。_ amp。jiageamp。 where bianhao=39。amp。bianhaoamp。39。 sql ,conn sql=update Spcangku set jiagehe=jiage*shuliang where bianhao=amp。_ 39。amp。bianhaoamp。39。 sql ,conn 39。對(duì)通過(guò)審核的入庫(kù)單增加標(biāo)志“是” sql=update rukujiben set rkflag=39。amp。flagamp。39。 where rkbianhao=amp。_ 39。amp。rkbianhaoamp。39。 and id=39。amp。idamp。39。 sql ,conn 商品 庫(kù)存警示 商品庫(kù)存警示會(huì)在商品的庫(kù)存超過(guò)或者低于預(yù)先設(shè)定好的限值時(shí)報(bào)警，提示用戶進(jìn)行相應(yīng)操作，使商品庫(kù)存達(dá)到最大合理化。其實(shí)現(xiàn)代碼為： sql=select * from Spcangku where shuliangshangxian1 or shuliangxiaxianamp。_ +1 Order by id desc 39。顯示庫(kù)存超過(guò)或者低于預(yù)先設(shè)定好的限值 sql,conn,0,2,1 ?? 39。根據(jù)當(dāng)前庫(kù)存量來(lái)顯示庫(kù)存警示是短線還是超儲(chǔ) shuliang=rs(shuliang) 39。當(dāng)前庫(kù)存量 shangxian=rs(shangxian)1 39。庫(kù)存上限 xiaxian=rs(xiaxian)+1 39。庫(kù)存下限 if shuliangxiaxian then (短線 ) else (超儲(chǔ) ) end if 初次商品添加時(shí)會(huì)自動(dòng)將庫(kù)存上限設(shè)置為 10000，下限設(shè)置為 0，所以用戶要根據(jù)實(shí)際情況修改限值。 商品銷(xiāo)售管理模塊的實(shí)現(xiàn) 商品 銷(xiāo)售價(jià)格 當(dāng)有新商品入庫(kù)后，應(yīng)對(duì)其零售價(jià)格進(jìn)行設(shè)置；當(dāng)根據(jù)商品銷(xiāo)售情況對(duì)商品價(jià)格作出調(diào)整時(shí)應(yīng)對(duì)商品價(jià)格進(jìn)行修改。商品銷(xiāo)售價(jià)格設(shè)置界面如圖 38 所示。 圖 38 商品價(jià)格設(shè)置 設(shè)置商品零售價(jià)格后對(duì)其數(shù)據(jù)庫(kù)進(jìn)行修改，代碼如下： bianhao=Trim((bianhao)) 39。商品編號(hào) lsjiage=(lsjiage) 39。零售單價(jià) set rs=() sql=update Spcangku set lsjiage=amp。lsjiageamp。 where bianhao=39。amp。 bianhao amp。 39。 sql,Conn set rst=() sql=update Spcangku set lsjiagehe=lsjiage*shuliang where bianhao=amp。_ 39。amp。 bianhao amp。 39。 sql,Conn 商品 銷(xiāo)售開(kāi)單 商品銷(xiāo)售開(kāi)單實(shí)現(xiàn)前臺(tái)面向顧客銷(xiāo)售商品，將銷(xiāo)售信息錄入數(shù)據(jù)庫(kù)，并且可根據(jù)促銷(xiāo)活動(dòng)對(duì)商品打折。銷(xiāo)售金額會(huì)自動(dòng)進(jìn)行計(jì)算，可直接審核出庫(kù)或者選擇稍后審核后出庫(kù)。銷(xiāo)售開(kāi)單的界面以及實(shí)現(xiàn)代碼和商品入庫(kù)的類(lèi)似，只是所操作的數(shù)據(jù)庫(kù)不同，在此省略。 商品 銷(xiāo)售查詢 商品銷(xiāo)售查詢可以為用戶提供對(duì)商品銷(xiāo)售兩種關(guān)鍵字類(lèi)型的模糊查詢，包括商品銷(xiāo)售單號(hào)和商品銷(xiāo)售日期兩種類(lèi)型的關(guān) 鍵字。 按商品銷(xiāo)售單號(hào)查詢的實(shí)現(xiàn)代碼是： sql=select * from Xiaoshoujiben where amp。nameamp。 like 39。%amp。 key amp。%39。 and xsflagamp。_ =39。是 39。 Order by id desc 按商品銷(xiāo)售日期查詢的實(shí)現(xiàn)代碼是： sql=select * from Xiaoshoujiben where xsriqi betweenamp。_ 39。amp。date1amp。39。and