物流管理信息系統(tǒng)之訂單管理子系統(tǒng)設計課程設計說明書-在線瀏覽
2025-06-04 23:47本頁面
【正文】 ………………………………356．使用說明……………………………………………………377．參考資料……………………………………………………37商品銷售訂單管理系統(tǒng)正是在這種情況下誕生并逐漸發(fā)展起來的，它已成為我們進行商品交易中不可缺少的部分。該系統(tǒng)目的在于同時滿足銷售方與用戶進行訂單管理，進而滿足經(jīng)營管理運作流程。 課題研究的主要內(nèi)容企業(yè)訂單管理系統(tǒng)主要完成的內(nèi)容包括：系統(tǒng)登錄控制。產(chǎn)品信息瀏覽。產(chǎn)品信息管理。訂單信息管理。客戶信息瀏覽?？蛻粜畔⒐芾?。用戶權(quán)限管理。利用系統(tǒng)分析和設計原理，采用面向?qū)ο蟮木幊谭椒ǎㄟ^用Visual Basic ，用SQL Server 2000進行數(shù)據(jù)庫建設與管理，實現(xiàn)了企業(yè)訂單管理的自動化和信息化. 設計任何定制化產(chǎn)品都是一個“翻譯”的過程。這個“翻譯”過程的第一步就是理解用戶的需求。我們首先制定了一個計劃，其中包含挖掘客戶需求的一系列步驟。舉例來說，如果客戶是單個人且需求很明確時，我們就不需要進行“搞清誰是誰”與“頭腦風暴”了。在另一些項目中，調(diào)整這些步驟的順序會更為合適。 我們需要思考，向客戶問些什么問題可以幫助我們了解項目的目標和要求。 1）功能與目標。(1).系統(tǒng)界面上需要展現(xiàn)哪些數(shù)據(jù)(2).這些數(shù)據(jù)應該由誰來提供(3).這些數(shù)據(jù)是如何關聯(lián)的(4).這些工作現(xiàn)在是如何處理的?數(shù)據(jù)來自哪里?(5).數(shù)據(jù)完整性：3）數(shù)據(jù)庫完整性約束。(1).是否每個用戶都需要一個不同的密碼(2).是否需要控制不同的用戶所能訪問的數(shù)據(jù)( 銷售代表有權(quán)限看到客戶的信用卡賬號，但訂單錄入專員卻不能) (3).存儲在數(shù)據(jù)庫中的數(shù)據(jù)是否需要加密(4).誰做了什么操作是否需要記錄以便于審計( 記錄銷售代表提高客戶級別的操作，在需要時可以追溯操作的原因) 主要功能就是給用戶帶來信息的溝通，交流的便捷。訂單管理系統(tǒng)物流管理鏈條中的不可或缺的部分，通過對訂單的管理和分配，使倉儲管理和運輸管理有機的結(jié)合，穩(wěn)定有效地實現(xiàn)物流管理中各個環(huán)節(jié)充分發(fā)揮作用，使倉儲、運輸、訂單成為一個有機整體，滿足物流系統(tǒng)信息化的需求。訂單管理系統(tǒng)一般包括：訂單處理，訂單確認等。 詳細設計class類：實現(xiàn)數(shù)據(jù)庫的連接字符串Register類：實現(xiàn)用戶注冊Login 類：登錄窗口類，用戶登錄時選擇用戶角色，進入員工操作界面。main類：實現(xiàn)系統(tǒng)功能的類，實現(xiàn)各模塊的功能。刪除訂單信息，修改訂單信息，查看訂單信息。Adm 類：管理員操作頁面，在此管理員可以查看和處理所有客戶訂單信息，可以查看客戶基本信息以及個人信息。用戶表屬性：用戶表：商品表屬性：商品表：管理員信息表屬性：管理員信息表：訂單信息表屬性：訂單信息表： 主體窗口Private Sub MDIForm_Load() Dim X0 As Long Dim Y0 As Long 39。用于記錄輸入密碼次數(shù)Dim sqlstr As Stringsqlstr = select * from 用戶信息表 where 用戶名=39。 Text1 amp。 = sqlstrIf Then 39。text1獲得焦點Else If (密碼) = Text2 Then Unload Me Else MsgBox 密碼錯誤，重新輸入, vbExclamation, 警告 = End IfEnd Ifmicount = micount + 1If micount = 3 Then Unload MeEnd SubPrivate Sub cmdcancel_click() Unload MeEnd SubPrivate Sub Command2_Click()Static micount As Integer 39。 amp。 39。若沒有找到符合where條件的記錄 MsgBox 用戶名錯誤，重新輸入, vbExclamation, 警告 = 39。 amp。 39。判斷用戶名是否已存在 If = False Then MsgBox 用戶已存在，請重新輸入, vbExclamation, 檢驗用戶名 Text1 = Exit SubEnd IfEnd If39。 where = 39。 Text5 amp。x = MsgBox(確定要修改當前記錄嗎？, vbYesNo + vbQuestion, 確定)If x = vbYes Then(性別) = Text1(年齡) = Text2(工作) = Text3(聯(lián)系電話) = Text4(密碼) = Text5(用戶名) = Text7End IfMsgBox 修改成功End SubPrivate Sub Command2_Click()x = MsgBox(未完善信息，現(xiàn)在退出？, vbOKCancel + vbDefaultButton2, 提示)If x = vbOK Then Unload wsyhxxElseIf x = Cancel ThenEnd IfExit SubEnd SubPrivate Sub Command3_Click()Dim str As Strin
公司管理相關推薦
鄂ICP備17016276號-1