【正文】 If Not IsNull((1)) Then If Trim() Trim((1)) Then MsgBox 管理員舊密碼不對 ! Exit Sub Else (1).Value = Trim() MsgBox 操作已成功 !, , 提示 End If End If End If End If End If Exit Sub Err: MsgBox End Sub Private Sub Form_Load() 39。 UserName amp。管理員密碼修改 On Error GoTo Err If Trim() And Trim() And Trim() Then If Trim() Trim() Then MsgBox 新密碼不對 ! Exit Sub Else Dim rs1 As New select * from 系統(tǒng)用戶 where 用戶名 =39。 () MsgBox 操作已成功 !, , 提示 End Sub Private Sub Command5_Click() 39。 Trim() amp。刪除用戶代碼 If Trim() = UserName Then MsgBox 不能刪除正在操作的用戶 ! Exit Sub End If delete from 系統(tǒng)用戶 where 用戶名 =39。 , , 系統(tǒng)提示 = End If Exit Sub Err: MsgBox End Sub Private Sub Command3_Click() 39。 39。 amp。39。 用戶可以管理數(shù)據(jù)庫表中不存在的任何的用戶名和密碼。記錄密碼輸入的次數(shù)，累計到 3 此則自動結(jié)束程序 End If 系統(tǒng)管理表單 “系統(tǒng)管理表單”可以增加用戶，使更多的人可以訪問該系統(tǒng)。 txtSQL, conn, adOpenKeyset, adLockPessimistic If = True Then MsgBox 沒有這個用戶，請重新輸入用戶名 !, vbOKOnly + vbExclamation, 警告 Else If Trim(adors(Password)) = Trim() Then 39。 amp。三次錯誤 ,自動退出程序 End End If Exit Sub Err: MsgBox 登錄出錯 ,請找管理員 !, vbExclamation Ok = False End End SubIf Trim( = ) Then MsgBox 沒有這個用戶，請重新輸入用戶名！ , vbOKOnly + vbExclamation, 警告 Else txtSQL = select * from user1 where username = 39。無權(quán) IsUserMode = 0 MsgBox 你沒有權(quán)限 !, vbExclamation, 警告 End End If UserPrivs = Trim((2)) UserName = Trim() Unload Me Exit Sub Else MsgBox 輸入密碼不正確，請重新輸入！ , vbOKOnly + vbExclamation, 警告 = End If End If miCount = miCount + 1 If miCount = 3 Then 39。普通用戶權(quán)限 IsUserMode = 2 Else 39。管理員權(quán)限 IsUserMode = 1 ElseIf Trim((2)) = 普通用戶 Then 39。判斷權(quán)限 UserPrivs = If Trim((2)) = 管理員 Then 39。如果有用戶 If Trim((1)) = Trim() Then 39。如果沒有這個用戶 MsgBox 沒有這個帳號，請重新輸入帳號 !, vbOKOnly + vbExclamation, 警告 = = Else 39。 If Then txtSql, CN, adOpenStatic, adLockOptimistic If = True Then 39。 amp。判斷是否有這個用戶 txtSql = select * from 系統(tǒng)用戶 where 用戶名 = 39。判斷密碼是否為空 MsgBox 請輸入密碼！ , vbOKOnly + vbExclamation, 警告 Exit Sub End If 39。39。39。對應(yīng)密碼： admin。 “系統(tǒng)登錄”表單可以檢測用戶是否有正確的用戶與密碼，用來防止非法用戶進入系統(tǒng)，為系統(tǒng)安全提供一層防護作用。 采購記錄 表 真 實名稱 數(shù)據(jù)類型 字段大小 字段是否固定 允許零長度 必要字段 采購編號 文本 50 可變 是 否 倉庫編號 文本 50 可變 是 否 采購 日期 文本 50 可變 是 否 員工編號 文本 50 可變 是 否 商品編號 文本 50 可變 是 否 數(shù)量 數(shù)字 長整型 可變 是 否 采購價格 貨幣 2 可變 是 否 服裝專賣店管理系統(tǒng) 基 本 資 料 銷售管理 報 表 系 統(tǒng) 設(shè) 置 系統(tǒng)登陸 用戶申請 密碼修改 退出系統(tǒng) 進貨管理 進貨單 進貨查詢 進貨一覽 銷售單 銷售單查詢 銷售單一覽 銷售退貨 退貨一覽 倉庫資料 商品資料 計量單位 規(guī)格 生產(chǎn)廠商 客戶資料 供應(yīng)商資料 各業(yè)務(wù)報表 供應(yīng)商編號 文本 50 可變 是 否 2. 倉庫信息 表 真實名稱 數(shù)據(jù)類型 字段大小 字段是否固定 允許零長度 必要字段 順序號 自動編號 否 倉庫編號 文本 50 可變 是 是 倉庫地址 文本 50 可變 否 是 備注 文本 50 可變 是 是 信息 表 真實名稱 數(shù)據(jù)類型 字段大小 字段是否固定 允許零長度 必要字段 順序號 自動編號 是 供應(yīng)商編號 文本 50 可變 是 是 供應(yīng)商名稱 文本 50 可變 是 是 聯(lián)系電話 文本 50 可變 是 是 傳真 文本 50 可變 是 是 郵箱 文本 50 可變 是 是 4. 客戶信息 表 真實名稱 數(shù)據(jù)類型 字段大小 字段是否固定 允許零長度 必要字段 客戶編號 文本 50 可變 是 是 客戶地址 文本 50 可變 是 是 家庭地址 文本 50 可變 是 是 郵政編碼 文本 50 可變 是 是 聯(lián)系電話 文本 50 可變 是 是 顧客級別 文本 50 可變 是 是 購買貨品總數(shù) 文本 50 可變 是 是 5. 庫存信息 表 真實名稱 數(shù)據(jù)類型 字段大小 字段是否固定 允許零長度 必要字段 倉庫編號 文本 50 可變 是 否 商品編號 文本 50 可變 是 是 當(dāng)前庫存量 數(shù)字 長整型 可變 否 是 6 商品信息 表 真實名稱 數(shù)據(jù)類型 字段大小 字段是 否固定 允許零長度 必要字段 商品編號 文本 50 可變 是 是 商品名稱 文本 50 可變 是 是 商品說明 文本 50 可變 是 是 標稱價格 貨幣 2 可變 是 是 ： 真實名稱 數(shù)據(jù)類型 字段大小 字段是否固定 允許零長度 必要字段 用戶名 文本 50 可變 是 是 密碼碼 文本 50 可變 是 是 身份 文本 50 可變 是 是 真實名稱 數(shù)據(jù)類型 字段大小 字段是否固定 允許零長 必要字段 銷售編號 數(shù)字 50 可變 是 是 倉庫 編號 文本 50 可變 是 是 員工編號 文本 50 可變 是 是 商品編號 文本 50 可變 是 是 數(shù)量 數(shù)字 長整型 固定 否 客戶編號 文本 50 可變 是 是 銷售價格 貨幣 固定 否 是 真實名稱 數(shù)據(jù)類型 字段大小 字段是否固定 允許零長度 必要字段 員工編號 文本 50 可變 是 是 倉庫編號 文本 50 可變 是 是 姓名 文本 50 可變 是 是 性別 數(shù)字 長整型 可變 是 是 出生日期 備注 50 住址 文本 50 可變 是 是 電話 數(shù)字 長整型 可變 是 是 電子郵件 文本 50 可變 是 是 文本 50 可變 是 是 備注 文本 50 可變 是 是 在職年齡 數(shù)字 長整型 可變 是 是 字典信息表： 真實名稱 數(shù)據(jù)類型 字段大小 字段是否固定 允許零長度 必要字段 表名 文本 50 可變 是 是 字段 文本 50 可變 是 是 字典表名 文本 50 可變 是 是 字典字段 文本 50 可變 是 是 第四章 系統(tǒng)設(shè)置模塊詳細設(shè)計 服裝專賣店系統(tǒng)中的系統(tǒng)設(shè)置 模塊包括系統(tǒng)登錄功能、用戶申請功能、修改密碼功能和退出系統(tǒng)功能，主要由 ” 系統(tǒng)登錄 (frmlogin)” 表單、“用戶申請(userappend)” 表單“修改密碼 (modifycode)”表單。當(dāng)添加銷售信息時，需要在所售服裝的庫存量上自動減去所銷售的數(shù)量。 4銷售管理模塊 銷售信息管理模塊用來跟蹤服裝的每一次銷售的信息。該模塊能夠根據(jù)基本資料來進行服裝的進貨，然后還能根據(jù)添加的每次進貨信息進行修改和刪除，也可以按照一定的條件來進行查詢。也可以按照一定的條件查詢。 2．基本資料模塊 基本資料模塊用來對企業(yè)所擁有的各種服裝的基本信息進行維護和管理。 服裝服裝庫存信息管理系統(tǒng)是一個基于管理員的系統(tǒng)，它只有管理員才能對他進行操作。然后能根據(jù)庫存的 上限和庫存下限進行庫存的報警查詢。庫存表包括順序號、服裝名稱、服裝規(guī)格、服裝單價、總金額、庫存上限、庫存下限、倉庫號、報警信息。 并且能夠?qū)Ψb的庫存量進行報警，以防倉庫的服裝數(shù)量不足影響服裝的銷售。服裝的銷售信息包括順序號、服 裝名稱、客戶名稱、購買數(shù)量、售出價格、銷售日期、規(guī)格、總金額等。系統(tǒng)需要能夠?qū)M貨信息進行添加、修改、刪除，也可以按照一定條件來進行查詢。 時對服裝進貨以補