【正文】 企業(yè)進銷存 管理信息系統(tǒng)中的庫存管理模塊 包含商品入庫、商品入庫退貨、庫存查詢和價格調(diào)整四個功能。 庫存管理能夠 加快企業(yè)資金 流動 速度 ， 在 保障供給的前提下 ，最大限度地降低壓庫資金 。返回上一級頁面 /script %() end if% 華北水利水電學(xué)院畢業(yè)設(shè)計 24 庫存管理功能模塊 實現(xiàn) 庫存管理是企業(yè)管理的重要組成部分。重新定向到指定頁面 end select end if sql,conn,1,3 if then% script language=JavaScript alert(沒有找到您要查詢的記錄 !) 39。39。amp。39。amp。%39。%amp。session(sel)amp。 else 39。session(edate)amp。 and 39。session(sdate)amp。 and cgdate between 39。session(qname)amp。 = 39。多條件的精確查詢 if session(tj)== then sql=select * from tab_cgdan where amp。39。amp。39。amp。 end if case inDate 39。session(qname)amp。 like 39。模糊查詢 sql=select * from tab_cgdan where amp。39。amp。session(sel)amp。查詢條 件判斷 select case session(flag) case inIF if session(tj)== then 39。當有兩個條件時進行相應(yīng)的處理 sdate=(sdate) edate=(edate) i=i+1 flag_deal=inDate end if if i1 then flag_deal=double end if 華北水利水電學(xué)院畢業(yè)設(shè)計 23 session(flag)=flag_deal 39。為變量賦初始值 if flag then if instr(flag,1)0 then 39。 圖 36 采購查詢頁面 用戶可以在采購查詢頁面中的查詢部分，輸入一定的查詢條件，單擊【查詢】按鈕后，用戶添加查詢條件將被提交給本頁，本頁則將根據(jù)用戶提交的表單對數(shù)據(jù)庫進行檢索，并將查詢結(jié)果集通過信息展示部分輸出到瀏覽器中，數(shù)據(jù)處理頁的程序代碼如下： !include file=../conn/ % set rs=() if (type)=all then 39。該頁面主要完成 采購信息的檢索 。 采購查詢是為采購員提供的對采購信息進行查詢的功能，以便跟蹤采購信息的執(zhí)行情況，為企業(yè)的采購決策 提供依據(jù)。 主 華北水利水電學(xué)院畢業(yè)設(shè)計 22 要包括 商品采購和采購查詢兩 部分。) 39。memoamp。,39。gysnameamp。,39。pzwhamp。,39。phamp。,39。bzamp。,39。ggamp。,39。dwamp。,39。cdamp。,39。jcamp。,39。spnameamp。,39。spidamp。spid else spid=sp1001 end if sql=insert into tab_spinfo(id,spname,jc,cd,dw,gg,bz,ph,pzwh,gysname,memo) values(39。創(chuàng)建記錄集對象 application(dsn) sql=select * from tab_gysinfo sql,conn,1,3 39。關(guān)鍵代碼如下： !include file= % set conn=() 39。 商品 信息管理頁面設(shè)計效果如圖 35 所示。 用戶可以通過單擊菜單主導(dǎo)航 “ 客商 信息 ” /“商品 信息管理 ”超鏈接， 進入 商品 信息管理頁面。 企業(yè) 通過該功能模塊能夠節(jié)約時間， 提高效率 ，獲 華北水利水電學(xué)院畢業(yè)設(shè)計 20 得更多收益。如果不存在該用戶，則彈出錯誤提示，并跳回到登錄頁面。彈出提示對話框，并轉(zhuǎn)向指定頁面 else session(id)=rs(id) session(name)=rs(name) session(quan)=rs(quan) session(ulogin)=yes //跳 轉(zhuǎn)到管理頁面 end if % 在理解了 Session 的基礎(chǔ)上，我們知道上述代碼首先是把存儲用戶信息并與客戶端保持關(guān)聯(lián)的 Session(ulogin)初始化，賦予空值。39。)。alert(39。打開數(shù)據(jù)庫 set =conn =adcmdstoredproc =checklogin set mpf=(ame,advarchar,adparaminput,20) mpf set mps=(pass,advarchar,adparaminput,20) mps m(ame)=ame m(pass)=pass set rs= if then (script language=39。,) set conn=() set m=() 39。獲取用戶名 pass=(PWD) 39。 華北水利水電學(xué)院畢業(yè)設(shè)計 19 表單提交到處理頁后會驗證用戶登錄的身份，完整代碼如下： !include virtual= ! include file=Conn/ !包含數(shù)據(jù)庫連接文件 % =30 39。 在開始編寫程序之前，首先使用 Session 來存儲用戶的相關(guān)信息，并與客戶端保持聯(lián)系。完成這些工作，就必須從連接儲存用戶數(shù)據(jù) 庫 中 取出相關(guān)的 信息記錄 。} ()； } /script 在登錄頁面時，當用戶提交了登錄資料后，就由表單 action 屬性指定的 ASP 文件在服務(wù)器端對這些資料進行驗證。} if(==){//判斷密碼是否為空，并彈出 提示 對話框 alert(請輸入密碼！ )； ()。()。 華北水利水電學(xué)院畢業(yè)設(shè)計 18 圖 34 用戶登錄頁面 利用 JavaScript 編寫檢測用戶輸入信息是否合法的函數(shù)，并通過單擊【 登陸 】按鈕調(diào)用該函數(shù)， 判斷用戶名或密碼是否為空，如果為空，系統(tǒng)將給予提示 。對上述情況的判斷，我們就要通過 ASP 文件來 實現(xiàn)。 }} /script 用戶登陸模塊 實現(xiàn) 用戶登錄頁面比較簡單，為防止用戶的錯誤操作， 應(yīng) 設(shè)置錯誤處理頁面。刪除操作員 /a。 target=39。更改操作員密碼 /a|a href=39。 target=39。添加操 作員 /a|a href=39。 target=39。 case 系統(tǒng) : //類型為系統(tǒng)時，進入相應(yīng)的處理頁面 =a href=39。入庫結(jié)賬查詢 /a。 target=39。 銷 售 退 貨 結(jié) 賬 /a|a href=39。 target=39。 商 品 入 庫 結(jié) 賬 /a|a href=39。 target=39。 銷售 結(jié)賬查 詢 /a|a href=39。 target=39。入庫退貨結(jié)賬/a|a href=39。 target=39。商品銷售結(jié)賬 /a|a href=39。 target=39。 case 往來 : //類型為往來時，進入相應(yīng)的處理頁面 =a href=39。年銷售額分析 /a。 target=39。商品銷售排行 /a|a href=39。 target=39。 入 庫 退 貨 查 詢 /a|a href=39。 target=39。 商品入庫查詢 /a|a href=39。 target=39。 銷售退貨查詢/a|a href=39。 target=39。銷售信息查詢 /a|a href=39。 target=39。 case 查詢 : //類型為查詢時，進入相應(yīng)的處理頁面 =a href=39。mainF39。jcxx/39。mainF39。spxs/39。mainF39。spxs/39。 break。mainF39。kcgl/39。mainF39。kcgl/39。mainF39。kcgl/39。mainF39。kcgl/39。 break。mainF39。cggl/39。mainF39。cggl/39。 break。mainF39。jcxx/39。mainF39。jcxx/39。mainF39。jcxx/39。mainF39。jcxx/39。mainF39。jcxx/39。mainF39。jcxx/39。系統(tǒng) 39。往來 39。 查詢 39。銷售 39。庫存 39。采購 39。 基礎(chǔ) 39。判斷是否登錄 () 39。首頁運行效果如圖 33 所示： 圖 33 系統(tǒng)首頁 菜單主導(dǎo)航區(qū)的完整代碼如下： html head title企業(yè)進銷存管理系統(tǒng) /title meta equiv=ContentType content=text/html。退出 登錄 ：主要用于退出企業(yè)進銷存管理系統(tǒng)。菜單子導(dǎo)航區(qū)：主要用于管理功能導(dǎo)航。菜單導(dǎo)航區(qū)主要用于實現(xiàn)網(wǎng)站首頁管理功能的導(dǎo)航；主體控制區(qū)主要用于顯示每個管理模塊的內(nèi)容。因此，在本 部分僅選擇所有功能 模塊 中 某些 典型 管理模塊 的設(shè)計方法進行介紹， 而 其它功能菜單的 管理模塊 可以參照 此 部分進行 設(shè)計。database=sell end sub sub session_onend end sub sub application_onend end sub /script 系統(tǒng) 實 現(xiàn) 企業(yè)進銷存系統(tǒng)的主要作用是對企業(yè)進貨、入庫、銷售三個環(huán)節(jié)中的信息進行記錄、 華北水利水電學(xué)院畢業(yè)設(shè)計 15 統(tǒng)計、查詢。uid=sa。 % set conn=() application(dsn) % 通過 Application 對象進行事件處理，相關(guān)代碼放在虛目錄的 文件中，代碼如下： script language=vbscript runat=server sub application_onstart end sub sub session_onstart application(dsn)=driver=sql server。 本 系統(tǒng) 數(shù)據(jù)庫配置文件為 ，下面兩 組源代 碼在所有對數(shù)據(jù)庫的操作中都是必不可少的。 建立 數(shù)據(jù)庫 的 連接主要分兩步進行：一是創(chuàng)建