【正文】 五、系統(tǒng)的實施、維護(hù)與管理 本系統(tǒng)的實施是在上述系統(tǒng)設(shè)計的基礎(chǔ)上，用 ACCESS+VBA 技術(shù)進(jìn)行的程序設(shè)計和程序調(diào)試，隨后是進(jìn)行系統(tǒng)的測試。HF120, amp。判斷標(biāo)簽是否顯示 For Each ctl In If TypeOf ctl Is Label Then If Right(, 2) = imgnum + 1 And Right(, 2) = imgnum + 9 Then = True Else 39。設(shè)置標(biāo)簽狀態(tài)為凹陷 = 16765136 39。 （ 3）代碼設(shè)計 該系統(tǒng)采用的是 VBA 代碼編程，主界面主菜單功能實用代碼如下： Option Compare Database Private Declare Function GetSystemMenu Lib (ByVal hwnd As Long, ByVal bRevert As Long) As Long Private Declare Function RemoveMenu Lib (ByVal hMenu As Long, ByVal uPosition As Long, ByVal uFlags As Long) As Long Private mblnSubclassed As Boolean Option Explicit Dim As Connection Dim sql As String Function MouseDown(Pic As Image) = 2 End Function Function MouseUp(Pic As Image) = 0 End Function Private Sub Box46_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) Dim ctl As Control For Each ctl In If TypeOf ctl Is Label Then If Left(, 1) = H Or Left(, 2) = 標(biāo)簽 Or Left(, 1) = t Then Else If = 16765136 Then Else = 16777215 = 0 End If End If End If Private Sub 主體 _MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) Dim ctl As Control For Each ctl In If TypeOf ctl Is Image Then If = 0 Then = 1 End If End If Next ctl For Each ctl In If TypeOf ctl Is Label Then If Left(, 1) = H Then Else If = 10 Then = 0 = 0 = 9 End If End If End If Next ctl End Sub Function MouseMove(Pic As Image) Dim lname As String Dim ctl As Control = 0 lname = 標(biāo)簽 + Right(, 2) 39。 網(wǎng)絡(luò)工作站根據(jù)不同的部門要求選用了 IBM 不同型號的微機，尤其是財務(wù)部門和設(shè)計的有關(guān)部門，對電腦的穩(wěn)定性和多媒體的要求比較高，選用了 IBM ThinkCentre A50p 819456C 。子系統(tǒng)之間有必要的數(shù)據(jù)聯(lián)系。更改密碼 ,即對管理員密碼的更改等操作。 ② 數(shù)據(jù)查詢子系統(tǒng)： 對于符合查詢條件的公司客戶信息及相關(guān)信息的具體查詢，其中包括客戶信息，客戶反饋信息、業(yè)務(wù)信息、產(chǎn)品信息、進(jìn)貨單、出貨單、職員信息、供應(yīng)商信息的 查詢操作。 客戶 客戶 職員 業(yè)務(wù)需求 客戶信息 職員信息 業(yè)務(wù) 信息管理 客戶 信息管理 職員 信息管理 廣告制作部 廣告創(chuàng)意部 報表 報表 客戶信息檔案 業(yè)務(wù)信息 客戶部 報表 客戶信息 職員信息檔案 所辦業(yè)務(wù)信息 業(yè)務(wù)信息 愛初廣告公司客戶資源管理系統(tǒng) 2． 系統(tǒng)主要分成 5 個子系統(tǒng) ,它實現(xiàn)了廣告公司主要的信息管理功能 .最主要的子系統(tǒng)是基礎(chǔ)數(shù)據(jù)管理子系統(tǒng)，所以運用 HIPO 技術(shù)，后面做詳細(xì)介紹。 2．劃分子系統(tǒng) 可以利用 U/C 矩陣將新系統(tǒng)劃分為數(shù)據(jù)錄入、數(shù)據(jù)查詢、報表輸出、系統(tǒng)設(shè)置 4 個子系統(tǒng)，如下表所示： 功能 /數(shù)據(jù)關(guān)系 公司 數(shù)據(jù) 職員 數(shù)據(jù) 客戶 數(shù)據(jù) 業(yè)務(wù) 數(shù)據(jù) 查詢 數(shù)據(jù) 報表 系統(tǒng)數(shù)據(jù) 公司基本信息錄入 C 職員基本信息錄入 C 客戶信息錄入 C 公司業(yè)務(wù)信息錄入 C 客戶信息查詢 U C 數(shù) 據(jù) 類 功 能 外部實體條目 名稱：客戶 總編號： 說明： 編 號： 輸出數(shù)據(jù)流： 次 數(shù)： 輸入數(shù)據(jù)流： 客戶（費用通知） 返回目錄 公司業(yè)務(wù)信息查詢 U C 職員信息查詢 U C 報表數(shù) 據(jù)計算 U U U U U C 報表輸出 U U U U U U 管理員權(quán)限設(shè)置 C 管理員權(quán)限添加、更改 U 數(shù)據(jù)庫備份 U U U U U U U （五）新系統(tǒng)邏輯模型 根據(jù)詳細(xì)調(diào)查和調(diào)查結(jié)果的系統(tǒng)化分析，可以提出新系統(tǒng)的邏輯模型。待成公司業(yè)務(wù)、待成個人業(yè)務(wù)、談成公司業(yè)務(wù)、談成個人業(yè)務(wù)、失敗公司業(yè)務(wù)、失敗個人業(yè)務(wù)的瀏覽、查詢、添加、修改、刪除操作。 “ 4”：廣告產(chǎn)品的微機庫存檔案報表。 （三）詳細(xì)調(diào)查 組織結(jié)構(gòu)圖（總體）： 組織結(jié)構(gòu)圖分解： （ 1）詳細(xì)組織結(jié)構(gòu)圖： 董事會 總經(jīng)理 財務(wù)部 創(chuàng)意部 制作部 客戶部 人力資源部 返回目錄 （ 2）管理系統(tǒng)： ① 客戶資源管理圖： 廣告公司 MIS 公司內(nèi)部管理 公司外部管理 人力資源管理 財務(wù)管理 多媒體管理 設(shè)計制作管理 系統(tǒng)資源管理 網(wǎng)絡(luò)管理 客戶資源管理 媒體信息管理 廣告資料管理 董事長 總經(jīng)理 創(chuàng)意部 客戶部 財務(wù)部 人力資源 部 業(yè)務(wù)流程部 客戶資源部 畫房 平面制作 電視制作 制作部 動畫設(shè)計 外部形象設(shè)計 電腦多維設(shè)