數(shù)據(jù)庫(kù)原理與應(yīng)用課程設(shè)計(jì)報(bào)告-倉(cāng)庫(kù)管理系統(tǒng)(參考版)
2025-01-24 21:14本頁(yè)面
【正文】 6 參考資料 《 Visual Basic 高級(jí)編程及其項(xiàng)目應(yīng)用開發(fā)》 李存斌 郭曉鵬 編著 中國(guó)水利水電出版社 《 Visual Basic 編程實(shí)例教程》 北京希望電子 出版社 總策劃 袁帥 郭月強(qiáng) 焦祝軍 等 編寫 。寫入系統(tǒng)日志 (增加新貨物 ) MsgBox 保存成功 , vbOKOnly, 39。寫入系統(tǒng)日志 (刪除供應(yīng)商 ) End Sub 14 Private Sub DataGrid1_AfterUpdate() 39。通過(guò)權(quán)限來(lái)初始化控件性質(zhì) If 權(quán)限類別 (0) = 0 Then B 新增入庫(kù)單 .Enabled = False If 權(quán)限類別 (1) = 0 Then = False If 權(quán)限類別 (2) = 0 Then 退出入庫(kù)單 .Enabled = False 刪除入庫(kù)單 .Enabled = False End If If 權(quán)限類別 (8) = 0 Then 打印入庫(kù)單 .Enabled = False End Sub 11 圖 Private Sub DataGrid1_HeadClick(ByVal ColIndex As Integer) On Error Resume Next Dim caption As String caption = (ColIndex).caption If caption = 經(jīng)辦人 Then caption = 姓名 If caption = 金額 Then Exit Sub If caption = 備注 Then caption = 出庫(kù)單 .備注 If caption = 編號(hào) Then caption = 出庫(kù)單 .編號(hào) If caption = 客戶 Then caption = 客戶名稱 If caption = 存放倉(cāng)庫(kù) Then caption = 倉(cāng)庫(kù)名稱 = SQL + order by + caption order(ColIndex) = True order(ColIndex) If order(ColIndex) = True Then = + ASC Else = + DESC End If SaveInit 12 ResumeInit End Sub Private Sub Form_Load() = DataConnectString SQL = Set = Adodc1 initdatagrid1 39。) MsgBox 修改成功 ! End If Unload Me End Sub Private Sub NewPas1_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = 13 Then 39。 where 用戶名 =39。設(shè)置新密碼 Set adoRs = (UPDATE 用戶管理 SET 用戶密碼 = 39。 End Sub Private Sub Modify_Click() If UserPas Then 5 MsgBox 原密碼錯(cuò)誤 ! Exit Sub End If If Then MsgBox 兩次密碼不一致 ! Exit Sub End If On Error Resume Next 39。 庫(kù)設(shè)計(jì) 概念結(jié)構(gòu)設(shè)計(jì) 供應(yīng)商信息表： 供應(yīng)商編號(hào) ，供應(yīng)商地址，供應(yīng)商名稱，電話，聯(lián)系人姓名，聯(lián)系人職稱 貨物信息表： 貨物編號(hào) ，貨物名稱，貨物數(shù)量，類別，最低限量，最高限量 種類表： 類別編號(hào) ，類別名稱 客戶信息表：客戶編號(hào)，客戶名稱，聯(lián)系人，客戶電話 倉(cāng)庫(kù)信息表： 倉(cāng)庫(kù)編號(hào) ，倉(cāng)庫(kù)名稱，倉(cāng)庫(kù)地址，用戶編號(hào) 用戶信息表： 用戶名 ，用戶密碼，用戶權(quán)限 庫(kù)存信息表： 庫(kù)存編號(hào) ，貨物編號(hào)，庫(kù)存 數(shù)量，倉(cāng)庫(kù)編號(hào) 入庫(kù)單： 入庫(kù)單編號(hào) ，貨物編號(hào)，經(jīng)辦人編號(hào)，入庫(kù)時(shí)間，貨物數(shù)量，倉(cāng)庫(kù)編號(hào)，供應(yīng)商編號(hào) 出庫(kù)單： 出庫(kù)單編號(hào) ，貨物編號(hào)，經(jīng)辦人編號(hào)，出庫(kù)時(shí)間，出庫(kù)單價(jià)，客戶編號(hào)，倉(cāng)庫(kù)編號(hào) 邏輯結(jié)構(gòu)設(shè)計(jì) 根據(jù)關(guān)系規(guī)范化理論和 ER 轉(zhuǎn)換成關(guān)系模型的規(guī)則，整體 ER 圖可轉(zhuǎn)換得到下列關(guān)系模式： 供應(yīng)商（ 供應(yīng)商編號(hào) ，供應(yīng)商地址，供應(yīng)商名稱，電話，聯(lián)系人姓名，聯(lián)系人職稱） 貨物（ 貨物編號(hào) ，貨物名稱，貨物數(shù)量，類別，最低限量，最高限量） 種類（ 類別編號(hào) ，類別名稱） 客戶（ 客戶編號(hào) ，客戶名稱，聯(lián)系人，客戶電話） 倉(cāng)庫(kù)（ 倉(cāng)庫(kù) 編號(hào) ，倉(cāng)庫(kù)名稱，倉(cāng)庫(kù)地址，用戶編號(hào)） 用戶（ 用戶
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1