【正文】 End If Sub CloseDB() Set Rs = Nothing Set Conn = Nothing End Sub % 。SQLDBNameamp。SQLDBPasswordamp。SQLDBUserNameamp。SQLServerNameamp。容錯(cuò)聲明 = True Set Conn = () driver={SQLServer}。數(shù)據(jù)庫連接 39。數(shù)據(jù)庫密碼 SQLDBName = bank 39。服務(wù)器名稱或地址 SQLDBUserName = sa 39。M University System，2020 附 錄 鏈接數(shù)據(jù)庫（ Micorsoft SQL Sever 2020）的語句為： % 39。 參考文獻(xiàn) [1] 徐仁佐．軟件工程 [M]．華中科技大學(xué)出版社， 2020 [2] 刀飛科技研發(fā)中心． ASPamp。同時(shí)，也感謝系部領(lǐng)導(dǎo)和機(jī)房幾位的老師給予我們的大力支持。在這段時(shí)間里，所有的工作都得靠自己努力嘗試才能有所進(jìn)展，而且對(duì)于整個(gè)開發(fā)過程，需要合理的進(jìn)度安排和很好的邏輯協(xié)調(diào)能力，這種解決問題的能力鍛煉和思考問題的模式都使我受益匪淺，所有這些都構(gòu)成了我不能忘懷這一段時(shí)間之旅的原因。 3)在實(shí)際中運(yùn)用網(wǎng)上銀行系統(tǒng)的全部或部分構(gòu)件，并根據(jù)運(yùn)行反饋進(jìn)行完善和改進(jìn)。在下一階段，將針對(duì)以下幾個(gè)方面進(jìn)一步開展研究、升發(fā)和實(shí)踐工作： 1)實(shí)現(xiàn)在本次開發(fā)中尚未完成的功能 。 由于時(shí)間關(guān)系，本系統(tǒng)在實(shí)施中有諸多考慮不足的地方。 ,conn,1,3 rs(mymoney)=cdbl(rs(mymoney))+cdbl(tomoney) 錯(cuò)誤點(diǎn)： Microsoft VB 腳本 運(yùn)行時(shí)錯(cuò)誤 (0x800A005B)不能直接用 =給對(duì)象賦值 ,要用 set 對(duì)象名 =值 錯(cuò)誤點(diǎn)： Microsoft VB 腳本 編譯器錯(cuò)誤 (0x800A03F6)語句格式錯(cuò)誤 解決方法：仔細(xì)查看代碼中 if 和 end if，有可能只有 if，找不到 end if 結(jié) 論 網(wǎng)上銀行是傳統(tǒng)銀行業(yè)在網(wǎng)絡(luò)上的延伸，也是實(shí)現(xiàn)電子商務(wù)的重要手段在這樣一個(gè)銀行企業(yè)必爭之地，如何能以最低的 成本 實(shí)現(xiàn)最快的市場(chǎng)應(yīng)變能力，是網(wǎng)上銀行系統(tǒng)建設(shè)的目標(biāo)。tokahaoamp。 錯(cuò)誤點(diǎn)： (0x800A0C93)更改或添加完記錄沒有更新就關(guān)閉鏈接() 解決方法：在語句 前加語句 ，即 set rs=() select * from [user] where kahao=39。39。amp。39。amp。 ======系統(tǒng)錯(cuò)誤 ===== 錯(cuò)誤點(diǎn)： 找不到該文件，請(qǐng)檢查數(shù)據(jù)庫鏈接 解決方法： 講數(shù)據(jù)庫服務(wù)管理器打開，檢查鏈接數(shù)據(jù)庫的語句。同時(shí)，要學(xué)會(huì)看錯(cuò)誤提示，系統(tǒng)提示會(huì)給編程人員提供大量有用的信息，如果掌握好它，會(huì)給測(cè)試工作帶來意想不到的成效。 測(cè)試用例 表 61測(cè)試用例設(shè)計(jì)書 測(cè)試模塊 類型 輸入?yún)?shù) 期望 結(jié)果 用戶登錄 正常 卡號(hào)： 1234561890 密碼： 123456 登錄成功，跳入 用戶界面 異常 編號(hào)： 1234567890 密碼： 111112 你輸入的卡號(hào)和密碼不 相符 ,請(qǐng)重新登錄 網(wǎng)上轉(zhuǎn)賬 正常 付款方卡號(hào)： 1234567892 收款方：小寧（ 1234567893） 轉(zhuǎn)賬金額： 10000 跳入確認(rèn)轉(zhuǎn)賬頁面 異常 付款方卡號(hào)： 1234567892 收款方： 轉(zhuǎn)賬金額： 100 顯示錯(cuò)誤信息“收費(fèi)方 不能為空” 異常 付款方卡號(hào)： 1234567892 收款方：小寧（ 1234567893） 轉(zhuǎn)賬金額： 顯示錯(cuò)誤信息“金額 不能為空” 添加聯(lián)系人 （ 1234567892） 正常 名稱：寧國 卡號(hào)： 123456 顯示添加成功 異常 名稱：尤莎 卡號(hào)： 1234567890 顯示錯(cuò)誤信息“該用戶已 在你的聯(lián)系人中” 測(cè)試 實(shí)施 測(cè)試策略 黑盒測(cè)試 測(cè)試目標(biāo) 找出系統(tǒng)運(yùn)行輸入錯(cuò)誤信息時(shí)的報(bào)錯(cuò) 功能測(cè)試 1．用戶登錄 1）正常情況 測(cè)試數(shù)據(jù)如圖 61所示，測(cè)試結(jié)果如圖 62所示 圖 61 測(cè)試數(shù)據(jù)圖 圖 62 測(cè)試結(jié)果圖 2）異常情況 異常情況如圖 63所示 圖 63 異常情況圖 1）正常情況 測(cè)試數(shù)據(jù)如圖 64所示 圖 64 測(cè)試數(shù)據(jù)圖 測(cè)試結(jié)果如圖 65， 66所示 圖 65 測(cè)試結(jié)果圖 圖 66 測(cè)試結(jié)果圖 2）異常情況 測(cè)試數(shù)據(jù)如圖 67所示 圖 67 測(cè)試數(shù)據(jù)圖 測(cè)試結(jié)果如圖 68所示 圖 68 測(cè)試結(jié)果圖 1）正常情況 測(cè)試數(shù)據(jù)如圖 69所示 ，測(cè)試結(jié)果如圖 610所示 圖 69 測(cè)試數(shù)據(jù)圖 圖 610 測(cè)試結(jié)果圖 2）異常情況 測(cè)試數(shù)據(jù)如圖 611所示 ， 測(cè)試結(jié)果如圖 612所示 圖 611 測(cè)試數(shù)據(jù)圖 圖 612測(cè)試結(jié)果圖 測(cè)試結(jié)果 測(cè)試系統(tǒng)運(yùn)行正常 ，當(dāng)輸入錯(cuò)誤信息時(shí)，提示錯(cuò)誤提示。 軟件測(cè)試的方法 本系統(tǒng)采用的是黑盒測(cè)試。但發(fā)現(xiàn)問題不是我們的最終目標(biāo)，發(fā)現(xiàn)問題是為了解決問題，測(cè)試階段的根本目標(biāo)是盡可能多地發(fā)現(xiàn)并排除軟件中潛藏的錯(cuò)誤，最終把一個(gè)高質(zhì)量的軟件系統(tǒng)交給用戶使用。39。amp。39。amp。39。amp。,) dateandtime=replace(trim(request(dateandtime)),39。 圖 53新聞發(fā)布頁面圖 主要代碼實(shí)現(xiàn)如下所示： % If (Act) = Add Then dim biaoti,neirong,dateandtime,sql,rs biaoti=replace(trim(request(biaoti)),39。 ,conn,1,3 rs(mymoney)=cdbl(rs(mymoney))+cdbl(tomoney) set rs=nothing set rs=() select * from [main] ,conn,1,3 rs(kahao)=kahao rs(toname)=toname rs(tokahao)=tokahao rs(tomoney)=tomoney rs(dateandtime)=date set rs=nothing set conn=nothing end if % 后臺(tái) 功能模塊設(shè)計(jì) 后臺(tái)管理員 的功能主要是進(jìn)行用戶管理，包括查看每個(gè)用戶的基本信息、添加網(wǎng)上銀行用戶、修改用戶的余額、狀態(tài)和用戶名、刪除用戶；其次是對(duì)網(wǎng)站的維護(hù)和個(gè)人的管理，包括發(fā)布最新新聞，修改密碼和注銷本次登錄的管理員。tokahaoamp。 ,conn,1,3 rs(mymoney)=cdbl(rs(mymoney))cdbl(tomoney) set rs=nothing set rs=() select * from [user] where kahao=39。kahaoamp。 /script end if set rs=nothing set rs=() select * from [user] where kahao=39。)。 ,conn,1,3 if or then script language=javascript alert(39。tokahaoamp。 /script end if set rs=nothing set rs=() select * from [user] where kahao=39。)。 ,conn,1,3 if cdbl(rs(mymoney))cdbl(tomoney) then script language=javascript alert(39。kahaoamp。 /script end if set rs=() select * from [user] where kahao=39。)。 ,conn,1,3 if not then toname=rs(linkname) end if set rs=nothing % % if request(action)=save then kahao=request(kahao) toname=request(toname) tokahao=request(tokahao) tomoney=request(tomoney) if cdbl(kahao)=cdbl(tokahao) then script language=javascript alert(39。request(tokahao)amp。 and linkkahao=39。session(kahao)amp。 } // /SCRIPT % set rs=() select * from [link] where kahao=39。 39。 i 。39。 return false。 } if(isNaN()) { ()。 alert(匯款金額不能為空！ )。 return