【正文】 華北水利水電學(xué)院畢業(yè)設(shè)計(jì) 13 本系統(tǒng)內(nèi)部信息編碼采用了統(tǒng)一的編碼方式情況。例如，cg202110005。例如，RK20210110001。例如，RT20210112021。例如，XS20210112021。數(shù)據(jù)庫(kù) sell 中包含 24 張表。 圖 32 系統(tǒng)數(shù)據(jù)庫(kù)表 2． 數(shù)據(jù)表 的結(jié)構(gòu) 限于篇幅原因，本系統(tǒng) 數(shù)據(jù)表的結(jié)構(gòu) 省略。 數(shù)據(jù)庫(kù)的連接 建立數(shù)據(jù)庫(kù)的連接 是 動(dòng)態(tài)網(wǎng)站開(kāi)發(fā) 過(guò)程中 一個(gè)很重要的步驟， 建立數(shù)據(jù)庫(kù)的連接就是訪問(wèn)數(shù)據(jù)庫(kù)。應(yīng)用 DSN 訪問(wèn)數(shù)據(jù)庫(kù)需要配置 ODBC 數(shù)據(jù)源（即系統(tǒng) DSN），該方法 的優(yōu)點(diǎn)是比較安全 ； 而應(yīng)用非 DSN 訪問(wèn)數(shù)據(jù)庫(kù)不需要配置 ODBC 數(shù)據(jù)源，比較方便 [10]。下面進(jìn)行詳細(xì)介紹。由于 兩組 代碼在每個(gè)對(duì)數(shù)據(jù)庫(kù)操作 的 頁(yè)面 都 要使用，所以將其保存一個(gè)單獨(dú)的文件夾中，文 件名為 ，在所有與數(shù)據(jù)庫(kù)連接 的頁(yè)面中只要包含該文件，就可以連接和打開(kāi)數(shù)據(jù)庫(kù)。server=(local)。pwd=。從技術(shù)的角度而言， 企業(yè)進(jìn)銷(xiāo)存 系統(tǒng) 中部分功能菜單設(shè)計(jì)原理是一樣的，都是對(duì)數(shù)據(jù)表進(jìn)行操作處理，而這些數(shù)據(jù)表則分別記錄了企業(yè)在進(jìn)銷(xiāo)存 環(huán)節(jié)中 的 各種信息。 系統(tǒng) 首頁(yè) 實(shí)現(xiàn) 系統(tǒng) 首頁(yè)采用框架技術(shù)將菜單導(dǎo)航區(qū)和主體控制區(qū)分裝在兩個(gè)框架里，以便在同一個(gè)頁(yè)面中管理多個(gè)頁(yè)。 系統(tǒng) 首頁(yè)主要包括以下功能模塊：菜單主導(dǎo)航區(qū)：主要用于顯示網(wǎng)站的旗幟 廣告條及為用戶提供網(wǎng)站的功能導(dǎo)航。主體操作區(qū)：主要用于完成各種管理功能。 本系統(tǒng)首頁(yè)采用兩個(gè)頁(yè)面組成的框架組合，兩個(gè)頁(yè)面為 Top. asp、 Main. asp。 charset=gb2312 /head frameset rows=99,* cols=* framespacing=0 frameborder=no border=0 華北水利水電學(xué)院畢業(yè)設(shè)計(jì) 16 frame src= frameborder=no scrolling=no frame src= name=mainF scrolling=auto /frameset noframesbody /body/noframes /html 菜單子導(dǎo)航區(qū)的關(guān)鍵代碼如下： %=true =0 if session(ulogin)yes then 39。重新定向頁(yè)面 () end if % a href= onClick=Fsubmenu(39。) 基礎(chǔ)信息 /a|a href= onClick=Fsubmenu(39。)采購(gòu)管理 /a|a href= onClick=Fsubmenu(39。)庫(kù)存管理 /a|a href= onClick=Fsubmenu(39。)商品銷(xiāo)售 /a|a href= onClick=Fsubmenu(39。) 查詢統(tǒng)計(jì) /a|a href= onClick=Fsubmenu(39。)往來(lái)管理 /a|a href= onClick=Fsubmenu(39。)系統(tǒng)設(shè)置 /a ...... script language=javascript function Fsubmenu(value){ switch (value){ case 基礎(chǔ) : =a href=39。 target=39?？蛻粜畔⒐芾?/a|a href=39。 target=39。商品信息管理 /a|a href=39。 target=39。 供 應(yīng) 商 信 息 管 理 /a|a href=39。 target=39。 客 戶 信 息 查 詢 /a|a href=39。 target=39。 商 品 信 息 查 詢 /a|a href=39。 target=39。供應(yīng)商信息查詢 /a。 case 采購(gòu) : //類(lèi)型為采購(gòu)時(shí)，進(jìn)入相應(yīng)的處理頁(yè)面 =a href=39。 target=39。商品采購(gòu) /a|a href=39。 target=39。采購(gòu)查詢 /a。 case 庫(kù)存 : //類(lèi)型為庫(kù)存時(shí)，進(jìn)入相應(yīng)的處理頁(yè)面 =a href=39。 target=39。商品入庫(kù) /a|a href=39。 target=39。 商 品 入 庫(kù) 退 貨 /a|a href=39。 target=39。 庫(kù)存查詢 /a|a href=39。 target=39。價(jià)格調(diào)整 /a。 case 銷(xiāo)售 : //類(lèi)型為銷(xiāo)售時(shí)，進(jìn)入相應(yīng)的處理頁(yè)面 =a href=39。 target=39。商品 華北水利水電學(xué)院畢業(yè)設(shè)計(jì) 17 銷(xiāo)售 /a|a href=39。 target=39。 商品銷(xiāo)售退貨 /a|a href=39。 target=39。 break。cxtj/39。mainF39。cxtj/39。mainF39。cxtj/39。mainF39。cxtj/39。mainF39。cxtj/39。mainF39。cxtj/39。mainF39。 break。wlgl/ysgl/39。mainF39。wlgl/ysgl/39。mainF39。wlgl/ysgl/39。mainF39。wlgl/yfgl/39。mainF39。wlgl/yfgl/39。mainF39。wlgl/yfgl/39。mainF39。 break。xtsz/39。mainF39。xtsz/39。mainF39。xtsz/39。mainF39。 break。在登錄操作中，一般發(fā)生的錯(cuò)誤有：用戶輸入了錯(cuò)誤的用戶名或密碼 ； 或用戶直接單擊了【 登陸 】按鈕 [11]。 用戶登錄 頁(yè)面 的設(shè)計(jì)效果如圖 34 所示。當(dāng)用戶輸入合法信息后，提交該表單， 源 代碼如下： script language=javascript function check(myform){ if (==){ //判斷用戶名是否為空，并彈出提示對(duì)話框 alert(請(qǐng)輸入 用戶 名 ！ )。return。return。它的工作主要是判斷用戶的登錄的用戶名和密碼是否正確。如果 記錄 驗(yàn)證無(wú)誤，就通過(guò) ASP 的 Response 對(duì)象的 redirect 方法 ， 將用戶登錄的頁(yè)面?zhèn)鞯娇蛻舳说臑g覽器上；如果用戶輸入了錯(cuò)誤的用戶名或密碼，就通過(guò) ASP 的 Response 對(duì)象的 Write 方法彈出錯(cuò)誤提示。本頁(yè)使用 session(ulogin)以存儲(chǔ)在數(shù)據(jù)庫(kù)中的標(biāo)識(shí)符作為信息記載，并以判斷這個(gè)值是否為空來(lái)判斷用戶是否登錄。設(shè)置 Session 的過(guò)期時(shí)間為 30 分鐘 session(ulogin)=no ame=trim(request(username)) 39。獲取密碼 pass=replace(pass,39。創(chuàng)建對(duì)象 application(dsn) 39。JavaScript39。 請(qǐng)輸入正確的用戶名和密碼39。=39。/script)39。在接收數(shù)據(jù)庫(kù)后，打開(kāi)數(shù)據(jù)庫(kù)，取出標(biāo)識(shí)符，把它賦給 Session(ulogin)。 客商 信息功能模塊 實(shí)現(xiàn) 客商信息主要是對(duì)客戶信息、商品信息和供應(yīng)商信息進(jìn)行管理，可以方便迅速的了解有關(guān)客戶、商品和供 應(yīng)商的基本信息。 本部分主要介紹商品 信息管理 功能模塊 的 設(shè)計(jì) 。該頁(yè)面主要完成 商品 信息的添加。 圖 35 商品 信息管理頁(yè)面 利用 JavaScript 編寫(xiě)檢測(cè)用戶輸入信息是否合法的函數(shù)，并通過(guò)單擊【保存信息】按鈕調(diào)用該函數(shù)，當(dāng)用戶輸入合法信息后，提交該表單。創(chuàng)建數(shù)據(jù)庫(kù)對(duì)象 set rs=() 39。打開(kāi)記錄集 % 商品 信息添加時(shí)的數(shù)據(jù)處理頁(yè)主要是 將 用戶提交 的表單信息 保存到數(shù)據(jù)庫(kù)中， 數(shù)據(jù)處理頁(yè)的程序代碼如下： 華北水利水電學(xué)院畢業(yè)設(shè)計(jì) 21 % spname=trim(request(spname)) jc=trim(request(jc)) cd=trim(request(cd)) dw=trim(request(dw)) gg=trim(request(gg)) bz=trim(request(bz)) ph=trim(request(ph)) pzwh=trim(request(pzwh)) gysname=trim(request(gysname)) memo=trim(request(memo)) set conn=() set rs=() set myrs=() set rec=() application(dsn) sql=select id from tab_spinfo sql,conn,1,3 if not then //如果沒(méi)到記錄尾 sql=select max(id) as id from tab_spinfo sql,conn,1,3 str=myrs(id) spid=cint(mid(str,3,4))+1 spid=spamp。amp。39。amp。39。amp。39。amp。39。amp。39。amp。39。amp。39。amp。39。amp。39。amp。39。amp。39。插入新記錄 sql,conn,1,3 % script language=javascript alert(商品信息添加成功！ )； //彈出對(duì)話框 =； //重新定向指定頁(yè)面 /script 采購(gòu)管理功能模塊 實(shí)現(xiàn) 采購(gòu)管理可以有效管理整個(gè)企業(yè)的采購(gòu)業(yè)務(wù)，用以提高采購(gòu)經(jīng)營(yíng)事務(wù)的效率，提高企業(yè)的經(jīng)濟(jì)效益，確保采購(gòu)工作質(zhì)量高效率、低成本執(zhí)行，使企業(yè)具有最佳的供貨狀態(tài)。 本部分 為 采購(gòu) 查詢 模塊 設(shè) 計(jì)方法。 用戶可以通過(guò)單擊菜單主導(dǎo)航 “采購(gòu)管理” /“采購(gòu)查詢”超鏈接， 進(jìn)入 采購(gòu)查詢 頁(yè)面。 采購(gòu)查詢 頁(yè)面設(shè)計(jì)效果如圖 36 所示。顯示全部?jī)?nèi)容 sql=select * from tab_cgdan else flag=(flag) i=0 39。當(dāng)有一個(gè)條件時(shí)進(jìn)行相應(yīng) 的處理 sel=(sel) tj=(tj) qname=(qname) i=1 flag_deal=inIF end if if instr(flag,2)0 then 39。創(chuàng)建 Session 變量 session(sel)=sel session(tj)=tj session(qname)=qname session(sdate)=sdate session(edate)=edate end if 39。精確查詢 sql=select * from tab_cgdan where amp。 = 39。session(qname)amp。 else 39。session(sel)amp。%amp。%39。日期查詢 sql=select * from tab_cgdan where cgdate between 39。session(sdate)amp。 and 39。session(edate)amp。 case double 39。session(sel)amp。amp。39。amp。39。amp。39。多條件的模糊查詢 sql=select * from tab_cgdan where amp。 like 39。session(qname)amp。 and cgdate between 39。session(sdate)amp。 and 39。session(edate)amp。 end if case else () 39。彈出提示對(duì)話框 (1) 39。在企業(yè)經(jīng)營(yíng)活動(dòng)中，庫(kù)存管理直接影響 到 采購(gòu)、銷(xiāo)售部門(mén)的購(gòu)、銷(xiāo)活動(dòng)。庫(kù)存管理 直接牽動(dòng)著企業(yè)的經(jīng)