目錄企業(yè)進(jìn)銷(xiāo)存管理系統(tǒng) PAGEIII摘要 PAGEIIIAbstract PAGEIV引言 1第一章系統(tǒng)分析 21.1需求分析 21.2可行性分析 2第二章總體設(shè)計(jì) 42.1項(xiàng)目規(guī)劃 42.2系統(tǒng)功能結(jié)構(gòu)圖 5第三章系統(tǒng)設(shè)計(jì) 63.1設(shè)計(jì)目標(biāo) 63.2開(kāi)發(fā)及運(yùn)行環(huán)境 63.3編碼設(shè)計(jì) 73.4邏輯結(jié)構(gòu)設(shè)計(jì) 7第四章網(wǎng)站總體架構(gòu) 10第五章用戶登錄模塊設(shè)計(jì) 14第六章網(wǎng)站首頁(yè)設(shè)計(jì) 19第七章基礎(chǔ)信息主要功能模塊詳細(xì)設(shè)計(jì) 247.1商品信息管理設(shè)計(jì) 247.2商品信息查詢?cè)O(shè)計(jì) 27第八章采購(gòu)管理主要功能模塊詳細(xì)設(shè)計(jì) 338.1商品采購(gòu)管理設(shè)計(jì) 338.2采購(gòu)查詢?cè)O(shè)計(jì) 37第九章系統(tǒng)設(shè)置主要功能模塊詳細(xì)設(shè)計(jì) 439.1刪除操作員設(shè)計(jì) 43致謝 47參考文獻(xiàn) 49附錄B數(shù)據(jù)表 50企業(yè)進(jìn)銷(xiāo)存管理系統(tǒng)摘要中小企業(yè)在我國(guó)經(jīng)濟(jì)發(fā)展中具有重要地位，目前我國(guó)的中小企業(yè)數(shù)量多，地區(qū)分布廣泛，行業(yè)分布跨度大。隨著全球經(jīng)濟(jì)一體化的發(fā)展和電子商務(wù)的興起，中小企業(yè)之間的競(jìng)爭(zhēng)將越來(lái)越激烈。網(wǎng)絡(luò)及電子商務(wù)的迅猛發(fā)展突破了時(shí)間、空間的局限性，給中小企業(yè)帶來(lái)了更多的發(fā)展機(jī)會(huì)，同時(shí)也增大了企業(yè)之間的競(jìng)爭(zhēng)強(qiáng)度。這就要求中小企業(yè)必須改變企業(yè)的經(jīng)營(yíng)管理模式，提高企業(yè)的運(yùn)營(yíng)效率。目前，我國(guó)中小企業(yè)的信息化水平還很低，相比國(guó)外企業(yè)，還只處于剛開(kāi)始始用的階段。隨著技術(shù)發(fā)展，電腦操作及管理日趨簡(jiǎn)化，電腦知識(shí)日趨普及，同時(shí)市場(chǎng)經(jīng)濟(jì)快速多變，競(jìng)爭(zhēng)激烈，企業(yè)采用電腦管理進(jìn)貨、庫(kù)存、銷(xiāo)售等諸多環(huán)節(jié)也已成為趨勢(shì)及必然。本文通過(guò)對(duì)系統(tǒng)需求的分析，提出進(jìn)貨，銷(xiāo)售，存儲(chǔ)統(tǒng)一管理的設(shè)計(jì)，利用ASP技術(shù)和SQLServer等工具，實(shí)現(xiàn)了企業(yè)進(jìn)銷(xiāo)存管理的設(shè)計(jì)。關(guān)鍵詞：進(jìn)銷(xiāo)存管理系統(tǒng)，商品銷(xiāo)售，商品管理Enterprisepurchase-sell-stockmanagementsystemAbstractSummaryandmedium-sizedenterprisesinChina'seconomicdevelopmenthasanimportantrole,inourSMEs,regionaldistribution,industrydistributionspan.Asglobalisationandtheriseofe-commerce,thecompetitionbetweenthesmallandmediumenterpriseswillbecomemoreandmorefierce.Networkandtherapiddevelopmentofelectroniccommercethroughtimeandspacelimitations,tobringmoreopportunities,butalsoincreasestheintensityofcompetitionbetweenenterprises.Thisrequiresthesmallandmedium-sizedenterprisesmustchangemanagementmodel,improvingtheoperationalefficiencyofyourenterprise.Atpresent,thesmallandmedium-sizedenterprisesintheinformationlevelisstillverylow,comparedtoforeignenterprises,alsoisjustbeginningtobeginwith.Astechnologydevelopment,computeroperationsandmanagementbecomesmoresimplified,thegrowingpopularityofcomputerknowledge,atthesametimefastchangingmarketeconomy,highlycompetitive,enterpriseusingcomputermanagement,purchase,inventory,sales,andmanyotherareashasbecomeoneofthetrendsandinevitable.Thisarticleonthesystemrequirementsanalysis,makepurchases,sales,holdtheunifiedmanagementofdesign,usingASPandSQLServerandothertools,forstockingdesign.Keyword：purchase-sell-stockmanagementsystem,commoditysales,commoditymanagement引言經(jīng)濟(jì)大環(huán)境的變化使得規(guī)模經(jīng)濟(jì)的優(yōu)勢(shì)不再突出。固定的硬設(shè)備、人員數(shù)量、大量資金等資源投入占企業(yè)效益的比重變少，而軟投入如管理、人力資源價(jià)值、服務(wù)、品牌附加值、渠道等要素資源的投入?yún)s能增加企業(yè)的效益。“速度沖擊規(guī)模”的速度經(jīng)濟(jì)概念已經(jīng)向企業(yè)提出。那么對(duì)于日益發(fā)展壯大的企業(yè)集團(tuán)，怎樣才能找到一套功能強(qiáng)大\可任意拓展、低運(yùn)行成本、安全可靠的管理解決方案，來(lái)跟上企業(yè)的發(fā)展，跟上時(shí)代的發(fā)展呢？我們認(rèn)為最好的辦法是利用Internet這個(gè)工具，架構(gòu)自己的供需鏈管理平臺(tái)，使無(wú)處不在的互聯(lián)網(wǎng)為你所用，實(shí)現(xiàn)無(wú)處不在的管理目標(biāo)。讓Internet像電一樣融入到企業(yè)的管理之中，提高企業(yè)在新經(jīng)濟(jì)時(shí)代的核心競(jìng)爭(zhēng)力，通過(guò)對(duì)Internet的高效率使用，在激烈的市場(chǎng)競(jìng)爭(zhēng)中，首先打贏第一仗“信息戰(zhàn)”。正是基于對(duì)Internet的這種深刻認(rèn)識(shí)，針對(duì)中國(guó)企業(yè)特點(diǎn)提出了基于Internet的網(wǎng)絡(luò)商務(wù)管理解決方案——企業(yè)進(jìn)銷(xiāo)存管理系統(tǒng)。

