訂單管理信息系統(tǒng)設(shè)計(jì)課程設(shè)計(jì)-文庫(kù)吧在線文庫(kù)

　　

【正文】 表 準(zhǔn)確送達(dá)貨物 聯(lián)系人姓名 文本 50 否 客戶信息查詢表 聯(lián)系客戶的需要 圖 客戶信息表 山東交通學(xué)院課程設(shè)計(jì)報(bào)告 9 數(shù)據(jù)項(xiàng)目 商品信息 字段名稱 數(shù)據(jù)類型 字段大小 主鍵 有關(guān)的數(shù)據(jù)結(jié)構(gòu) 注釋 商品名稱 文本 50 是 商品信息管理表 確定訂單商品 商品類型 文本 50 否 商品信息管理表 確定商品類型 商 品單價(jià) 文本 50 否 商品信息管理表 給客戶報(bào)價(jià) 商品庫(kù)存 文本 50 否 商品信息管理表 所下單商品剩余庫(kù)存 所在倉(cāng)庫(kù) 文本 50 否 商品信息管理表 準(zhǔn)確定位下單商品位置 圖 商品信息表 數(shù)據(jù)項(xiàng)目 管理員信息 字段名稱 數(shù)據(jù)類型 字段大小 主鍵 有關(guān)的數(shù)據(jù)結(jié)構(gòu) 注釋 id 文本 6 是 用戶管理表 登陸的賬號(hào) idcardno 文本 18 否 用戶管理表 管理員的身份證 mima 文本 6 否 用戶管理表 登陸的密碼 name 文本 20 否 用戶管理表 登陸人的名稱 role 文本 20 否 用戶管理表 角色 gender 文本 1 否 用戶管理表 管理員性別 圖 操作數(shù)據(jù)庫(kù)設(shè)計(jì) 使用 DATA 控件連接數(shù)據(jù)庫(kù) 在硬盤的用戶盤上建立一個(gè)用戶目錄（如 E:\WORK），用于保存所有實(shí)驗(yàn)文件。添加其他文本框控件，設(shè)置屬性，顯示更多的貨物表內(nèi)容。啟動(dòng)ACCESS，找到數(shù)據(jù)庫(kù) WLGL,確認(rèn)有 貨物表，并已經(jīng)錄入了多條數(shù)據(jù)。Persist Security Info=False。Persist Security Info=False If Trim() = Then MsgBox (請(qǐng)輸入用戶名 ) 山東交通學(xué)院課程設(shè)計(jì)報(bào)告 13 Else select * from 用戶 管理 where id=39。放棄修改 For i = 0 To 8 Text1(i).Enabled = False Next i = False = False = True = True = True End Sub Private Sub cmddelete_Click() Dim myval As String myval = MsgBox(是否要?jiǎng)h除該記錄？ , vbYesNo) If myval = vbYes Then If Then For i = 0 To 8 Text1(i).Enabled = False Next i End If End If End Sub Private Sub cmdedit_Click() If 0 Then For i = 0 To 8 Text1(i).Enabled = True Next i = True = True = False = False = False Else MsgBox (沒(méi)有要修改的記錄！ ) End If End Sub Private Sub cmdsave_Click() 39。退出 Unload Me End Sub Private Sub Form_Load() = LoadPicture( amp。 = adCmdText If Not Then = (商品名稱 ) = (商品類型 ) = (商品單價(jià) ) = (商品庫(kù)存 ) = (所在倉(cāng)庫(kù) ) Else: MsgBox 您所要查詢的內(nèi)容不存在！ 山東交通學(xué)院課程設(shè)計(jì)報(bào)告 23 End If End If If = 商品類型 Then = Provider=。Data Source=C:\Users\dell\Desktop\訂單管理系統(tǒng) \。% amp。通過(guò)開(kāi)發(fā)這個(gè)系統(tǒng)，我們掌握了項(xiàng)目的基本開(kāi)發(fā)過(guò)程，了解了的基本知識(shí)鞏固了我對(duì) Visual Basic 的學(xué)習(xí)，但在這次設(shè)計(jì)中的最大收獲并不是掌握這幾門開(kāi)發(fā)工具的應(yīng)用，而是學(xué)會(huì)了設(shè)計(jì)系統(tǒng)的思維方法，以及與同學(xué)們之間相互幫助的精神。 \) End Sub 山東交通學(xué)院課程設(shè)計(jì)報(bào)告 26 4 總結(jié) 在本系統(tǒng)的開(kāi)發(fā)過(guò)程中，由于我們是初次開(kāi)發(fā)軟件，在知識(shí)、經(jīng)驗(yàn)方面都存在著不足。 %39。 amp。Persist Security Info=False = select * from 商品信息管理 where 商品名稱 like 39。 山東交通學(xué)院課程設(shè)計(jì)報(bào)告 19 代碼如下 Private Sub cmdadd_Click() 39。, , adOpenDynamic, adLockOptimistic If And Then MsgBox (不存在該用戶，請(qǐng)重新輸入用戶名 ) Else 39。不提示失敗的登錄 LoginSucceeded = False End End Sub Private Sub cmdOK_Click() Dim As New Dim rs As New Dim constr As String Provider=。 山東交通學(xué)院課程設(shè)計(jì)報(bào)告 11 使用 ADO 對(duì)象訪問(wèn)數(shù)據(jù)庫(kù) 在硬盤的用 戶盤上建立一個(gè)用戶目錄（如 E:\WORK），用于保存所有實(shí)驗(yàn)文件。 啟動(dòng) VB,通過(guò)菜單 工程 — 部件 — 控件添加控件 Microsoft ADO DATA CONTROL 和Microsoft DATAgrid CONTROL 。 設(shè)置 DATA 控件的 databasename 屬性為 WLGL97，設(shè)置 DATA 控件的 Recordsource屬性為貨物表。最后這些信息全都展現(xiàn)給用戶及管理員。因此，管理形式的計(jì)算機(jī)是社會(huì)發(fā)展的必然趨勢(shì)，各種智能化的軟件層出不窮，減少了原來(lái)人工操作的費(fèi)時(shí)費(fèi)力的狀況，從而提高了工作效率和準(zhǔn)確度。例如：排序速度快、查找方便、可靠性高、成本低等。本系統(tǒng)包括：管理員管理、客戶管理、定金管理、銷售管理、系統(tǒng)信息等模塊。 關(guān) 鍵字 :訂單信息管理系統(tǒng)、 Visual Basic 應(yīng)用、 Acess 數(shù)據(jù)庫(kù) 山東交通學(xué)院課程設(shè)計(jì)報(bào)告 1 目錄 摘要 ................................................................................................................... 1 目錄 ................................................................................................................... 1 1 概述 ..................................................................