【正文】 （推薦使用 ） 基本設(shè)計(jì)概念和處理流程 畢業(yè)論文 第 22 頁 共 74 頁 (1) 供應(yīng)商信息管理 圖 (2) 顧客信息管理 圖 (3) 商品信息管理 畢業(yè)論文 第 23 頁 共 74 頁 圖 (4) 進(jìn)貨信息管理 圖 (5) 銷售信息管理 畢業(yè)論文 第 24 頁 共 74 頁 圖 (6) 用戶管理 圖 (7) 系統(tǒng)管理 畢業(yè)論文 第 25 頁 共 74 頁 圖 4. 概要設(shè)計(jì)模塊結(jié)構(gòu) 圖與描述表 (1) 業(yè)務(wù)對象模型 A..供應(yīng)商基本信息管理 圖 注：在本窗體操作者可以對供應(yīng)商信息進(jìn)行維護(hù) 。操作結(jié)束后保存到數(shù)據(jù)庫中。操作結(jié)束后保存到 數(shù)據(jù)庫中。 E．銷售信息管理 圖 注：在本窗體操作者可以對銷售信息進(jìn)行修改但不能對顧客信息表，商品信息表進(jìn)行修改，顧客信息表向銷售信息表提顧客的信息，商品信息表向銷售信息表提供商品信息。設(shè)計(jì)內(nèi)容如下：利用 ，以 WindowsXP 為開發(fā)平臺(tái) 可以實(shí)現(xiàn)動(dòng)態(tài)的連接應(yīng)用程序服務(wù)器，只要對配置文件進(jìn)行配置，就可以像網(wǎng)上鄰居一樣選擇所要連接的應(yīng)用程序服務(wù)器 。 (一 ) 軟件說明 為主要開發(fā)工具，以 WindowsXP 為開發(fā)平臺(tái)。 應(yīng)用 web 平臺(tái)和瀏覽器應(yīng)用數(shù)據(jù)庫。 條件 畢業(yè)論文 第 51 頁 共 74 頁 名稱 類型和說明 數(shù)量 后臺(tái)服務(wù)器 操作系統(tǒng)：采用 Windows2020 Server、 WEB 服務(wù)： Apache +Tomcat+、數(shù)據(jù)庫： access 1 測試用客戶端 Win9 Windows 2020 或 XP 1 （三） 測試內(nèi)容 ? 輸入： 界面測試：進(jìn)入主頁，逐個(gè)點(diǎn)擊； 不間斷的點(diǎn)擊同一界面； 亂點(diǎn)擊界面的按扭記錄反應(yīng)的速度； 從不同的分支界面到其他界面的連接測試； 數(shù)據(jù)庫測試：打開連接路徑的界面，按提示改變路徑； 同樣打開連接路徑，連接其他數(shù)據(jù)庫； Web 動(dòng)態(tài)連接設(shè)置測試：連接 inter。 ? 數(shù)據(jù)庫測試：改變路徑后數(shù)據(jù)庫連接成功，連接其他數(shù)據(jù)庫后，數(shù)據(jù)類型不匹 配 造成運(yùn)行困難，存儲(chǔ)數(shù)據(jù)的過程本身就有錯(cuò)誤，保存的數(shù)據(jù)在第二次調(diào)運(yùn)的時(shí)候未顯示或者未保存成功。在客戶端訪問服務(wù)器上的人 畢業(yè)論文 第 52 頁 共 74 頁 事系統(tǒng)時(shí)候沒有修改個(gè)人信息的權(quán)限，不間斷的訪問關(guān)閉彈出窗體速度慢， 重復(fù)界面測試和數(shù)據(jù)庫測試結(jié)果與本地測試相同并且速度比較慢； ? 主要技術(shù)障礙 1） 客戶端訪問服務(wù)器時(shí)輸入數(shù)據(jù)存儲(chǔ)不穩(wěn)定 2） 連接不同數(shù)據(jù)庫不能自動(dòng)匹配不同字符類型的字符 3） Web 動(dòng)態(tài)連接設(shè)置：權(quán)限不符，沒有注冊功能，并且連接動(dòng)態(tài) IP模塊有 2 處錯(cuò)誤 4） 系統(tǒng)兼容性比較強(qiáng)，適合 WINXP， WIN2020\2020\98,不適合 LINUX 畢業(yè)論文 第 53 頁 共 74 頁 七、 用戶手冊 （一） 用途 1． 功能 MYGSGLXT 系統(tǒng)的主要功能為：數(shù)據(jù)更新、數(shù)據(jù)查詢、用戶管理。 數(shù)據(jù)更新功能分為三部分：數(shù)據(jù)的添加、刪除和修改。 數(shù)據(jù)刪除功能將不滿足用戶要求的數(shù)據(jù)從數(shù)據(jù)庫中刪除。 數(shù)據(jù)查詢功能有二種方式：模糊查詢和精確查詢。同時(shí)可對滿足條件的信息進(jìn)行報(bào)表生成和打印輸出。 2． 性能 方便快捷有效地完成人事管理的各項(xiàng)工作，錄入數(shù)據(jù)合法性的校驗(yàn)程度高，數(shù)據(jù)查詢速度快，數(shù)據(jù)連接最佳時(shí)間 15 秒。 （ 4） 點(diǎn)用戶管理“注冊新用戶“菜單，顯示注冊窗體 圖 畢業(yè)論文 第 56 頁 共 74 頁 輸入用戶名，若用戶名存在提示用戶名不可以使用，若不存在提示恭喜用戶名可以使用。 （ 5） 點(diǎn)信息維護(hù)“供應(yīng)商信息維護(hù)“，顯示供應(yīng)商管理窗體 圖圖 輸入供應(yīng)商信息點(diǎn)添加按扭，可以將信息添加到 表中。 （ 6） 點(diǎn)“顧客信息維護(hù)“，顯示顧客管理窗體 畢業(yè)論文 第 57 頁 共 74 頁 圖 輸入顧客信息點(diǎn)添加按扭，可以將信息添加到表中。 （ 7） 點(diǎn)“商品信息維護(hù)”，顯示商品管理窗體 圖 輸入商品信息點(diǎn)添加按扭，可以將信息添加到表中。 用戶選擇供應(yīng)商信息，商品信息輸入進(jìn)貨信息點(diǎn)添加按扭，可以將信息添加到表中 。 （ 9） 點(diǎn)“進(jìn)貨信息維護(hù)”（或工具攔上的進(jìn)貨信息），顯示進(jìn)貨管理窗體 畢業(yè)論文 第 58 頁 共 74 頁 圖 用戶選擇顧客信息，商品信息輸入進(jìn)貨信息點(diǎn)添加按扭，可以將信息添加到表中。 圖 畢業(yè)論文 第 59 頁 共 74 頁 （ 11） 點(diǎn)“顧客信息查詢”，顯示供應(yīng)商查詢窗體 圖 用戶可以根據(jù)自己情況選擇精確查詢或模糊查詢，要執(zhí)行模糊查詢選中“執(zhí)行模糊查詢”，選擇查詢條件并輸入查詢 值。 畢業(yè)論文 第 60 頁 共 74 頁 圖 用戶可以根據(jù)自己情況選擇精確查詢或模糊查詢，要執(zhí)行模糊查詢選中“執(zhí)行模糊查詢”，選擇查詢條件并輸入查詢值。點(diǎn)打印還可以將自己查詢的記錄打印出來 （ 13） 點(diǎn)“進(jìn)貨信息查詢”，顯示商品查詢窗體 畢業(yè)論文 第 61 頁 共 74 頁 圖 圖 （ 15） 點(diǎn)“數(shù)據(jù)備份與還原”，顯示數(shù)據(jù)備份與還原窗體 畢業(yè)論文 第 62 頁 共 74 頁 圖 選擇數(shù)據(jù)備份可以將系統(tǒng)數(shù)據(jù)庫備份到自己選擇的路徑中。 begin try if =39。 then showmessage(39。) else begin with do begin insert。供應(yīng) 商編號 39。 FieldByName(39。).AsString:=。電話號碼 39。 FieldByName(39。).AsString:=。傳真號碼 39。 FieldByName(39。).AsString:=。公司地址 39。 FieldByName(39。).AsString:=。所在城市 39。 FieldByName(39。).AsString:=。).AsString:=。 refresh。 end。關(guān)鍵字已存在 ,添加失敗 !39。 。 end。 begin try if (=39。)or(=39。)or(=39。)or(=39。)or(=39。)or(=39。) then showmessage(39。) else begin with do begin Insert。).AsString:=。).AsString:=。).AsString:=。).AsString:=。).AsString:=。).AsString:=。).AsString:=。).AsString:=。).AsString:=。).AsString:=。備注信息 39。 post。 end。 except begin showmessage(39。)。 （三） 商品信息管理 procedure (Sender: TObject)。39。39。39。39。No data put in!39。 FieldByName(39。).AsString:=。商品名稱 39。 FieldByName(39。).AsString:=。計(jì)量單位 39。 FieldByName(39。).AsString:=。 refresh。 畢業(yè)論文 第 65 頁 共 74 頁 end。關(guān)鍵字已存在 ,添加失敗 !39。 。 （四） 進(jìn)貨信息管理 procedure (Sender: TObject)。 。insert into 進(jìn)貨信息 (進(jìn)貨信息編號 ,供應(yīng)商編號 ,公司名稱 ,商品編號 ,商品名稱 ,商品規(guī)格 ,計(jì)量單位 ,商品數(shù)量 ,商品單價(jià) ,商品總價(jià) ,進(jìn)貨日期 ,備注信息 )39。 (39。)。a139。 (39。).Value:=。a339。 (39。).Value:=。a539。 (39。).Value:=。a739。 (39。).Value:=strtoint() (39。).Value:=strtofloat()。a1039。 (39。).Value:=strtodate()。a1239。 execsql。 。select * from 進(jìn)貨信息 39。 畢業(yè)論文 第 66 頁 共 74 頁 open。 except showmessage(39。)。 （五） 銷售信息管理 procedure (Sender: TObject)。 。select sum(商品數(shù)量 *商品單價(jià) ) as 總價(jià)格 from 銷售信息 where39。 ([])。like 39。39。%39。%39。39。 (39。)。 銷售日期 = :A and 進(jìn)貨日期 = :B39。 (39。).Value:=datetostr(ate) (39。).Value:=datetostr(ate)。 :=fieldbyname(39。).AsString。 。select * from 銷售信息 where39。 ([])。like 39。39。%39。%39。39。 (39。)。 銷售日期 = :A and 進(jìn)貨日期 = :B39。 畢業(yè)論文 第 67 頁 共 74 頁 (39。).Value:=datetostr(ate)。B39。 open。 end else begin close。 (39。)。 (39。+39。39。++39。39。)。 :=fieldbyname(39。).AsString。 。select * from 銷售信息 where39。 ([])。like 39。39。%39。%39。39。 open。 end。 。select sum(商品數(shù)量 *商品單價(jià) ) as 總價(jià)格 from 銷售信息 where39。 畢業(yè)論文 第 68 頁 共 74 頁 ([])。like 39。39。%39。%39。39。 (39。)。 銷售日期 = :A and 進(jìn)貨日期 = :B39。 (39。).Value:=datetostr(ate) (39。).Value:=datetostr(ate)。 :=fieldbyname(39。).AsString。 。select * from 銷售信息 where39。 ([])。=39。39。39。39。39。 (39。)。 銷售日期 = :A and 進(jìn)貨日期 = :B39。 (39。).Value:=datetostr(ate)。B39。 open。 end else begin close。 (39。)。 (39。+39。39。++39。39。)。 :=fieldbyname(39。).AsString。 。select * from 銷售信息 where39。 ([])。= 39。39。39。39。39。 open。 e