第一章系統(tǒng)分析1.1需求分析通過(guò)調(diào)查，要求系統(tǒng)需要具有以下功能：由于操作人員的計(jì)算機(jī)知識(shí)普遍較差，要求有良好的人機(jī)界面。由于該系統(tǒng)的使用對(duì)象多，要求有較好的權(quán)限管理。方便的數(shù)據(jù)查詢，支持多條件查詢。基礎(chǔ)信息管理與查詢（包括商品信息、客戶信息、供應(yīng)商信息）。通過(guò)計(jì)算機(jī)，能夠直接“透視”倉(cāng)庫(kù)存儲(chǔ)情況。完善的商品采購(gòu)信息、商品銷(xiāo)售信息進(jìn)行管理。方便、健全的結(jié)賬功能。圖表分析年銷(xiāo)售狀況。商品銷(xiāo)售排行統(tǒng)計(jì)。當(dāng)外界環(huán)境（停電、網(wǎng)絡(luò)病毒）干擾本系統(tǒng)時(shí)，系統(tǒng)可以自動(dòng)保護(hù)原始數(shù)據(jù)的安全。數(shù)據(jù)計(jì)算自動(dòng)完成，盡量減少人工干預(yù)。系統(tǒng)退出。1.2可行性分析通過(guò)計(jì)算機(jī)網(wǎng)絡(luò)系統(tǒng)對(duì)企業(yè)進(jìn)行全面的管理，滿足了企業(yè)的現(xiàn)代化管理的要求。經(jīng)濟(jì)性企業(yè)營(yíng)運(yùn)過(guò)程中信息的系統(tǒng)化管理，權(quán)威的數(shù)據(jù)統(tǒng)計(jì)，為企業(yè)的經(jīng)營(yíng)決策提供了大量的、權(quán)威的科學(xué)依據(jù)（數(shù)據(jù)）；強(qiáng)大的賬單結(jié)功能，簡(jiǎn)化了員工的日常工作，提高了工作效率，避免了人工管理過(guò)程中數(shù)據(jù)易錯(cuò)所帶來(lái)的一系列的連鎖反映，提高企業(yè)的經(jīng)濟(jì)效益。技術(shù)性實(shí)際情況下，在高系統(tǒng)配置、高網(wǎng)絡(luò)帶寬服務(wù)，各個(gè)級(jí)別管理員很容易通過(guò)網(wǎng)站對(duì)其操作范圍內(nèi)的系統(tǒng)內(nèi)容信息進(jìn)行操作管理，完全滿足日常經(jīng)營(yíng)、管理的要求。第二章總體設(shè)計(jì)2.1項(xiàng)目規(guī)劃企業(yè)進(jìn)銷(xiāo)存管理系統(tǒng)是一個(gè)典型的數(shù)據(jù)庫(kù)開(kāi)發(fā)應(yīng)用程序，由基礎(chǔ)信息模塊、采購(gòu)管理模塊、庫(kù)存管理模塊、商品銷(xiāo)售模塊、查詢統(tǒng)計(jì)模塊、往來(lái)管理模塊、系統(tǒng)設(shè)置模塊等部分組成，規(guī)劃系統(tǒng)功能模塊如下：基礎(chǔ)信息模塊該模塊主要管理商品信息錄入、客戶信息錄入、供應(yīng)商信息錄入、商品信息查詢、客戶信息查詢、供應(yīng)商信息查詢。采購(gòu)管理模塊該模塊的主要管理商品采購(gòu)信息錄入和商品采購(gòu)信息查詢。庫(kù)存管理模塊該塊主要管理商品入庫(kù)信息、商品入庫(kù)退貨、商品庫(kù)存查詢和庫(kù)存商品價(jià)格調(diào)整。商品銷(xiāo)售模塊該模塊主要管理商品銷(xiāo)售信息錄入和商品銷(xiāo)售退貨信息錄入。查詢統(tǒng)計(jì)模塊該模塊主要管理銷(xiāo)售信息查詢、銷(xiāo)售退貨查詢、商品入庫(kù)查詢、入庫(kù)退貨查詢、商品銷(xiāo)售排行和年銷(xiāo)售額分析。往來(lái)管理模塊該模塊主要管理商品銷(xiāo)售結(jié)賬、入庫(kù)退貨結(jié)賬、銷(xiāo)售結(jié)賬查詢、商品入庫(kù)結(jié)賬、銷(xiāo)售退貨結(jié)賬和入庫(kù)結(jié)賬查詢。系統(tǒng)設(shè)置模塊該模塊主要管理添加操作員、更改操作員密碼、刪除操作員。2.2系統(tǒng)功能結(jié)構(gòu)圖企業(yè)進(jìn)銷(xiāo)存管理系統(tǒng)功能結(jié)構(gòu)如圖1所示。圖1系統(tǒng)功能結(jié)構(gòu)圖第三章系統(tǒng)設(shè)計(jì)3.1設(shè)計(jì)目標(biāo)本系統(tǒng)是針對(duì)中小型企業(yè)運(yùn)營(yíng)進(jìn)銷(xiāo)存過(guò)程所進(jìn)行設(shè)計(jì)的，主要實(shí)現(xiàn)如下目標(biāo)：系統(tǒng)采用人機(jī)對(duì)話方式，界面美觀友好、信息查詢靈活、方便、快捷、準(zhǔn)確、數(shù)據(jù)存儲(chǔ)安全可靠。鍵盤(pán)操作，快速響應(yīng)。強(qiáng)大的銷(xiāo)售結(jié)賬功能。全面的賬單查詢功能。功能強(qiáng)大的年銷(xiāo)售額分析圖、商品銷(xiāo)售排行統(tǒng)計(jì)。實(shí)現(xiàn)各種查詢，如多條件查詢、模糊查詢等。操作員可以隨時(shí)修改自己的口令。管理員可以設(shè)置操作員的權(quán)限對(duì)用戶輸入的數(shù)據(jù)，系統(tǒng)進(jìn)行嚴(yán)格的數(shù)據(jù)檢驗(yàn)，盡可能排除人為的錯(cuò)誤。數(shù)據(jù)保密性強(qiáng)，為每個(gè)用戶設(shè)置權(quán)限級(jí)別。系統(tǒng)最大限度地實(shí)現(xiàn)了易安裝性、易維護(hù)性和易操作性。系統(tǒng)運(yùn)行穩(wěn)定、安全可靠。3.2開(kāi)發(fā)及運(yùn)行環(huán)境硬件平臺(tái)：CPU：P41.8GHz。內(nèi)存：1GB以上。軟件平臺(tái)：操作系統(tǒng)：WindowsXP/Windows2000。數(shù)據(jù)庫(kù)：SQLServer2000。瀏覽器：IE5.0，推薦使用IE6.0。Web服務(wù)器：IIS5.0。分辨率：最佳效果1024×768像素。3.3編碼設(shè)計(jì)編碼設(shè)計(jì)是數(shù)據(jù)庫(kù)系統(tǒng)開(kāi)發(fā)的前提條件，是系統(tǒng)不可缺少的重要內(nèi)容。編碼是指與原來(lái)名稱對(duì)應(yīng)的編號(hào)、符號(hào)或記號(hào)。它是進(jìn)行信息交換、處理、傳輸和實(shí)現(xiàn)信息資源共享的關(guān)鍵。編碼也用于指定數(shù)據(jù)的處理方法、區(qū)別數(shù)據(jù)類(lèi)型，并指定計(jì)算機(jī)處理的內(nèi)容等。本系統(tǒng)內(nèi)部信息編碼采用了統(tǒng)一的編碼方式情況。（1）采購(gòu)編號(hào)為字母“cg”、系統(tǒng)當(dāng)前日期的年限和5位數(shù)字編號(hào)的組合。例如，cg200610005。（2）入庫(kù)單據(jù)編號(hào)為字母“RK”、系統(tǒng)當(dāng)前日期和3位數(shù)字編號(hào)的組合。例如，RK20060110001。（3）入庫(kù)退貨單據(jù)編號(hào)為字母“RT”、系統(tǒng)當(dāng)前日期和3位數(shù)字編號(hào)的組合。例如，RT20060112002。（4）銷(xiāo)售單據(jù)編號(hào)為字母“XS”、系統(tǒng)當(dāng)前日期和3位數(shù)字編號(hào)的組合。例如，XS20060112003。3.4邏輯結(jié)構(gòu)設(shè)計(jì)本系統(tǒng)數(shù)據(jù)庫(kù)采用SQLServer2000數(shù)據(jù)庫(kù)，系統(tǒng)數(shù)據(jù)庫(kù)名稱為sell。數(shù)據(jù)庫(kù)sell中包含24張表。3.41數(shù)據(jù)表概要說(shuō)明為對(duì)本系統(tǒng)后臺(tái)數(shù)據(jù)庫(kù)中數(shù)據(jù)表有個(gè)更清晰的認(rèn)識(shí)，下面設(shè)計(jì)了一個(gè)數(shù)據(jù)表樹(shù)型結(jié)構(gòu)圖（如圖2），該數(shù)據(jù)表樹(shù)型結(jié)構(gòu)圖包含系統(tǒng)所有數(shù)據(jù)表。圖2數(shù)據(jù)表樹(shù)型結(jié)構(gòu)圖3.42．?dāng)?shù)據(jù)表的結(jié)構(gòu)關(guān)于數(shù)據(jù)庫(kù)中的數(shù)據(jù)表請(qǐng)參見(jiàn)附錄B。第四章網(wǎng)站總體架構(gòu)4.1．模塊功能介紹網(wǎng)站首頁(yè)主要包括以下功能模塊：基礎(chǔ)信息：實(shí)現(xiàn)對(duì)客戶、商品、供應(yīng)商基礎(chǔ)信息的管理及信息檢索功能。主要包括客戶信息管理、商品信息管理、供應(yīng)商信息管理、客戶信息查詢、商品信息查詢和供應(yīng)商信息查詢6部分。采購(gòu)管理：實(shí)現(xiàn)對(duì)商品采購(gòu)信息進(jìn)行管理及采購(gòu)信息檢索功能。主要包括商品采購(gòu)和采購(gòu)查詢兩部分。庫(kù)存管理：實(shí)現(xiàn)對(duì)商品入庫(kù)、退貨、庫(kù)存查詢及價(jià)格調(diào)整等信息的綜合管理。主要包括商品入庫(kù)、商品入庫(kù)退貨、庫(kù)存查詢和價(jià)格調(diào)整4部分。商品銷(xiāo)售：實(shí)現(xiàn)對(duì)商品銷(xiāo)售信息及退貨信息進(jìn)行管理的功能。主要包括商品銷(xiāo)售和商品銷(xiāo)售退貨兩部分。查詢統(tǒng)計(jì)：實(shí)現(xiàn)對(duì)進(jìn)、銷(xiāo)商品信息的查詢匯總，并實(shí)現(xiàn)按銷(xiāo)售商品進(jìn)行排行和對(duì)年銷(xiāo)售額進(jìn)行分析等功能。主要包括銷(xiāo)售信息查詢、銷(xiāo)售退貨查詢、商品入庫(kù)查詢、入庫(kù)退貨查詢、商品銷(xiāo)售排行和年銷(xiāo)售額分析6部分。往來(lái)管理：實(shí)現(xiàn)在線的個(gè)人與企業(yè)、企業(yè)與企業(yè)之間的進(jìn)、銷(xiāo)商品往來(lái)結(jié)賬的綜合管理。主要包括商品銷(xiāo)售結(jié)賬、入庫(kù)退貨結(jié)賬、銷(xiāo)售結(jié)賬查詢、商品入庫(kù)結(jié)賬、銷(xiāo)售退貨結(jié)賬和入庫(kù)結(jié)賬查詢6部分。系統(tǒng)設(shè)置：實(shí)現(xiàn)對(duì)操作員信息進(jìn)行維護(hù)。主要包括添加操作員、更改操作員密碼和刪除操作員3部分。4.2．首頁(yè)運(yùn)行結(jié)果企業(yè)進(jìn)銷(xiāo)存管理系統(tǒng)網(wǎng)站首頁(yè)的運(yùn)行結(jié)果如圖3所示。34123412圖3網(wǎng)站首頁(yè)的運(yùn)行結(jié)果首頁(yè)的各部分說(shuō)明以列表形式給出，如表1所示。表1區(qū)域名稱說(shuō)明對(duì)應(yīng)文件1網(wǎng)站主導(dǎo)航區(qū)主要用于顯示網(wǎng)站的旗幟廣告條及為用戶提供網(wǎng)站的功能導(dǎo)航Top.asp2網(wǎng)站子導(dǎo)航區(qū)主要用于管理功能導(dǎo)航Top.asp3功能操作區(qū)主要用于完成各種管理功能Main.asp4退出登錄主要用于退出企業(yè)進(jìn)銷(xiāo)存管理系統(tǒng)Main.asp4.3．創(chuàng)建數(shù)據(jù)庫(kù)連接在進(jìn)行動(dòng)態(tài)網(wǎng)站開(kāi)發(fā)時(shí)，一個(gè)很重要的步驟就是建立數(shù)據(jù)庫(kù)的連接，即訪問(wèn)數(shù)據(jù)庫(kù)。訪問(wèn)數(shù)據(jù)庫(kù)可以用DSN和非DSN兩種方法。應(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ù)源，比較方便。創(chuàng)建數(shù)據(jù)庫(kù)連接主要分兩步進(jìn)行：一是創(chuàng)建數(shù)據(jù)庫(kù)連接文件Conn.asp，二是在需要與數(shù)據(jù)庫(kù)連接的頁(yè)面包含該文件（<!--#includefile="Conn/Conn.asp"-->）。下面進(jìn)行詳細(xì)介紹2。本網(wǎng)站數(shù)據(jù)庫(kù)配置文件為conn.asp，下面兩條代碼在所有對(duì)數(shù)據(jù)庫(kù)的操作中都是必不可少的。由于這段代碼幾乎在后面的每個(gè)對(duì)數(shù)據(jù)庫(kù)操作頁(yè)面都要使用，所以將其保存一個(gè)單獨(dú)的文件夾中，文件名為Conn.asp，在所有與數(shù)據(jù)庫(kù)連接的頁(yè)面中只要包含該文件，就可以連接和打開(kāi)數(shù)據(jù)庫(kù)。<%setconn=server.createobject("adodb.connection")conn.openapplication("dsn")%>通過(guò)Application對(duì)象進(jìn)行事件處理，相關(guān)代碼放在虛目錄的Global.asa文件中，代碼如下：<scriptlanguage="vbscript"runat="server">subapplication_onstartendsubsubsession_onstartapplication("dsn")="driver=sqlserver;server=(local);uid=sa;pwd=;database=sell"endsubsubsession_onendendsubsubapplication_onendendsub</script>第五章用戶登錄模塊設(shè)計(jì)用戶登錄頁(yè)面比較簡(jiǎn)單，為防止用戶的錯(cuò)誤操作，應(yīng)設(shè)置錯(cuò)誤處理頁(yè)面。在登錄操作中，一般發(fā)生的錯(cuò)誤有：用戶輸入了錯(cuò)誤的用戶名或密碼；或用戶直接單擊了【登錄】按鈕。對(duì)上述情況的判斷，我們就要通過(guò)ASP文件來(lái)實(shí)現(xiàn)。用戶登錄頁(yè)面的設(shè)計(jì)效果如圖4所示。圖4用戶登錄頁(yè)面的設(shè)計(jì)效果用戶登錄頁(yè)面中涉及的HTML表單元素如表2所示。表2名稱類(lèi)型含義重要屬性myformform表單action="checklogin.asp"method="post"usernametext用戶名id="username2"PWDpassword密碼style="font-family:Wingdings;width:129;"Submit3button【確定】按鈕onClick="check(myform)"reset1reset【取消】按鈕class="btn_grey"value="取消"利用JavaScript編寫(xiě)檢測(cè)用戶輸入信息是否合法的函數(shù)，并通過(guò)單擊【確定】按鈕調(diào)用該函數(shù)，判斷用戶名或密碼是否為空，如果為空，系統(tǒng)將給予提示。當(dāng)用戶輸入合法信息后，提交該表單，完整代碼如下3：<scriptlanguage="javascript">functioncheck(myform){if(myform.username.value==""){//判斷用戶名是否為空，并彈出提示對(duì)話框 alert("請(qǐng)輸入用戶名！");myform.username.focus();return;}if(myform.PWD.value==""){//判斷密碼是否為空，并彈出提示對(duì)話框 alert("請(qǐng)輸入密碼！");myform.PWD.focus();return;} myform.submit();}</script>在登錄頁(yè)面時(shí)，當(dāng)用戶提交了登錄資料后，就由表單action屬性指定的ASP文件在服務(wù)器端對(duì)這些資料進(jìn)行驗(yàn)證。它的工作主要是判斷用戶的登錄的用戶名和密碼是否正確。完成這些工作，就必須從連接儲(chǔ)存用戶數(shù)據(jù)庫(kù)中取出相關(guān)的信息記錄。如果記錄驗(yàn)證無(wú)誤，就通過(guò)ASP的Response對(duì)象的redirect方法，將用戶登錄的頁(yè)面?zhèn)鞯娇蛻舳说臑g覽器上；如果用戶輸入了錯(cuò)誤的用戶名或密碼，就通過(guò)ASP的Response對(duì)象的Write方法彈出錯(cuò)誤提示。在開(kāi)始編寫(xiě)程序之前，首先使用Session來(lái)存儲(chǔ)用戶的相關(guān)信息，并與客戶端保持聯(lián)系。本頁(yè)使用session("ulogin")以存儲(chǔ)在數(shù)據(jù)庫(kù)中的標(biāo)識(shí)符作為信息記載，并以判斷這個(gè)值是否為空來(lái)判斷用戶是否登錄。表單提交到處理頁(yè)后會(huì)驗(yàn)證用戶登錄的身份，完整代碼如下：<!--#includevirtual="adovbs.inc"--><!--#includefile="Conn/Conn.asp"--><!--包含數(shù)據(jù)庫(kù)連接文件--><%Session.Timeout=30'設(shè)置Session的過(guò)期時(shí)間為30分鐘session("ulogin")="no"cname=trim(request("username"))'獲取用戶名pass=request.Form("PWD")'獲取密碼pass=replace(pass,"'","")setconn=server.createobject("adodb.connection")setcomm=server.CreateObject("mand")'創(chuàng)建對(duì)象conn.openapplication("dsn")'打開(kāi)數(shù)據(jù)庫(kù)setcomm.activeconnection=mandtype=mandtext="checklogin"setmpf=comm.createparameter("cname",advarchar,adparaminput,20)comm.parameters.appendmpfsetmps=comm.createparameter("pass",advarchar,adparaminput,20)comm.parameters.appendmpscomm("cname")=cnamecomm("pass")=passsetrs=comm.executeifrs.eofthen response.Write("<scriptlanguage='JavaScript'>alert('請(qǐng)輸入正確的用戶名和密碼');window.location.href='login.asp';</script>")'彈出提示對(duì)話框，并轉(zhuǎn)向指定頁(yè)面else session("id")=rs("id") session("name")=rs("name") session("quan")=rs("quan") session("ulogin")="yes" response.redirect"default.asp"'跳轉(zhuǎn)到管理頁(yè)面endif%>在理解了Session的基礎(chǔ)上，我們知道上述代碼首先是把存儲(chǔ)用戶信息并與客戶端保持關(guān)聯(lián)的Session("ulogin")初始化，賦予空值。在接收數(shù)據(jù)庫(kù)后，打開(kāi)數(shù)據(jù)庫(kù)，取出標(biāo)識(shí)符，把它賦給Session("ulogin")。如果不存在該用戶，則彈出錯(cuò)誤提示，并跳回到登錄頁(yè)面。用戶登錄頁(yè)面的運(yùn)行結(jié)果如圖5所示。圖5用戶登錄頁(yè)面的運(yùn)行結(jié)果第六章網(wǎng)站首頁(yè)設(shè)計(jì)網(wǎng)站首頁(yè)采用框架技術(shù)將菜單導(dǎo)航區(qū)和主體控制區(qū)分裝在兩個(gè)框架里，以便在同一個(gè)頁(yè)面中管理多個(gè)頁(yè)。菜單導(dǎo)航區(qū)顧名思義，主要用于實(shí)現(xiàn)網(wǎng)站首頁(yè)管理功能的導(dǎo)航；主體控制區(qū)主要用于顯示每個(gè)管理模塊的內(nèi)容。網(wǎng)站首頁(yè)主要包括以下功能模塊：菜單主導(dǎo)航區(qū)：主要用于顯示網(wǎng)站的旗幟廣告條及為用戶提供網(wǎng)站的功能導(dǎo)航。菜單子導(dǎo)航區(qū)：主要用于管理功能導(dǎo)航。主體操作區(qū)：主要用于完成各種管理功能。退出登錄：主要用于退出企業(yè)進(jìn)銷(xiāo)存管理系統(tǒng)。菜單主導(dǎo)航區(qū)的完整代碼如下：<html><head><title>企業(yè)進(jìn)銷(xiāo)存管理系統(tǒng)</title><metahttp-equiv="Content-Type"content="text/html;charset=gb2312"></head><framesetrows="99,*"cols="*"framespacing="0"frameborder="no"border="0"><framesrc="Top.asp"frameborder="no"scrolling="no"><framesrc="main.asp"name="mainF"scrolling="auto"></frameset><noframes><body></body></noframes></html>菜單子導(dǎo)航區(qū)的關(guān)鍵代碼如下：<%response.buffer=trueresponse.expires=0ifsession("ulogin")<>"yes"then'判斷是否登錄response.write("<script>parent.location.href='login.asp'</script>")'重新定向頁(yè)面response.End()endif%><ahref="#"onClick="Fsubmenu('基礎(chǔ)')">基礎(chǔ)信息</a>|<ahref="#"onClick="Fsubmenu('采購(gòu)')">采購(gòu)管理</a>|<ahref="#"onClick="Fsubmenu('庫(kù)存')">庫(kù)存管理</a>|<ahref="#"onClick="Fsubmenu('銷(xiāo)售')">商品銷(xiāo)售</a>|<ahref="#"onClick="Fsubmenu('查詢')">查詢統(tǒng)計(jì)</a>|<ahref="#"onClick="Fsubmenu('往來(lái)')">往來(lái)管理</a>|<ahref="#"onClick="Fsubmenu('系統(tǒng)')">系統(tǒng)設(shè)置</a><scriptlanguage="JavaScript">vartoday=newDate();varmonth=today.getMonth()+1if(today.getDay()==1){document.write(" "+today.getYear()+"年"+month+"月"+today.getDate()+"日星期一");}if(today.getDay()==2){document.write(" "+today.getYear()+"年"+month+"月"+today.getDate()+"日星期二");}if(today.getDay()==3){document.write(" "+today.getYear()+"年"+month+"月"+today.getDate()+"日星期三");}if(today.getDay()==4){document.write(" "+today.getYear()+"年"+month+"月"+today.getDate()+"日星期四");}if(today.getDay()==5){document.write(" "+today.getYear()+"年"+month+"月"+today.getDate()+"日星期五");}if(today.getDay()==6){document.write(" "+today.getYear()+"年"+month+"月"+today.getDate()+"日星期六");}if(today.getDay()==0){document.write(" "+today.getYear()+"年"+month+"月"+today.getDate()+"日星期日");}</script><scriptlanguage="javascript">functionFsubmenu(value){ switch(value){ case"基礎(chǔ)": submenu.innerHTML="<ahref='jcxx/khinfo.asp'target='mainF'>客戶信息管理</a>|<ahref='jcxx/spinfo.asp'target='mainF'>商品信息管理</a>|<ahref='jcxx/gysinfo.asp'target='mainF'>供應(yīng)商信息管理</a>|<ahref='jcxx/khindex.asp'target='mainF'>客戶信息查詢</a>|<ahref='jcxx/spindex.asp'target='mainF'>商品信息查詢</a>|<ahref='jcxx/gysindex.asp'target='mainF'>供應(yīng)商信息查詢</a>"; break; case"采購(gòu)"://類(lèi)型為采購(gòu)時(shí)，進(jìn)入相應(yīng)的處理頁(yè)面 submenu.innerHTML="<ahref='cggl/spcg.asp'target='mainF'>商品采購(gòu)</a>|<ahref='cggl/cgindex.asp'target='mainF'>采購(gòu)查詢</a>"; break; case"庫(kù)存"://類(lèi)型為庫(kù)存時(shí)，進(jìn)入相應(yīng)的處理頁(yè)面 submenu.innerHTML="<ahref='kcgl/sprk.asp'target='mainF'>商品入庫(kù)</a>|<ahref='kcgl/rkth.asp'target='mainF'>商品入庫(kù)退貨</a>|<ahref='kcgl/kcindex.asp'target='mainF'>庫(kù)存查詢</a>|<ahref='kcgl/jgtz.asp'target='mainF'>價(jià)格調(diào)整</a>"; break; case"銷(xiāo)售"://類(lèi)型為銷(xiāo)售時(shí)，進(jìn)入相應(yīng)的處理頁(yè)面 submenu.innerHTML="<ahref='spxs/spxs.asp'target='mainF'>商品銷(xiāo)售</a>|<ahref='spxs/spxsth.asp'target='mainF'>商品銷(xiāo)售退貨</a>|<ahref='jcxx/spinfo.asp'target='mainF'>"; break; case"查詢"://類(lèi)型為查詢時(shí)，進(jìn)入相應(yīng)的處理頁(yè)面 submenu.innerHTML="<ahref='cxtj/xsindex.asp'target='mainF'>銷(xiāo)售信息查詢</a>|<ahref='cxtj/xsthindex.asp'target='mainF'>銷(xiāo)售退貨查詢</a>|<ahref='cxtj/rkindex.asp'target='mainF'>商品入庫(kù)查詢</a>|<ahref='cxtj/rkthindex.asp'target='mainF'>入庫(kù)退貨查詢</a>|<ahref='cxtj/xsph.asp'target='mainF'>商品銷(xiāo)售排行</a>|<ahref='cxtj/yearxsfx.asp'target='mainF'>年銷(xiāo)售額分析</a>"; break; case"往來(lái)"://類(lèi)型為往來(lái)時(shí)，進(jìn)入相應(yīng)的處理頁(yè)面 submenu.innerHTML="<ahref='wlgl/ysgl/xsjz.asp'target='mainF'>商品銷(xiāo)售結(jié)賬</a>|<ahref='wlgl/ysgl/rkthjz.asp'target='mainF'>入庫(kù)退貨結(jié)賬</a>|<ahref='wlgl/ysgl/xsjzindex.asp'target='mainF'>銷(xiāo)售結(jié)賬查詢</a>|<ahref='wlgl/yfgl/rkjz.asp'target='mainF'>商品入庫(kù)結(jié)賬</a>|<ahref='wlgl/yfgl/xsthjz.asp'target='mainF'>銷(xiāo)售退貨結(jié)賬</a>|<ahref='wlgl/yfgl/rkjzindex.asp'target='mainF'>入庫(kù)結(jié)賬查詢</a>"; break; case"系統(tǒng)"://類(lèi)型為系統(tǒng)時(shí)，進(jìn)入相應(yīng)的處理頁(yè)面 submenu.innerHTML="<ahref='xtsz/addczy.asp'target='mainF'>添加操作員</a>|<ahref='xtsz/midczy.asp'target='mainF'>更改操作員密碼</a>|<ahref='xtsz/delczy.asp'target='mainF'>刪除操作員</a>"; break; }}</script>退出導(dǎo)航區(qū)的完整代碼如下：<%Session.Abandon()response.write("<script>parent.location.href='login.asp'</script>")'父窗口重新定向到登錄頁(yè)面%>第七章基礎(chǔ)信息主要功能模塊詳細(xì)設(shè)計(jì)7.1商品信息管理設(shè)計(jì)用戶可以通過(guò)單擊菜單主導(dǎo)航“基礎(chǔ)信息”/“商品信息管理”超鏈接，進(jìn)入商品信息管理頁(yè)面。該頁(yè)面主要完成商品信息的添加4。商品信息管理頁(yè)面設(shè)計(jì)效果如圖6所示。圖6商品信息管理頁(yè)面設(shè)計(jì)效果商品信息管理頁(yè)面中涉及的HTML表單元素如表3所示。表3商品信息管理頁(yè)面中涉及的HTML表單元素名稱類(lèi)型含義重要屬性form1form表單action="checkspinfo.asp"method="post"selselect供應(yīng)商全稱<%whilenotrs.eof%><optionvalue=<%=rs("name")%>><%=rs("name")%></option><%rs.movenextwend%>memotext備注onkeyup="if(event.keyCode==13){send()}"subbbutton【保存信息】按鈕onclick="send()"Resreset【清除重寫(xiě)】按鈕onclick="res()"利用JavaScript編寫(xiě)檢測(cè)用戶輸入信息是否合法的函數(shù)，并通過(guò)單擊【保存信息】按鈕調(diào)用該函數(shù)，當(dāng)用戶輸入合法信息后，提交該表單。關(guān)鍵代碼如下：<!--#includefile="spsub.inc"--><%setconn=server.CreateObject("adodb.connection")'創(chuàng)建數(shù)據(jù)庫(kù)對(duì)象setrs=server.CreateObject("adodb.recordset")'創(chuàng)建記錄集對(duì)象conn.openapplication("dsn")sql="select*fromtab_gysinfo"rs.opensql,conn,1,3'打開(kāi)記錄集%>商品信息添加時(shí)的數(shù)據(jù)處理頁(yè)主要是將用戶提交的表單信息保存到數(shù)據(jù)庫(kù)中，數(shù)據(jù)處理頁(yè)的程序代碼如下：<%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"))setconn=server.createobject("adodb.connection")setrs=server.createobject("adodb.recordset")setmyrs=server.createobject("adodb.recordset")setrec=server.createobject("adodb.recordset")conn.openapplication("dsn")sql="selectidfromtab_spinfo"rs.opensql,conn,1,3ifnotrs.eofthen'如果沒(méi)到記錄尾sql="selectmax(id)asidfromtab_spinfo"myrs.opensql,conn,1,3str=myrs("id")spid=cint(mid(str,3,4))+1spid="sp"&spidelsespid="sp1001"endifsql="insertintotab_spinfo(id,spname,jc,cd,dw,gg,bz,ph,pzwh,gysname,memo)values('"&spid&"','"&spname&"','"&jc&"','"&cd&"','"&dw&"','"&gg&"','"&bz&"','"&ph&"','"&pzwh&"','"&gysname&"','"&memo&"')"'插入新記錄rec.opensql,conn,1,3%><scriptlanguage="javascript"> alert("商品信息添加成功！");//彈出對(duì)話框 window.location.href="spinfo.asp";//重新定向指定頁(yè)面</script>商品信息管理頁(yè)面的運(yùn)行結(jié)果如圖7所示。圖7商品信息管理頁(yè)面的運(yùn)行結(jié)果7.2商品信息查詢?cè)O(shè)計(jì)用戶可以通過(guò)單擊菜單主導(dǎo)航“基礎(chǔ)信息”/“商品信息查詢”超鏈接，進(jìn)入商品信息查詢頁(yè)面。該頁(yè)面主要完成商品信息的檢索5。商品信息查詢頁(yè)面設(shè)計(jì)效果如圖8所示。圖8商品信息查詢頁(yè)面設(shè)計(jì)效果商品信息查詢頁(yè)面中涉及的HTML表單元素如表4所示。表4名稱類(lèi)型含義重要屬性myformform表單action="checkspindex.asp"method="post"target="mainF"selselect選擇查詢字段<optionvalue="spname"selected>商品名稱</option>……<optionvalue="gg">規(guī)格</option>tselselect選擇條件運(yùn)算符<optionvalue="="selected>等于</option><optionvalue="like">LIKE</option>qnametext輸入查詢關(guān)鍵字id="qname"onkeyup="ti()"Submitbutton【查詢】按鈕onclick="send()"butbutton【顯示全部數(shù)據(jù)】按鈕id="but"onclick="list()"用戶可以在商品信息查詢頁(yè)面中的查詢部分，輸入一定的條件進(jìn)行商品信息的查詢。利用JavaScript編寫(xiě)檢測(cè)用戶輸入信息是否為空的函數(shù)，并通過(guò)單擊【查詢】按鈕調(diào)用該函數(shù)，當(dāng)用戶輸入合法信息后，提交該表單。關(guān)鍵代碼如下：<scriptlanguage="javascript">functionsend(){if(myform.qname.value==""){alert("請(qǐng)輸入查詢內(nèi)容");myform.qname.focus();returnfalse}//彈出提示對(duì)話框，并把焦點(diǎn)停留在指定位置myform.submit()}</script>應(yīng)用JavaScript動(dòng)態(tài)向select中添加一個(gè)新的選項(xiàng)“all”，并將該選項(xiàng)設(shè)置為被選擇的項(xiàng)，通過(guò)單擊【顯示全部數(shù)據(jù)】按鈕調(diào)用該函數(shù)。關(guān)鍵代碼如下：<scriptlanguage="javascript">functionlist(){myform.tptsel.options[myform.tptsel.length]=newOption("all","all");myform.tptsel[myform.tptsel.length-1].selected=true;myform.submit()}</script>商品信息展示頁(yè)面檢索數(shù)據(jù)庫(kù)的程序代碼如下：<%path=request.servervariables("path_info")setconn=server.createobject("adodb.connection")'創(chuàng)建數(shù)據(jù)庫(kù)對(duì)象setrs=server.createobject("adodb.recordset")'創(chuàng)建記錄集對(duì)象conn.openapplication("dsn")'打開(kāi)數(shù)據(jù)庫(kù)ifrequest("tptsel")<>""then tj=request("tptsel") lname=request("qname") jname=request("sel") session("tj")=tj session("lname")=lname session("jname")=jnameendif'查詢ifsession("tj")="="then'精確查詢 sql="select*fromtab_spinfowhere"&session("jname")&"='"&session("lname")&"'"endififsession("tj")="like"then'模糊查詢 sql="select*fromtab_spinfowhere"&session("jname")&"like'%"&session("lname")&"%'"endififsession("tj")="all"then'查詢?nèi)?sql="select*fromtab_spinfo"endifrs.opensql,conn,1,3%>分頁(yè)顯示查詢結(jié)果的代碼如下：<%'分頁(yè)rs.pagesize=5'每頁(yè)顯示的記錄數(shù)page=clng(request("page"))'獲取當(dāng)前頁(yè)碼ifpage<1thenpage=1ifpage>rs.pagecountthenpage=rs.pagecountshowrs,page'分頁(yè)子程序開(kāi)始subshow(rs,page)rs.absolutepage=page'將記錄指針定位到指定頁(yè)fori=1tors.pagesizers.movenextifrs.eofthenexitfor'如果到記錄尾結(jié)束循環(huán)nextendsub%>使用如下代碼來(lái)為其他頁(yè)面添加超鏈接：<formaction="checkspindex.asp"method="post"><divalign="center"><%ifpage<>1then%><fontsize="2"><ahref=<%=path%>?page=1>第一頁(yè)</a></font><ahref=<%=path%>?page=<%=(1)%>>上一頁(yè)</a><%endififpage<>rs.pagecountthen%><ahref=<%=path%>?page=<%=(page+1)%>>下一頁(yè)</a><ahref=<%=path%>?page=<%=rs.pagecount%>>最后一頁(yè)</a><%endif%><fontcolor="#336699">輸入頁(yè)次<inputtype="text"name="page"size="3">頁(yè)次</font><fontcolor=red><%=page%>/<%=rs.pagecount%></font>[<ahref="spindex.asp">返回</a>]</div></form>商品信息查詢頁(yè)面的運(yùn)行結(jié)果如圖9、圖10所示。圖9商品信息查詢條件頁(yè)面運(yùn)行結(jié)果圖10商品信息查詢結(jié)果頁(yè)面運(yùn)行結(jié)果第八章采購(gòu)管理主要功能模塊詳細(xì)設(shè)計(jì)采購(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)和采購(gòu)查詢兩部分。8.1商品采購(gòu)管理設(shè)計(jì)用戶可以通過(guò)單擊菜單主導(dǎo)航“采購(gòu)管理”/“商品采購(gòu)”超鏈接，進(jìn)入商品采購(gòu)管理頁(yè)面。該頁(yè)面主要完成商品采購(gòu)信息的添加功能6。商品采購(gòu)管理頁(yè)面設(shè)計(jì)效果如圖11所示。圖11商品采購(gòu)頁(yè)面設(shè)計(jì)效果商品采購(gòu)頁(yè)面中涉及的HTML表單重要元素如表5所示。表5名稱類(lèi)型含義重要屬性form1form表單action="checkspcg.asp"method="post"idhidden采購(gòu)單號(hào)value="<%=session("auto")%>"cgdatetext采購(gòu)日期value="<%=date()%>"buttonbutton【提交】按鈕onclick="send()"Submitreset【重填】按鈕class="btn_grey"value="重填"生成采購(gòu)單號(hào)的相關(guān)代碼如下：<%setconn=server.CreateObject("adodb.connection")'創(chuàng)建數(shù)據(jù)庫(kù)對(duì)象setrs=server.CreateObject("adodb.recordset")'創(chuàng)建記錄集對(duì)象setmyrs=server.CreateObject("adodb.recordset")'創(chuàng)建記錄集對(duì)象setrec=server.CreateObject("adodb.recordset")'創(chuàng)建記錄集對(duì)象conn.openapplication("dsn")'打開(kāi)數(shù)據(jù)庫(kù)sql="selectidfromtab_cgdan"rs.opensql,conn,1,3'打開(kāi)記錄集str=myrs("id")cgid=cint(mid(str,7,5))+1cgid="cg"&year(date())&cstr(cgid)elsecgid="cg"&year(date())&"10001"endifsession("auto")=cgid'生成采購(gòu)單號(hào)%>采購(gòu)信息添加時(shí)的數(shù)據(jù)處理頁(yè)主要是將用戶提交的表單信息保存到數(shù)據(jù)庫(kù)中，數(shù)據(jù)處理頁(yè)的程序代碼如下：<%ifrequest("id")<>""thencgid=request("id")spname=request("spname")cs=request("cs")gg=request("gg")bz=request("bz")dw=request("dw")dj=request("dj")sl=request("sl")je=request("je")cgdate=request("cgdate")memo=request("memo")dj=cstr(dj)&"元"sl=cstr(sl)&dwje=cstr(je)&"元"ifspname=""orcs=""orgg=""orbz=""ordw=""ordj="0"orsl="0"orje="0"then'判斷表單元素是否為空%><scriptlanguage="javascript">alert("您必須全部填寫(xiě)")//彈出提示對(duì)話框history.back(1)//返回上一級(jí)頁(yè)面</script><%response.endendifsetconn=server.createobject("adodb.connection")setrs=server.createobject("adodb.recordset")conn.openapplication("dsn")sql="insertintotab_cgdan(id,spname,cs,gg,bz,dw,dj,sl,je,cgdate,memo)values('"&cgid&"','"&spname&"','"&cs&"','"&gg&"','"&bz&"','"&dw&"','"&dj&"','"&sl&"','"&je&"','"&cgdate&"','"&memo&"')"'插入新記錄rs.opensql,conn,1,3endif%><scriptlanguage="javascript"> alert("采購(gòu)信息保存成功！");'彈出提示對(duì)話框 window.location.href="spcg.asp";'重新定向頁(yè)面</script>商品采購(gòu)頁(yè)面的運(yùn)行結(jié)果如圖12所示。圖12商品采購(gòu)頁(yè)面的運(yùn)行結(jié)果8.2采購(gòu)查詢?cè)O(shè)計(jì)采購(gòu)查詢是為采購(gòu)員提供的對(duì)采購(gòu)信息進(jìn)行查詢的功能，以便跟蹤采購(gòu)信息的執(zhí)行情況，為企業(yè)的采購(gòu)決策提供依據(jù)。用戶可以通過(guò)單擊菜單主導(dǎo)航“采購(gòu)管理”/“采購(gòu)查詢”超鏈接，進(jìn)入采購(gòu)查詢頁(yè)面。該頁(yè)面主要完成采購(gòu)信息的檢索。采購(gòu)查詢頁(yè)面設(shè)計(jì)效果如圖13所示。圖13采購(gòu)查詢頁(yè)面設(shè)計(jì)效果采購(gòu)查詢頁(yè)面中涉及的HTML表單元素如表6所示。表6名稱類(lèi)型含義重要屬性myformfrom表單action="checkcgindex.asp"method="post"flagcheckbox復(fù)選框class="noborder"id="flag"value="1"checkedselselect選擇查詢字段<optionvalue="spname"selected>商品名稱</option><optionvalue="cs">廠商</option>tjselect選擇條件運(yùn)算符<optionvalue="="selected>等于</option><optionvalue="like">LIKE</option>>qnametext輸入查詢關(guān)鍵字id="qname"subbbutton【查詢】按鈕onClick="send()"flagcheckbox復(fù)選框class="noborder"id="flag"value="2"sdatetext起始日期value="<%=year(date)&"-01-01"%>"edatetext截止日期value="<%=date()%>"butbutton【顯示全部數(shù)據(jù)】按鈕onClick="window.location.href='checkcgindex.asp?type=all'"用戶可以在采購(gòu)查詢頁(yè)面中的查詢部分，輸入一定的查詢條件，單擊【查詢】按鈕后，用戶添加查詢條件將被提交給本頁(yè)，本頁(yè)則將根據(jù)用戶提交的表單對(duì)數(shù)據(jù)庫(kù)進(jìn)行檢索，并將查詢結(jié)果集通過(guò)信息展示部分輸出到瀏覽器中，數(shù)據(jù)處理頁(yè)的程序代碼如下：<!--#includefile="../conn/conn.asp"--><%setrs=server.createobject("adodb.recordset")ifrequest.QueryString("type")="all"then'顯示全部?jī)?nèi)容 sql="select*fromtab_cgdan"else flag=request.Form("flag") i=0'為變量賦初始值 ifflag<>""thenifinstr(flag,"1")>0then'當(dāng)有一個(gè)條件時(shí)進(jìn)行相應(yīng)的處理 sel=request.Form("sel") tj=request.Form("tj") qname=request.Form("qname") i=1 flag_deal="inIF" endif ifinstr(flag,"2")>0then'當(dāng)有兩個(gè)條件時(shí)進(jìn)行相應(yīng)的處理 sdate=request.Form("sdate") edate=request.Form("edate") i=i+1 flag_deal="inDate" endif ifi>1then flag_deal="double" endif session("flag")=flag_deal'創(chuàng)建Session變量 session("sel")=sel session("tj")=tj session("qname")=qname session("sdate")=sdate session("edate")=edateendif'查詢條件判斷selectcasesession("flag") case"inIF" ifsession("tj")="="then'精確查詢 sql="select*fromtab_cgdanwhere"&session("sel")&"='"&session("qname")&"'" else'模糊查詢 sql="select*fromtab_cgdanwhere"&session("sel")&"like'%"&session("qname")&"%'" endif case"inDate"'日期查詢 sql="select*fromtab_cgdanwherecgdatebetween'"&session("sdate")&"'and'"&session("edate")&"'" case"double"'多條件的精確查詢 ifsession("tj")="="then sql="select*fromtab_cgdanwhere"&session("sel")&"='"&session("qname")&"'andcgdatebetween'"&session("sdate")&"'and'"&session("edate")&"'" else'多條件的模糊查詢 sql="select*fromtab_cgdanwhere"&session("sel")&"like'%"&session("qname")&"%'andcgdatebetween'"&session("sdate")&"'and'"&session("edate")&"'" endif caseelseresponse.Redirect("cgindex.asp")'重新定向到指定頁(yè)面endselectendifrs.opensql,conn,1,3ifrs.eofthen%> <scriptlanguage="JavaScript"> alert("沒(méi)有找到您要查詢的記錄!")'彈出提示對(duì)話框 history.back(1)'返回上一級(jí)頁(yè)面 </script> <%response.End()endif%>采購(gòu)查詢頁(yè)面的運(yùn)行結(jié)果如圖14、圖15所示。圖14采購(gòu)查詢條件頁(yè)面運(yùn)行結(jié)果圖15采購(gòu)查詢結(jié)果頁(yè)面運(yùn)行結(jié)果第九章系統(tǒng)設(shè)置主要功能模塊詳細(xì)設(shè)計(jì)系統(tǒng)設(shè)置頁(yè)面主要是對(duì)操作員的信息進(jìn)行添加、修改、刪除的操作。主要包括添加操作員、更改操作員密碼、刪除操作員3部分。9.1刪除操作員設(shè)計(jì)用戶可以通過(guò)單擊菜單主導(dǎo)航“系統(tǒng)設(shè)置”/“刪除操作員”超鏈接，進(jìn)入刪除操作員頁(yè)面，用戶單擊“刪除操作員”圖片鏈接進(jìn)行操作員刪除操作9。刪除操作員頁(yè)面的設(shè)計(jì)效果如圖33所示。圖33刪除操作員頁(yè)面的設(shè)計(jì)效果首先進(jìn)行判斷當(dāng)前用戶是否具備刪除操作員的權(quán)限，完整代碼如下：<!--#includefile="../conn/conn.asp"--><%setrs=server.createobject("adodb.recordset")sql="select*fromuserlistwherename='"&session("name")&"'andquan='a'"rs.opensql,conn,1,3ifrs.eofthen%><scriptlanguage="javascript">alert("對(duì)不起！您沒(méi)有這個(gè)權(quán)限")//彈出提示對(duì)話框history.back(1)//返回上一級(jí)頁(yè)面</script><%response.end()endifrs.close()'關(guān)閉數(shù)據(jù)集setrs=nothing'將數(shù)據(jù)集在系統(tǒng)內(nèi)存中清除%>首先通過(guò)查詢語(yǔ)句檢索userlist數(shù)據(jù)表中的全部數(shù)據(jù)，并按照權(quán)限進(jìn)行順序排序，檢索數(shù)據(jù)庫(kù)表中是否有該操作員的信息，如果沒(méi)有檢索到，則彈出相應(yīng)的信息提示，代碼如下：<%setrs=server.createobject("adodb.recordset")sql="select*fromuserlistorderbyquan"'查詢數(shù)據(jù)rs.opensql,conn,1,3ifrs.eofthen%> <scriptlanguage="javascript"> alert("暫無(wú)操作員信息!"); parent.location.href="login.asp";//跳轉(zhuǎn)到指定頁(yè)面 </script><%response.End()else%><%fori=1tors.recordcount%><trbgcolor="#CCE3FF"><tdalign="center"><%=rs("name")%></td> <% ifrs("quan")="a"thenquan="系統(tǒng)管理員" ifrs("quan")="c"thenquan="普通管理員" %><tdalign="center"><%=quan%></td><tdalign="center"><ahref="delczy_deal.asp?id=<%=rs("id")%>"><imgsrc="../images/del.gif"width="22"height="22"border="0"></a></td></tr><%rs.movenextnext%><%endif%>從上面的代碼中可以看出，首先利用for循環(huán)語(yǔ)句來(lái)判斷變量quan的值，來(lái)確定當(dāng)前操作員的管理權(quán)限。如果變量“quan”的值為a，那么權(quán)限為系統(tǒng)管理員；如果變量“quan”的值為c，那么權(quán)限為普通管理員。為了方便用戶從操作員列表中刪除指定的操作員信息，在每一條記錄后都添加了一個(gè)刪除操作員信息的圖片按鈕，使用如下代碼來(lái)為刪除操作員圖片添加超鏈接。<ahref="delczy_deal.asp?id=<%=rs("id")%>"><imgsrc="../images/del.gif"width="22"height="22"border="0"></a>操作員信息刪除主要是根據(jù)傳遞的參數(shù)（本例是操作員信息的id號(hào)，參數(shù)名稱為id），將數(shù)據(jù)庫(kù)中對(duì)應(yīng)的數(shù)據(jù)刪除，其程序代碼如下：<!--#includefile="../conn/conn.asp"--><%qID=request.QueryString("id")ifqID<>""then response.Write("<scriptlanguage='javascript'>if(!confirm('真的要?jiǎng)h除該操作員嗎?')){window.location.href='delczy.asp';}</script>")'彈出提示對(duì)話框，“確定”執(zhí)行程序，“取消”不執(zhí)行 onerrorresumenext sql="deletefromuserlistwhereid='"&qID&"'"'刪除指定記錄 conn.execute(sql) iferr<>0then response.Write("<scriptlanguage='javascript'>alert('操作員信息刪除失敗!');window.location.href='delczy.asp';</script>") else response.Write("<scriptlanguage='javascript'>alert('操作員信息刪除成功!');window.location.href='delczy.asp';</script>") endifelse response.Write("<scriptlanguage='javascript'>window.location.href='delczy.asp';</script>")endif%>刪除操作員頁(yè)面的運(yùn)行結(jié)果如圖34所示。圖21刪除操作員頁(yè)面的運(yùn)行結(jié)果致謝四年的讀書(shū)生活在這個(gè)季節(jié)即將劃上一個(gè)句號(hào)，而于我的人生卻只是一個(gè)逗號(hào)，我將面對(duì)又一次征程的開(kāi)始。四年的求學(xué)生涯在師長(zhǎng)、親友的大力支持下，走得辛苦卻也收獲滿囊，可是我更急切地要把我的敬意獻(xiàn)給我的導(dǎo)師。我不是您最出色的學(xué)生，而您卻是我最尊敬的老師。您治學(xué)嚴(yán)謹(jǐn)，學(xué)識(shí)淵博，思想深邃，視野雄闊，為我營(yíng)造了一種良好的精神氛圍。授人以魚(yú)不如授人以漁，置身其間，耳濡目染，潛移默化，使我不僅接受了全新的思想觀念，樹(shù)立了宏偉的學(xué)術(shù)目標(biāo)，領(lǐng)會(huì)了基本的思考方式，從論文題目的選定到論文寫(xiě)作的指導(dǎo),經(jīng)由您悉心的點(diǎn)撥,再經(jīng)思考后的領(lǐng)悟,常常讓我有“山重水復(fù)疑無(wú)路,柳暗花明又一村”。感謝我的爸爸媽媽，焉得諼草，言樹(shù)之背，養(yǎng)育之恩，無(wú)以回報(bào)，你們永遠(yuǎn)健康快樂(lè)是我最大的心愿。在論文即將完成之際，我的心情無(wú)法平靜，從開(kāi)始進(jìn)入課題到論文的順利完成，有多少可敬的師長(zhǎng)、同學(xué)、朋友給了我無(wú)言的幫助，在這里請(qǐng)接受我誠(chéng)摯謝意！最后再一次感謝所有在畢業(yè)設(shè)計(jì)中曾經(jīng)幫助過(guò)我的良師益友和同學(xué)，以及在設(shè)計(jì)中被我引用或參考的論著的作者。結(jié)論：經(jīng)過(guò)兩個(gè)多月的努力，企業(yè)進(jìn)銷(xiāo)存管理系統(tǒng)設(shè)計(jì)終于完成在整個(gè)設(shè)計(jì)過(guò)程中，出現(xiàn)過(guò)很多的難題，但都在老師和同學(xué)的幫助下順利解決了，在不斷的學(xué)習(xí)過(guò)程中我體會(huì)到：寫(xiě)論文是一個(gè)不斷學(xué)習(xí)的過(guò)程，從最初剛寫(xiě)論文時(shí)對(duì)企業(yè)進(jìn)銷(xiāo)存的問(wèn)題的模糊認(rèn)識(shí)到最后能夠?qū)υ搯?wèn)題有深刻的認(rèn)識(shí)，我體會(huì)到實(shí)踐對(duì)于學(xué)習(xí)的重要性，以前只是明白理論，沒(méi)有經(jīng)過(guò)實(shí)踐考察，對(duì)知識(shí)的理解不夠明確，通過(guò)這次的做，真正做到理論實(shí)