【導(dǎo)讀】成系統(tǒng)來(lái)輔助實(shí)現(xiàn)的現(xiàn)代企業(yè)經(jīng)營(yíng)管理模式的解決方案的總和。在客戶關(guān)系管理中，企。應(yīng)用開(kāi)發(fā)”的策略開(kāi)發(fā)一個(gè)管理信息系統(tǒng)的過(guò)程。通過(guò)分析公司客戶人工管理的不足，創(chuàng)建了一套行之有效的計(jì)算機(jī)管理客戶的方案。本系統(tǒng)界面友好，操作簡(jiǎn)單，比較實(shí)用。

　　

【正文】 OpenStatic, adLockOptimistic If Not Then MsgBox 內(nèi)容已存在 !, , 提示 Else (0).Value = Trim() Trim() = End If 員工管理 員工管理主要是對(duì)員工信息進(jìn)行添加、刪除、修改等操作。包括員工編號(hào)，姓名，性別，所屬團(tuán)隊(duì)，職務(wù)，單位地址，聯(lián)系電話，聯(lián)系地址，備注等內(nèi)容。如圖 52。窗體設(shè)計(jì)如表 52。 大連 東軟信息學(xué)院畢業(yè)設(shè)計(jì)（論文） 22 圖 52 員工信息 表 52 員工管理窗體設(shè)計(jì)表 控件名 屬性 值 frmygInfo caption 員工管理 Text1() Text 連接數(shù)據(jù)庫(kù)員工表 Label1() caption 連接數(shù)據(jù)庫(kù)員工信息表名稱 Label2 caption 員工編號(hào) Label3 Caption 員工信息 Textbox1 Text 輸入數(shù)據(jù)用于查詢 Command1 caption 添加 Command2 caption 刪除 Command3 caption 退出 Command4 caption 保存 Command5 caption 查詢 Mshflexgrid1 Cell 關(guān)連員工數(shù)據(jù) 連接數(shù)據(jù)庫(kù)代碼如下： delete from amp。 strTableName amp。 where amp。 amp。 =39。 amp。 Trim(Text1 (0).Text) amp。 39。 Dim rst As New If Then select * from amp。 strTableName amp。 where amp。 amp。 =39。 amp。 Trim(Text1 (0).Text) amp。 39。, CN, adOpenStatic, adLockOptimistic If Not Then 大連 東軟信息學(xué)院畢業(yè)設(shè)計(jì)（論文） 23 If MsgBox(本信息已存在，是否更新數(shù)據(jù)？ , vbYesNo, 提示 ) = vbNo Then Exit Sub For i = 1 To 1 If Trim(Text1(i).Text) Then (i).Value = Trim(Text1 (i).Text) End If Next i Else For i = 0 To 1 If Trim(Text1 (i).Text) Then (i).Value = Trim(Text1 (i).Text) End If Next i End If MsgBox 保存成功 !, , 提示 售后管理 售后管理主要是客戶產(chǎn)品的售后信息進(jìn)行管理，包括售后編號(hào)，售后日期，客戶名稱，售后內(nèi)容，售后結(jié)果，售后人員，發(fā)生費(fèi)用，備注等內(nèi)容。如圖 53。窗體設(shè)計(jì)如表 53。 大連 東軟信息學(xué)院畢業(yè)設(shè)計(jì)（論文） 24 圖 53 售后管理 代碼 如下： delete from amp。 strTableName amp。 where amp。 amp。 =39。 amp。 Trim(Combo1(0).Text) amp。 39。 Dim rst As New If Then select * from amp。 strTableName amp。 where amp。 amp。 =39。 amp。 Trim(Combo1(0).Text) amp。 39。, CN, adOpenStatic, adLockOptimistic If Not Then If MsgBox(本信息已存在，是否更新數(shù)據(jù)？ , vbYesNo, 提示 ) = vbNo Then Exit Sub For i = 1 To 1 If Trim(Combo1(i).Text) Then (i).Value = Trim(Combo1(i).Text) End If Next i Else For i = 0 To 1 If Trim(Combo1(i).Text) Then (i).Value = Trim(Combo1(i).Text) End If Next i End If If Then select * from amp。 strTableName, CN, adOpenStatic, adLockOptimistic Set = rst MsgBox 保存成功 !, , 提示 表 53 售后管理窗體設(shè)計(jì)表 控件名 屬性 值 frmkhInfo caption 售后管理 Combo1() Text 連接數(shù)據(jù)庫(kù)售后表 Label1() caption 連接數(shù)據(jù)庫(kù)售后信息表名稱 Label2 caption 售后編號(hào) Label3 Caption 售后信息 Textbox1 Text 輸入數(shù)據(jù)用于查詢 Command1 caption 添加 大連 東軟信息學(xué)院畢業(yè)設(shè)計(jì)（論文） 25 Command2 caption 刪除 Command3 caption 退出 Command4 caption 保存 Command5 caption 查詢 Mshflexgrid1 Cell 關(guān)連售后數(shù)據(jù) 查詢管理 查詢管理包括客戶、員工、售后、產(chǎn)品等信息的查詢功能。可以實(shí)現(xiàn)模糊查詢。如圖 55 客戶查詢。其他幾個(gè)查詢和客戶查詢功能實(shí)現(xiàn)是一樣的。以客戶為例介 紹。窗體設(shè)計(jì)如表 55。 表 55 查詢?cè)O(shè)計(jì)表 控件名 屬性 值 frmFind caption 信息檢索 Textbox1 Text 輸入數(shù)據(jù)參數(shù) Label1 caption 請(qǐng)選擇要檢索條件： Combo1 List 表字段 Command1 caption 查詢 Command2 caption 退出 Mshflexgrid1 Cell 關(guān)連查詢信息 圖 55 查詢 代碼如下： strsql = select * from amp。 strTableName amp。 where amp。 Trim() amp。 LIKE 39。% amp。 大連 東軟信息學(xué)院畢業(yè)設(shè)計(jì)（論文） 26 Trim() amp。 %39。 Dim rst As New If Then strsql, CN, adOpenStatic, adLockOptimistic k = 1 With MSHFlexGrid1 .Clear .Cols = For i = 0 To 1 .TextMatrix(0, i) = Trim((i).Name) Next i If 1 Then .Rows = 2 Exit Sub Else .Rows = + 1 While Not For i = 0 To 1 If Not IsNull((i)) Then .TextMatrix(k, i) = Trim((i)) Next i k = k + 1 Wend End If End With 大連 東軟信息學(xué)院畢業(yè)設(shè)計(jì)（論文） 27 第 6 章 系統(tǒng) 測(cè)試 測(cè)試目的 軟件是由程序員來(lái)編寫(xiě)的，程序員在編程時(shí)難免出錯(cuò)。錯(cuò)誤可能發(fā)生在需求分析、概要設(shè)計(jì)、詳細(xì)設(shè)計(jì)、編碼等軟件開(kāi)發(fā)的各個(gè)階段，如果這些錯(cuò)誤不能在軟件交付使用前被查出改正，那么遲早會(huì)在軟件運(yùn)行期間被發(fā)現(xiàn)，不僅修改這些錯(cuò)誤的代價(jià)會(huì)更高，而且往往造成很惡劣的后果。開(kāi)發(fā)任何一個(gè)軟件系統(tǒng)，設(shè)計(jì)完成以后都必須經(jīng)過(guò)調(diào)試。只有通過(guò)調(diào)試，才能檢驗(yàn)軟件產(chǎn)品的性能和質(zhì)量，才能發(fā)現(xiàn)并解決系統(tǒng)、程序或功能等方面的 錯(cuò)誤。調(diào)試是發(fā)現(xiàn)、檢查并糾正錯(cuò)誤的過(guò)程，是開(kāi)發(fā)一個(gè)軟件系統(tǒng)必不可少的過(guò)程。由于軟件測(cè)試的目標(biāo)，就決定了軟件測(cè)試的首要作用是尋找出軟件當(dāng)中的錯(cuò)誤。測(cè)試?yán)碚撝笇?dǎo)測(cè)試人員設(shè)計(jì)出更容易發(fā)現(xiàn)軟件錯(cuò)誤的測(cè)試用例，有助于在軟件正式運(yùn)行之前發(fā)現(xiàn)更多的錯(cuò)誤，減少軟件正式使用之后出現(xiàn)問(wèn)題的頻度；其次，軟件測(cè)試帶來(lái)的益處是能夠驗(yàn)證軟件的功能與性能等方面是否與軟件需求相符；此外，軟件測(cè)試時(shí)收集到的測(cè)試結(jié)果數(shù)據(jù)為軟件的可靠性與質(zhì)量分析提供了依據(jù)。 程序調(diào)試是一個(gè)復(fù)雜而漫長(zhǎng)的工作，調(diào)試基本上可分為兩個(gè)階段：一是單個(gè)模塊調(diào)試，二是整個(gè)軟 件的總體調(diào)試。單個(gè)模塊調(diào)試是比較基本的調(diào)試內(nèi)容，當(dāng)然在這里要再細(xì)分的話，還要對(duì)每個(gè)域?qū)傩赃M(jìn)行設(shè)置，判斷每個(gè)觸發(fā)器的編制是否正確，這些都直接影響整個(gè)模塊的功能及運(yùn)行的成功。調(diào)試時(shí)，對(duì)觸發(fā)器的級(jí)別，觸發(fā)器名稱、屬性、主程序等應(yīng)反復(fù)編譯、測(cè)試，直到實(shí)現(xiàn)模塊功能運(yùn)行成功為止。對(duì)于總體程序的實(shí)現(xiàn)，就是把每個(gè)模塊與菜單連在一起，然后試驗(yàn)各個(gè)內(nèi)容是否正確。 測(cè)試方法 在軟件開(kāi)發(fā)的過(guò)程中，軟件測(cè)試是其中重要的一部分。由于開(kāi)發(fā)一個(gè)軟件項(xiàng)目的時(shí)間是漫長(zhǎng)的，同時(shí)也要面對(duì)極其錯(cuò)綜復(fù)雜的問(wèn)題，人們的主觀認(rèn)識(shí)不可能完全符合客觀現(xiàn) 實(shí)，而與工程密切相關(guān)的各類人員之間的通信和配合也不可能完美無(wú)暇，因此，軟件生命周期的每個(gè)階段都不可回避地會(huì)產(chǎn)生差錯(cuò)，我們力是求在每個(gè)階段加速之前通過(guò)嚴(yán)格的技術(shù)審查盡可能的早發(fā)現(xiàn)并糾正錯(cuò)誤。如果在軟件投入運(yùn)行前，沒(méi)有發(fā)現(xiàn)并糾正軟件中的大部分錯(cuò)誤，則這些錯(cuò)誤遲早會(huì)在管理過(guò)程中暴露出來(lái)，那進(jìn)不僅改正這些錯(cuò)誤的代價(jià)更大，而且會(huì)造成很惡劣后果。測(cè)試的目的就是在軟件投入實(shí)際使用前，盡可能地多發(fā)現(xiàn)軟件中的錯(cuò)誤。目前軟件測(cè)試仍然是保證軟件質(zhì)量的關(guān)鍵步驟，它是對(duì)軟件規(guī)大連 東軟信息學(xué)院畢業(yè)設(shè)計(jì)（論文） 28 格說(shuō)明設(shè)計(jì)和編碼最后復(fù)查。 我們的測(cè)試的原則 :通過(guò)測(cè)試發(fā)現(xiàn) 程序在的錯(cuò)誤、盡可能發(fā)現(xiàn)目前尚未發(fā)現(xiàn)的算法錯(cuò)誤。 測(cè)試的正確定義是 “ 為了發(fā)現(xiàn)程序中的錯(cuò)誤而執(zhí)行程序的過(guò)程 ” 。這和某些人通常想象的“測(cè)試為表明程序是正確的”，“成功的測(cè)試是沒(méi)有錯(cuò)誤的測(cè)試”等等是完全相反的。正確認(rèn)識(shí)測(cè)試的目的是十分重要的，測(cè)試的目的決定了測(cè)試方案的設(shè)計(jì)。如果為了表明程序是正確的而進(jìn)行測(cè)試，就會(huì)設(shè)計(jì)一些不易暴露的測(cè)試方案。 系統(tǒng)測(cè)試 測(cè)試的數(shù)據(jù) 在進(jìn)行編寫(xiě)調(diào)試時(shí)，我都是按照“編碼→測(cè)試→修改→再測(cè)試（→再修改）”方式進(jìn)行，所需的數(shù)據(jù)都是由本人自己添加，系統(tǒng)在設(shè)計(jì)中使用的測(cè)試數(shù)據(jù)也 是由本人隨機(jī)輸入產(chǎn)生。 系統(tǒng)測(cè)試方法 首先在自己的電腦上進(jìn)行多次測(cè)試，保證不能有錯(cuò)誤和過(guò)失，其次是在安裝有數(shù)據(jù)庫(kù) SQL server 20xx 和 Microsoft Visual Basic 的同學(xué)電腦上進(jìn)行測(cè)試，測(cè)試在不同的電腦上本系統(tǒng)能否運(yùn)行正常，以達(dá)到測(cè)試的效果。 系統(tǒng)測(cè)試項(xiàng)目表 測(cè)試項(xiàng)目表如下： 表 8 測(cè)試項(xiàng)目表 序號(hào) 測(cè)試項(xiàng)目 內(nèi)容和目的 測(cè)試結(jié)果 1 用戶登錄 輸入正確賬號(hào) 與密碼 可以登錄 輸入錯(cuò) 誤賬號(hào) 與密碼 提示錯(cuò)誤的信息 2 用戶管理 （添加，修改，刪除） 輸入正確信息 成功 完成 輸入錯(cuò)誤信息 操作失敗 3 產(chǎn)品信息錄入 輸入正確的信息 成功完成 4 產(chǎn)品信息錄入 輸入錯(cuò)誤的信息 操作失敗 5 合同信息 管理 （添加，修改，刪除） 輸入正確信息 成功完成 輸入錯(cuò)誤信息 操作失敗 大連 東軟信息學(xué)院畢業(yè)設(shè)計(jì)（論文） 29 6 公司信息管理 （添加，修改，刪除） 輸入正確信息 成功完成 輸入錯(cuò)誤信息 操作失敗 7 客戶信息 管理 （添加，修改，刪除） 輸入正確信息 成功完成 輸入錯(cuò)誤信息 操作失敗 8 賬號(hào)信息管理 （添加，修改，刪除） 輸入正確信息 成功完成 輸入錯(cuò)誤信息 操作失 敗 9 產(chǎn)品信息 管理 （添加，修改，刪除） 輸入正確信息 成功完成 輸入錯(cuò)誤信息 操作失敗 10 查詢 模塊 輸入查詢條件 能顯示查詢結(jié)果 系統(tǒng)測(cè)試結(jié)果 系統(tǒng)運(yùn)行時(shí)均能執(zhí)行其相應(yīng)功能，均能實(shí)現(xiàn)查看、添加、刪除、編輯等功能，且運(yùn)行顯示正常，后臺(tái)數(shù)據(jù)庫(kù)也運(yùn)行良好，數(shù)據(jù)保證了一致性和穩(wěn)定性。 大連 東軟信息學(xué)院畢業(yè)設(shè)計(jì)（論文） 30 第 7 章 結(jié) 論 總的來(lái)說(shuō)，在這次的畢業(yè)設(shè)計(jì)中遇到了不少的問(wèn)題，大部分得到了很好的解決，但也有少部分遺留的問(wèn)題。 首先便是調(diào)研的不充分。由于以前根本未曾接觸過(guò)軟件的整體開(kāi)發(fā)設(shè)