【正文】 hen dbName = dbName + 、 dbName = dbName + DataBase、 STRSQL = select [用戶身份 ] from [Admin] where [用戶 ID]= amp。 39。關(guān)閉數(shù)據(jù)庫 Set userRD = Nothing Set userDB = Nothing 39。有特殊需求的情況如：身份驗證應(yīng)引用 DAO(數(shù)據(jù)訪問對象 )。 第五章 、 系統(tǒng)性能測試和分析 測試的目的就是為了能以最少的人力和是發(fā)現(xiàn)潛在的各種錯誤和缺陷。所以黑盒測試主要對程序做以下檢查： 是否遺漏了功能和沒有完善的功能， 在接口上輸入能否有正確的輸出、 性能是否滿足要求 白盒測試主要是對軟件的細節(jié)做測試，測試人員利用內(nèi)部的結(jié)構(gòu)選擇用例。測試的依據(jù)是設(shè)計階段所形成的概要設(shè)計和詳細設(shè)計，對于設(shè)計中沒有清楚表述的或者由于變更引起的功能，以需求文檔為準。并對此模塊作出評估，如果還有存在問題我們要進行修改，如果已經(jīng)通過測試我們將從中獲得經(jīng)驗并在以后將本次軟件開發(fā)的經(jīng)驗用戶以后的開 發(fā)過程。而且系統(tǒng)中各個模塊的獨立性十分強，也不會因為某個模塊的失敗而導(dǎo)致整個系統(tǒng)的失敗。下面針對整個系統(tǒng)進行測試：系統(tǒng)測試是將已經(jīng)確認的軟件，計算機硬件等其他因素組合在一起，進行信息系統(tǒng)的各種組裝和確認測試，其目的是通過和系統(tǒng)的需求相比較，發(fā)現(xiàn)所開發(fā)的系統(tǒng)與用戶需求不符或矛盾的地方。 通過整個系統(tǒng)的測試，我們發(fā)現(xiàn)真?zhèn)€系統(tǒng)的功能還是比較穩(wěn)定，雖然在某些地方還不盡如人意，但是我們開發(fā)的目的還是達到了，作為第一次開發(fā)軟件，第一次做畢業(yè)設(shè)計，我們從中還是學(xué)到了不少的知識，通過這次開發(fā)，我們?yōu)橐院筮M入計算機行業(yè)做開發(fā)工作積累了一定的經(jīng)驗。 登錄界面源代碼： 39。39。39。 amp。取消 End End Sub Private Sub Form_Activate() *******系 畢業(yè)論文管理系統(tǒng) 作者 : **** 32 32 End Sub Private Sub Form_Load() If Then = Provider=。Persist Security Info=False OK = False = GetSetting(, Settings, user_name, ) End Sub 、系統(tǒng)主界面 ： 在系統(tǒng)登錄成功之后，就。 amp。 If Then txtsql, CN, adOpenStatic, adLockOptimistic If = True Then MsgBox 沒有這個用戶，請重新輸入用戶名 !, vbOKOnly + vbExclamation, 警告 Else If Trim((1)) = Trim() Then UserName = Trim() SaveSetting , Settings, user_name, UserName OK = True Unload Me Else MsgBox 輸入密碼不正確，請重新輸入！ , vbOKOnly + vbExclamation, 警告 = End If End If Else MsgBox 輸入密碼不正確，請重新輸入！ , vbOKOnly + vbExclamation, 警告 End If End If miCount = miCount + 1 OK = False If miCount = 3 Then End End If Exit Sub Err: MsgBox 登錄出錯 ,請找管理員 !, vbExclamation OK = False End End Sub Private Sub Command2_Click() 39。初始化系統(tǒng) OK = True Unload Me *******系 畢業(yè)論文管理系統(tǒng) 作者 : **** 31 31 ElseIf Trim() admin Then txtsql = select * from user_Info where 姓名 = 39。 Dim sysPassword As String sysPassword = GetSetting(, Settings, syspassword, admin) If Trim() = admin And Trim() = sysPassword Then 39。39。需要通過系統(tǒng)管理驗證，即輸入正確的密碼進行系統(tǒng)登陸，本系統(tǒng)默認的密碼為 0。在本系統(tǒng)中我們對整個源代碼進行測試，發(fā)現(xiàn)系統(tǒng)沒有出現(xiàn) 什么問題 ,在將系統(tǒng)打包后可能會出現(xiàn)的問題就是有些機器上可能沒有沒有微軟公司的一些 ActiveXObject控件或者是某些組件。 測試表格 測試表格顯示此功能模塊通過測試，也證明了本功能 模塊與其他模塊的獨立性十分強，從而在以后更新軟件的過程中，能夠更多的更有效的使用各個功能模塊。 3． 測試條件： 在客戶最低配置的硬件設(shè)施下 ， 測試登錄除了設(shè)計驗證數(shù)據(jù)庫用戶信息之外，還需要檢驗與數(shù)據(jù)庫的調(diào)用關(guān)系和界面邏輯，因此，牽涉到的測試用例（組）包括以下五個。具體的測試項請參考測試用例設(shè)計文檔，此處以測試項標識。 測試實例的選擇與研究 由于本系統(tǒng)的規(guī)模比較小，因此每一個測試項，在上面對應(yīng)的部分完成以后，由測試人員和編碼人員共同進行驗證，在單元測試中，測試的方法以白盒測試為*******系 畢業(yè)論文管理系統(tǒng) 作者 : **** 28 28 主，在界面測試的時候，以視覺觀察、個人判斷作為測試的依據(jù)。 系統(tǒng)測試分為白 盒測試和黑盒測試 就軟件測試來講，軟件的黑盒測試意味著軟件要在軟件的接口進行測試。特殊情況、身份驗證等由 DAO 訪問數(shù)據(jù)庫。關(guān)閉數(shù)據(jù)庫 Set userRD = Nothing Set userDB = Nothing logOK = False = vbDefault MsgBox 用戶名或密碼錯誤！請重新輸入！ , vbOKOnly + vbExclamation, 登陸失敗 End If Exit Sub errEnd： = vbDefault MsgBox , vbOKOnly + vbExclamation, 登陸錯誤 logOK = False 39。檢索用戶 ,驗證密碼 *******系 畢業(yè)論文管理系統(tǒng) 作者 : **** 26 26 Set userRD = (STRSQL, dbOpenSnapshot) If 0 Then 39。 and [用戶 密碼 ]= amp。 1．對象命名約定 下面為在編碼過程中會用到的對象統(tǒng)一的命名，如下表 對象統(tǒng)一的命名所示 : *******系 畢業(yè)論文管理系統(tǒng) 作者 : **** 24 24 表 對象統(tǒng)一的命名 對 象名 對象類型 命名約定（前綴碼） Form 窗體 Frm Command 按鈕 Cmd Label 標簽 Lab TextBox 文本框 Txt ComboBox 組合框 ComB ListBox 列表框 LstB Adodb 數(shù)據(jù)庫訪問對象 Adodb DataGrid 數(shù)據(jù)表格顯示組件 DataGrid Frame 框架 Fam Option 單選框 Opt CheckBox 復(fù)選框 Chk PictureBox 圖象顯示組件 PtB CommonDialog 通用對話框組件 ComDlg Timer 時間組件 Tim ToolBar 工具欄 TlBar Menu 菜單 Mnu SSTab 頁框 SSTab ImageList 界面資源組件 ImgLst *******系 畢業(yè)論文管理系統(tǒng) 作者 : **** 25 25 ２． 常量和變量的命名約定 下面為在編碼過程中會用到的常量和變量統(tǒng)一的命名，如表 所示 : 表 常量和變量命名約定 變量名 數(shù)據(jù)類型 變量類型 含義 UserShenFen String 全局變量 用戶身份標志 LogOK Boolean 全 局變量 登陸狀態(tài) UserName String 全局變量 用戶名 GongYingShangID String 全局變量 文檔標題 GongYingShang String 全局變量 文檔類型 TuShuBianHao String 全局變量 入庫日期 DingJia Single 全局變量 下發(fā)日期 ShuMing String 全局變量 入庫人 HuiYuanKaHao String 全局變量 文檔資料 HYXingMing String 全局變量 主要內(nèi)容 HYDengJi String 全局變量 備注 編碼應(yīng)清晰、可讀性好，運用縮進、空行，結(jié)合大小寫區(qū)別等方法保持程序結(jié)構(gòu)良好。 首先考慮標準化，在標準化的基礎(chǔ)上進行界面的美工設(shè)計。 2．軟硬件環(huán)境需求 軟件環(huán)境：兼容當(dāng)前主流操作系統(tǒng) Windows 95/98/NT/Me/2021/XP 等。其中有兩個變量要定義為公用的變量，因為這段代碼是放在一個模塊中的，為了*******系 畢業(yè)論文管理系統(tǒng) 作者 : **** 23 23 在每一個窗體中能夠 使用這個變量，所以必須要聲明為公用變量。 39。建立數(shù)據(jù)庫連接對像 DBpath = amp。Persist Security Info=False 指定數(shù)據(jù)連接的路徑，模式，安全機制 = 30 指定數(shù)據(jù)超時 的時間 打開數(shù)據(jù)庫 If = 1 Then ConnectDB = True 如果數(shù)據(jù)已經(jīng)打開就返回 TRUE Else ConnectDB = False End If End Function Public Function CloseDB() As Boolean If = 1 Then Set Con = Nothing Else Exit Function End If 當(dāng)要關(guān)閉數(shù)據(jù)時，如果檢測數(shù)據(jù)打 開那么關(guān)閉，如果已關(guān)閉就退出 End Function 用 vb編寫一個管理軟件，如果不能連接數(shù)據(jù)庫，那也沒有什么用處。Data Source= amp。 在下面的對話框中選“使用設(shè)計器創(chuàng)建表 ” ，上面還有三個按鈕，一個是打*******系 畢業(yè)論文管理系統(tǒng) 作者 : **** 21 21 開，一個是設(shè)計，一個是新建，點擊設(shè)計，就可以開始設(shè)計數(shù)據(jù)表了 使用設(shè)計器創(chuàng)建表如圖 所示 : 圖 使用設(shè)計器創(chuàng)建表 出現(xiàn)設(shè)計的界面后，就可以開始設(shè)計數(shù)據(jù)表了！ 設(shè)計數(shù)據(jù)表如圖 所示 : 圖 設(shè)計數(shù)據(jù)表 ******