ASP開發(fā)常用錯(cuò)誤處理的方法

2010-08-28 10:52:45來源:西部e網(wǎng)作者:

  ASP是非常簡單的,以至于許多的開發(fā)者不會(huì)去思考錯(cuò)誤處理。錯(cuò)誤處理能夠讓你的應(yīng)用程序更加合理。很多用ASP編寫的商業(yè)網(wǎng)站,大多數(shù)都忽略了錯(cuò)誤處理。  

  錯(cuò)誤的類型

  編譯錯(cuò)誤:這種錯(cuò)誤出現(xiàn)一般都是代碼的語法問題。因?yàn)榫幾g錯(cuò)誤而導(dǎo)致辭ASP停止運(yùn)行。 

  運(yùn)行錯(cuò)誤:這個(gè)錯(cuò)誤是發(fā)生在你準(zhǔn)備運(yùn)行ASP時(shí)的。例如:如果你試圖給一個(gè)變量賦值,但是卻超出了該變量允許的范圍。

  邏輯錯(cuò)誤:邏輯錯(cuò)誤是最難被發(fā)現(xiàn)的,這種錯(cuò)誤經(jīng)常是一種結(jié)構(gòu)錯(cuò)誤,電腦是發(fā)現(xiàn)不了的。這就需要我們徹頭徹尾地檢查我們的代碼。

  因?yàn)榫幾g錯(cuò)誤一般是和邏輯錯(cuò)誤一起發(fā)生的,一般都能顯示出來,所以我們擔(dān)心的就只是運(yùn)行錯(cuò)誤。它都終止ASP的運(yùn)行,而且給用戶丟下一堆很不友好的文字。  

  那么我們要怎樣處理運(yùn)行錯(cuò)誤呢?我們先來看看,ASP唯一提供給我們的錯(cuò)誤命令---On Error Resume Next(這里提醒一下初學(xué)者,在ASP中只有On Error Resume Next語句,沒有On Error Resume Goto語句) 

  如果你不使用On Error Resume Next語句的話,一切運(yùn)行錯(cuò)誤都會(huì)發(fā)生,這個(gè)是致命的,那么就會(huì)有一段錯(cuò)誤代碼“展現(xiàn)”給用戶,而且ASP程序也會(huì)停止。 

  下面就是一個(gè)錯(cuò)誤代碼: 

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

   當(dāng)我們?cè)诔绦蜃钌厦媸褂肙n Error Resume Next語句時(shí),所有的錯(cuò)誤都會(huì)被忽略,程序會(huì)自動(dòng)執(zhí)行下一條語句。這樣程序就會(huì)完全執(zhí)行,出錯(cuò)后用戶也不會(huì)看到出錯(cuò)信息。但是這樣也有不好的地方,那就是如果程序沒有按照你想像的執(zhí)行的話,你就很難找到到底是哪里出了問題,所以你就得在必要的地方對(duì)錯(cuò)誤進(jìn)行處理。 

  處理錯(cuò)誤

  在ASP中,處理錯(cuò)誤的最好的辦法就是在程序最底端放上代碼來處理錯(cuò)誤。推薦在每個(gè)ASP程序都使用緩沖區(qū)。這樣的話,如果錯(cuò)誤發(fā)生,頁面就會(huì)停止,頁面內(nèi)容也會(huì)被清除,這樣用戶就不會(huì)看到錯(cuò)誤信息,對(duì)你們的抱怨也就少了!下面是一個(gè)例子: 

<% 
'設(shè)置buffer為True 
Response.Buffer = True  
'開始錯(cuò)誤處理 
On Error Resume Next 
%>  
<%  
'錯(cuò)誤處理 
If Err.Number <> 0 Then 
'清除頁面 
Response.Clear 
'顯示錯(cuò)誤信息給用戶  
%> 
  <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> 
         錯(cuò)誤 Number: <%= Err.Number %><BR> 
         錯(cuò)誤信息: <%= Err.Description %><BR>  
         出錯(cuò)文件: <%= Err.Source %><BR> 
         出錯(cuò)行: <%= Err.Line %><BR> 
  </FONT> 
  </BODY> 
  </HTML> 
<%End If%>

  上面的例子首先設(shè)置On Error Resume Next ,這樣出現(xiàn)錯(cuò)誤就不會(huì)影響程序的執(zhí)行。

  錯(cuò)誤處理和數(shù)據(jù)庫

  在錯(cuò)誤處理中加入數(shù)據(jù)庫的執(zhí)行是很復(fù)雜的。假若我們有一個(gè)程序,有很多的命令去向數(shù)據(jù)庫中添加記錄,如果insert/update在程序的最底部執(zhí)行,如果我們前面又錯(cuò)誤發(fā)生,那就完了!我們就會(huì)向數(shù)據(jù)庫中添加了一個(gè)錯(cuò)誤的信息。因?yàn)槲覀冇昧薕n Error Resume Next 一切的錯(cuò)誤都被忽略了!即使前面出錯(cuò),程序依舊會(huì)向數(shù)據(jù)庫中添加數(shù)據(jù)的。

      為避免這種情況,我們就先得做些手腳,正確處理的方法如下: 

If Err.Number = 0 And objConnection.Errors.Count = 0 Then 
'這里才能執(zhí)行語句,因?yàn)闆]有錯(cuò)誤 
Set rstResults = dbData.Execute(txtSql) 
End If   更多高級(jí)的處理辦法 

  當(dāng)一個(gè)錯(cuò)誤發(fā)生時(shí),你們也可以顯示更多的錯(cuò)誤信息。下面是同時(shí)處理數(shù)據(jù)庫和頁面錯(cuò)誤的例子,有了它我們一下就能發(fā)現(xiàn)我們程序中的所有錯(cuò)誤。

<%  
If Err.Number <> 0 Then 
    Response.Clear 
    Select Case Err.Number 
    Case 8  
        '指定錯(cuò)誤的Number 
        '在這里處理自定義錯(cuò)誤  
    Case Else 
        '一般錯(cuò)誤 
        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 
%>


  上面的例子讓我們一下了處理了很多在數(shù)據(jù)庫中出現(xiàn)的問題,這個(gè)在我們?nèi)粘>幊桃彩浅S玫模∥覀円矐?yīng)該看到那個(gè)Select Case 語句,它能讓我們來處理特定的錯(cuò)誤。

  Redirect 和錯(cuò)誤處理

  有一點(diǎn)我們就當(dāng)注意一下,就是我們常用到的redirect對(duì)象,如果一個(gè)頁面中出現(xiàn)了redirect對(duì)象,那么錯(cuò)誤處理就失去了意義。所以在轉(zhuǎn)向之前我們還得處理一下,如下: 

  If Err.Number = 0 And objConnection.Errors.Count = 0 Then 
  Response.Clear 
  Response.Redirect URL Here
  End If


  把代碼變得更整齊

  為了讓代碼變得更整齊,首先把錯(cuò)誤處理的文件放在一個(gè)包含文件中。這樣你就可以在任何文件中使用它。這樣修改也方便。

  在你程序的最上方加入(當(dāng)然在語言聲明之后)On Error Resume Next語句。

  在你執(zhí)行SQL以前進(jìn)行錯(cuò)誤檢查。 

  使用redirect以前也要進(jìn)行錯(cuò)誤處理。 

  讓你處理錯(cuò)誤的包含文件在代碼的最上面。

關(guān)鍵詞:ASP

贊助商鏈接: