ASP動(dòng)態(tài)網(wǎng)頁(yè)制作常見(jiàn)錯誤處理發(fā)布者：本站 時(shí)間：2020-05-06 16:05:22
ASP是非常簡(jiǎn)單的，以至于許多的開(kāi)發(fā)者不會(huì )去思考錯誤處理。錯誤處理能夠讓你的應用程序更加合理。很多用ASP編寫(xiě)的商業(yè)網(wǎng)站，大多數都忽略了錯誤處理。
錯誤的類(lèi)型
編譯錯誤：這種錯誤出現一般都是代碼的語(yǔ)法問(wèn)題。因為編譯錯誤而導致辭ASP停止運行。
運行錯誤：這個(gè)錯誤是發(fā)生在你準備運行ASP時(shí)的。例如：如果你試圖給一個(gè)變量賦值，但是卻超出了該變量允許的范圍。
邏輯錯誤：邏輯錯誤是最難被發(fā)現的，這種錯誤經(jīng)常是一種結構錯誤，電腦是發(fā)現不了的。這就需要我們徹頭徹尾地檢查我們的代碼。
因為編譯錯誤一般是和邏輯錯誤一起發(fā)生的，一般都能顯示出來(lái)，所以我們擔心的就只是運行錯誤。它都終止ASP的運行，而且給用戶(hù)丟下一堆很不友好的文字。
那么我們要怎樣處理運行錯誤呢??？我們先來(lái)看看，ASP唯一提供給我們的錯誤命令---On Error Resume Next(這里提醒一下初學(xué)者，在A(yíng)SP中只有On Error Resume Next語(yǔ)句，沒(méi)有On Error Resume Goto語(yǔ)句）
如果你不使用On Error Resume Next語(yǔ)句的話(huà),一切運行錯誤都會(huì )發(fā)生，這個(gè)是致命的，那么就會(huì )有一段錯誤代碼“展現”給用戶(hù)，而且ASP程序也會(huì )停止。
下面就是一個(gè)錯誤代碼：
|
Microsoft OLE DB Provider for ODBC Drivers error 80004005 [Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified /test.asp, line 60 |
當我們在程序最上面使用On Error Resume Next語(yǔ)句時(shí)，所有的錯誤都會(huì )被忽略，程序會(huì )自動(dòng)執行下一條語(yǔ)句。這樣程序就會(huì )完全執行，出錯后用戶(hù)也不會(huì )看到出錯信息。但是這樣也有不好的地方，那就是如果程序沒(méi)有按照你想像的執行的話(huà)，你就很難找到到底是哪里出了問(wèn)題，所以你就得在必要的地方對錯誤進(jìn)行處理。
處理錯誤
在A(yíng)SP中，處理錯誤的最好的辦法就是在程序最底端放上代碼來(lái)處理錯誤。推薦在每個(gè)ASP程序都使用緩沖區。這樣的話(huà)，如果錯誤發(fā)生，頁(yè)面就會(huì )停止，頁(yè)面內容也會(huì )被清除，這樣用戶(hù)就不會(huì )看到錯誤信息，對你們的抱怨也就少了！下面是一個(gè)例子：
|
<% '設置buffer為T(mén)rue Response.Buffer = True '開(kāi)始錯誤處理 On Error Resume Next %> <% '錯誤處理 If Err.Number <> 0 Then '清除頁(yè)面 Response.Clear '顯示錯誤信息給用戶(hù) %> <HTML> <HEAD> <TITLE></TITLE> </HEAD> <BODY BGCOLOR="#C0C0C0"> <FONT FACE="ARIAL">An error occurred in the execution of this ASP page<BR> Please report the following information to the support desk<P> <B>Page Error Object</B><BR> 錯誤 Number： <%= Err.Number %><BR> 錯誤信息： <%= Err.Description %><BR> 出錯文件： <%= Err.Source %><BR> 出錯行： <%= Err.Line %><BR> </FONT> </BODY> </HTML> <%End If%> |
上面的例子首先設置On Error Resume Next ，這樣出現錯誤就不會(huì )影響程序的執行。
錯誤處理和數據庫
在錯誤處理中加入數據庫的執行是很復雜的。假若我們有一個(gè)程序，有很多的命令去向數據庫中添加記錄，如果insert/update在程序的最底部執行，如果我們前面又錯誤發(fā)生，那就完了！我們就會(huì )向數據庫中添加了一個(gè)錯誤的信息。因為我們用了On Error Resume Next 一切的錯誤都被忽略了！即使前面出錯，程序依舊會(huì )向數據庫中添加數據的。
為避免這種情況，我們就先得做些手腳，正確處理的方法如下：
|
If Err.Number = 0 And objConnection.Errors.Count = 0 Then '這里才能執行語(yǔ)句，因為沒(méi)有錯誤 Set rstResults = dbData.Execute(txtSql) End If 更多高級的處理辦法 當一個(gè)錯誤發(fā)生時(shí)，你們也可以顯示更多的錯誤信息。下面是同時(shí)處理數據庫和頁(yè)面錯誤的例子，有了它我們一下就能發(fā)現我們程序中的所有錯誤。 <% If Err.Number <> 0 Then Response.Clear Select Case Err.Number Case 8 '指定錯誤的Number '在這里處理自定義錯誤 Case Else '一般錯誤 If IsObject(objConnection) Then If objConnection.Errors.Count > 0 Then %> <B>Database Connection Object</B> <% For intLoop = 0 To objConnection.Errors.Count - 1 %> Error No: <%= objConnection.Errors(intLoop).Number %><BR> Description: <%= objConnection.Errors(intLoop).Description %><BR> Source: <%= objConnection.Errors(intLoop).Source %><BR> SQLState: <%= objConnection.Errors(intLoop).SQLState %><BR> NativeError: <%= objConnection.Errors(intLoop).NativeError %><P> <% Next End If End If If Err.Number <> 0 Then %> <B>Page Error Object</B><BR> Error Number <%= Err.Number %><BR> Error Description <%= Err.Description %><BR> Source <%= Err.Source %><BR> LineNumber <%= Err.Line %><P> <% End If End Select End If %> |
上面的例子讓我們一下了處理了很多在數據庫中出現的問(wèn)題，這個(gè)在我們日常編程也是常用的！我們也應該看到那個(gè)Select Case 語(yǔ)句，它能讓我們來(lái)處理特定的錯誤。
Redirect 和錯誤處理
有一點(diǎn)我們就當注意一下，就是我們常用到的redirect對象，如果一個(gè)頁(yè)面中出現了redirect對象，那么錯誤處理就失去了意義。所以在轉向之前我們還得處理一下，如下：
|
If Err.Number = 0 And objConnection.Errors.Count = 0 Then Response.Clear Response.Redirect URL Here End If |
把代碼變得更整齊
為了讓代碼變得更整齊，首先把錯誤處理的文件放在一個(gè)包含文件中。這樣你就可以在任何文件中使用它。這樣修改也方便。
在你程序的最上方加入(當然在語(yǔ)言聲明之后）On Error Resume Next語(yǔ)句。
在你執行SQL以前進(jìn)行錯誤檢查。
使用redirect以前也要進(jìn)行錯誤處理。
讓你處理錯誤的包含文件在代碼的最上面。
選擇我們，優(yōu)質(zhì)服務(wù)，不容錯過(guò)
1. 優(yōu)秀的網(wǎng)絡(luò )資源，強大的網(wǎng)站優(yōu)化技術(shù)，穩定的網(wǎng)站和速度保證
2. 15年上海網(wǎng)站建設經(jīng)驗，優(yōu)秀的技術(shù)和設計水平，更放心
3. 全程省心服務(wù)，不必擔心自己不懂網(wǎng)絡(luò )，更省心。
------------------------------------------------------------
24小時(shí)聯(lián)系電話(huà)：021-58370032