【正文】 “group2”、 “boy”、 “girl”、 “sboy”、 “sgirl”等關(guān)鍵字； imlViewSIcon 必須包括 “boy”、 “girl”、“bboy”、 “bgirl”、 “group”、 “add”、 “modify”、 “del”“info”、 “search”、 “warn”、 “setting”、“IstView”、 “exit”等關(guān)鍵字。 按表 所示的設(shè)置為主窗體添加控件（已有控件只需設(shè)置屬性即可）。比如知道客戶 ID 后，可以調(diào)用此函數(shù)來獲取客戶名。 浙江工業(yè)大學(xué)浙西分校信電系畢業(yè)設(shè)計（論文） 18 6) ExistByID——判斷記錄是否存在 ExistByID 函數(shù)用于給定一條記錄的 ID 號后，查看數(shù)據(jù)庫中是否存在此記錄。解決辦法是用兩個單 引號來表示一個單引號。 現(xiàn)在，在 mblPublic 模塊中連接數(shù)據(jù)庫的功能已經(jīng)實現(xiàn)，下面添加在數(shù)據(jù)庫操作時比較常用的一些函數(shù)。 ? 返回值： Boolean 類型， True 表示成功， False 表示失敗。 3) ConnecToDatabase 函數(shù) ——與數(shù)據(jù)庫建立連接 ? 功能：根據(jù)傳入?yún)?shù)是 DBAccess 還是 DBSQLSever 來決定連接到 Access 數(shù)據(jù)庫還是 SQL Sever 數(shù)據(jù)庫。在這個過程中，完成 ActiveX DLL 的初始化工作。 ? 存放在對數(shù)據(jù)庫的操作過程中可能用到的一些公共函數(shù)。修改信息 浙江工業(yè)大學(xué)浙西分校信電系畢業(yè)設(shè)計（論文） 17 vtInfo = 2 39。用于對話框顯示類別設(shè)置 Public Enum gxcViewType vtadd = 0 39。生日提醒 CommonWarn = 2 39。指定的上級客戶類型的 ID 不存在 End Enum 39。用于表示客戶類型新增結(jié)果的枚舉 Public Enum gxcAddNew AddNewOK = 0 AddNewFail = 1 DuplicateName_AddNew = 2 39。名字不可重復(fù) RecordNotExist = 3 39。該客戶類型存在客戶，不能刪除 End Enum 39。未知原因?qū)е虏荒軇h除 DeleteSubExists = 2 39。連接數(shù)據(jù)庫的類型 Public Enum gxcDBType DBAccess = 0 DBSQLServer = 1 浙江工業(yè)大學(xué)浙西分校信電系畢業(yè)設(shè)計（論文） 16 End Enum 39。該類無實際意義，只為保存一些自定義枚舉 39。 客戶管理事務(wù)處理事件的創(chuàng)建 為了給客戶管理事件創(chuàng)建組件，我們 新建 了 ActiveX DLL 工程 ，加入對 ADO 的引用，設(shè)置的工程的關(guān)鍵屬性如下： 工程類型 為 ActiveX DLL， 啟動對象 為 Sub Main，工程名稱 為 ClientManagerCom?？蛻艄芾硎聞?wù)處理組件用來處理客戶管理 系統(tǒng)中的業(yè)務(wù)邏輯，既負(fù)責(zé)與界面進(jìn)行數(shù)據(jù)傳遞，同時也要將界面端的請求應(yīng)用業(yè)務(wù)邏輯之后對數(shù)據(jù)庫進(jìn)行操作。 （ 2）如果是 NTFS 分區(qū)，則要給適當(dāng)?shù)挠脩籼砑訖?quán)限，一般，簡單的解決辦法是給它的Everyone 用戶添加完全控制權(quán)限。 表 客戶信息表 (ClientInfo) 列表 數(shù)據(jù)類型 字段大小 必填字段 默認(rèn)值 說明 ClientId 自動編號 長整型 是 “” 遞增 ,主鍵 Name 文本 20 是 0 姓名 Sex 數(shù)字 字節(jié) 是 0 性別 Age 數(shù)字 字節(jié) 是 ＃ 198011 年齡 Birthday 日期 /時間 短日期 是 “ ” 生日 OfficePhone 文本 15 是 “ ” 辦公室電話 Mobile 文本 15 是 “ ” 手機(jī) Fax 文本 15 是 “ ” 傳真 HomePhone 文本 15 是 “ ” 宅電 Work 文本 50 是 “ ” 職業(yè) Position 文本 30 是 “ “ 職位 Email 文本 20 是 “ ” 郵件 HomeAddress 文本 50 是 “ ” 住址 MailAddress 文本 50 是 “ ” 通訊地址 ZipCode 文本 8 是 “ ” 郵編 SelfSite 文本 30 是 “ ” 個人網(wǎng)站 Company 文本 50 是 “ ” 就職單位 CompanySite 文本 30 是 “ ” 公司網(wǎng)站 Likes 備注 是 “未知 ” 喜好 Hate 備注 是 “未知 ” 厭惡 TypeId 數(shù)字 長整型 是 0 客戶類型 ID Remark 備注 是 “ ” 備注 Birthday Warn 是 /否 是 False 是否啟用生日提醒 Importance 數(shù)字 整型 是 50 重要度（ 0255） Friendly 數(shù)字 整型 是 50 友好度（ 0255） Satisfaction 數(shù)字 整型 是 50 滿意度（ 0255） 浙江工業(yè)大學(xué)浙西分校信電系畢業(yè)設(shè)計（論文） 14 表 客戶類型信息表 (ClienType) 列表 數(shù)據(jù)類型 字段大小 必填字段 默認(rèn)值 說明 TypeId 自動編號 長整型 是 遞增，主鍵 SuperId 數(shù)字 長整型 是 0 上級類型 ID TypeName 文本 20 否 “” 客戶類型名 表 合作信息表（ Cooperate） 列表 數(shù)據(jù)類型 字段大小 必填字段 默認(rèn)值 說明 CooperateId 自動編號 長整型 是 主鍵，遞增 ClientId 數(shù)字 長整型 是 客戶 ID，外碼 Date 日期 /時間 短日期 是 190011 合作日期 Satefaction 數(shù)字 整型 是 50 滿意度（ 0255） Remark 備注 是 “ ” 備注 表 提醒信息表 (Warning) 列表 數(shù)據(jù)類型 字段大小 必填字段 默認(rèn)值 說明 WarnId 自動編號 長整型 是 主鍵，遞增 ClientId 數(shù)字 長整型 是 0 客戶 ID，為 0 時表時全體客戶 ShowDate 日期 /時間 短日期 是 190011 提醒顯示日期 TypeId 數(shù)字 整型 是 1 提醒類型 Id,外碼 Msg 備注 是 “ ” 提醒消息 表 提醒類型信息表 (WarnType) 列表 數(shù)據(jù)類型 字段大小 必填字段 默認(rèn)值 說明 WTypeId 自動編號 字節(jié) 是 提醒類型編號 WtypeName 文本 30 是 “定時提醒 ” 提醒類型名稱 數(shù)據(jù)庫的生成與配置 經(jīng)過前面的需求分析和概念結(jié)構(gòu)設(shè)計以后，得到數(shù)據(jù)庫的邏輯結(jié)構(gòu)。 客戶管理系統(tǒng)數(shù)據(jù)庫中各個表的設(shè)計結(jié)果如表 ～表 所示。根據(jù)客戶管理系統(tǒng) 使用提醒信息 提醒編號 提醒顯示時間 提醒類型 顯示時間 合作信息 合作編號 合作時間 滿意度 合作內(nèi)容 客戶類型 客戶 類型名稱 上級類型 客戶名稱 客戶性別 客戶 Email 客戶電話 評價信息 友好度 滿意度 重要度 浙江工業(yè)大學(xué)浙西分校信電系畢業(yè)設(shè)計（論文） 13 情況的不同，可以采用 Acess 數(shù)據(jù)庫或 SQL Server 2022 數(shù)據(jù)庫。各實體之間關(guān)系的 ER 圖如圖 所示 ，客戶類型信息實體 ER 圖如圖 所示，客戶類型信息實體ER 圖如圖 所示 ， 合作信息實體 ER 圖如圖 所示 ， 提醒信息實體 ER 圖如圖 所示 ， 評價信息實體 ER 圖如圖 所示。 每一個實體都是現(xiàn)實中實際存在的對象的抽象，每兩個或兩個以上的實體之間可能存在某種關(guān)系。這些實體包含各種具體信息，通過相互之間的作用形成數(shù)據(jù)的流動。 在上面的需求 分析、數(shù)據(jù)結(jié)構(gòu)設(shè)計、數(shù)據(jù)項分析的基礎(chǔ)上，下面可以開始數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計了。 ? 客戶合作信息，包括合作編號、合作客戶、合作時間、合作內(nèi)容等?？蛻艋拘畔蛻艟幪枴⒖蛻粜彰?、性別、手機(jī)、 Email 等；客戶其他浙江工業(yè)大學(xué)浙西分校信電系畢業(yè)設(shè)計（論文） 11 聯(lián)系方式包括辦公室電話、家庭住址、郵編等；客戶其他信息包括客戶公司網(wǎng)站、客戶喜好、禁忌等。 經(jīng)過上述系統(tǒng)功能分析和需求總結(jié)，考慮到將來功能上的擴(kuò)展，設(shè)計的數(shù) 據(jù)項和數(shù)據(jù)結(jié)構(gòu)如下： ? 客戶類型信息，包括的數(shù)據(jù)項有：客戶類型編號、上級客戶類型編號、客戶類型名稱等。 ? 客戶信息、合作信息、提醒信息要可以添加、修改、刪除、瀏覽、查看。 ? 客戶合作信息必須與某一個客戶相關(guān)。 ? 如果一個客戶類型存在客戶，或存在下級客戶類型，則該類型不可刪除。 通過上述系統(tǒng)功能的分析，針對一般客戶管理信息系統(tǒng)的需求， 以下便是 的需求信息： ? 客戶類型存在上下級關(guān)系。 數(shù)據(jù)庫需求分析 用戶的需求具體體現(xiàn)在各種信息的提供、保存、更新和查詢，這就要求數(shù)據(jù)庫 結(jié)構(gòu)能充分滿足各種信息的輸出和輸入。 設(shè)計數(shù)據(jù)庫系統(tǒng)時應(yīng)該首先充分了解用戶各個方面的需求，包括現(xiàn)有的及將來可能增加的需求。 客戶管理系統(tǒng) 客戶類型管理模塊 客戶管理系統(tǒng) 提醒管理模塊 添加客戶類型 修改客戶類型 刪除客戶類型 客戶信息管理 客戶評價管理 客戶合作管理 查看今日提醒 提醒設(shè)置管理 查看定時管理 刪除定時管理 修改定時管理 添加定時管理 刪除合作記錄 修改合作記錄 添加合作記錄 查找客戶信息 查看客戶信息 刪除客戶信息 修改客戶信息 浙江工業(yè)大學(xué)浙西分校信電系畢業(yè)設(shè)計（論文） 9 圖 系統(tǒng)結(jié)構(gòu)設(shè)計圖 客戶管理系統(tǒng) 客戶管理界面 客戶管理組件 數(shù)據(jù)庫 客戶類型相關(guān)界面 客戶信息相關(guān)界面 合作信息相關(guān)界面 客戶類型管理 客戶信息管理 合作 信息管理 提醒信息管理 公共模塊 提醒信息集合類 提醒信息類 合作信息集合類 客戶合作信息類 客戶信息集合類 客戶信息類 客戶類型集合類 客戶類型類 公共模塊 提醒信息相關(guān)界面 枚舉定義類 浙江工業(yè)大學(xué)浙西分校信電系畢業(yè)設(shè)計（論文） 10 第 3章 系統(tǒng) 數(shù)據(jù)庫 設(shè)計 數(shù)據(jù)庫在一個 信息管理系統(tǒng)中占有非常重要的地位，數(shù)據(jù)庫結(jié)構(gòu)設(shè)計的好壞將直接影響應(yīng)用系統(tǒng)的效率及實現(xiàn)的效果。 圖 系統(tǒng)功能模塊圖 系統(tǒng)結(jié)構(gòu)設(shè)計 根據(jù)面向?qū)ο蠛腿龑咏Y(jié)構(gòu)的設(shè)計思想，可得出如圖 所示的系統(tǒng)結(jié)構(gòu)設(shè)計圖。從圖中 可以看出系統(tǒng)包括客戶類型管理模塊、客戶管理模塊和提醒管理模塊，在客戶管理模塊中，又包括客戶信息管理、客戶評價管理和客戶合作管理 3 部分。 面向?qū)ο蟮娜龑?C／ S架構(gòu)的設(shè)計 本系統(tǒng)采用三層架構(gòu)設(shè)計，它的工作原理如圖 所示。另外，讀者也許已經(jīng)注意到了，系統(tǒng)的今日提醒界面與某些程序的 “每日一帖 ”或 “日積月累 ”對話框十分相似，事實上它正是用 VB 窗體模板中的 “日積月累 ”對話框?qū)崿F(xiàn)的。 人性化設(shè)計：系統(tǒng)不僅僅是一個客戶信息的管理軟件，它更具有人性化的生日提醒，極具實用性的合作記錄，以及對客戶的重要度、友好度、滿意度評價等。三層在實際的物理結(jié)構(gòu)上也是獨立的，業(yè)務(wù)邏輯 處理層浙江工業(yè)大學(xué)浙西分校信電系畢業(yè)設(shè)計（論文） 7 采用 ActiveX DLL 實現(xiàn)，用戶界面與業(yè)務(wù)邏輯分離，系統(tǒng)的安全性、可維護(hù)性、重用性和擴(kuò)展性都大大提高。 ● 客戶提醒信息維護(hù)，包括添加、修改和刪除提醒信息。 ● 客戶評價管理，包括客戶的重要度、友好度、滿意度的設(shè)定與查看。 ● 根據(jù)不同條件查詢客戶，可