<form id="hz9zz"></form>
  • <form id="hz9zz"></form>

      <nobr id="hz9zz"></nobr>

      <form id="hz9zz"></form>

    1. 明輝手游網中心:是一個免費提供流行視頻軟件教程、在線學習分享的學習平臺!

      ASP的出錯處理

      [摘要]簡單介紹ASP是非常簡單的,以至于許多的開發者不會去思考錯誤處理。錯誤處理能夠讓你的應用程序更加合理。我看到過很多個用ASP編寫的商業網站,大多數都忽略了錯誤處理。 錯誤的類型有三種主要的錯誤類型:...

      簡單介紹
      ASP是非常簡單的,以至于許多的開發者不會去思考錯誤處理。錯誤處理能夠讓你的應用程序更加合理。我看到過很多個用ASP編寫的商業網站,大多數都忽略了錯誤處理。 錯誤的類型
      有三種主要的錯誤類型:
      1.編譯錯誤:
      這種錯誤出現一般都是代碼的語法問題。因為編譯錯誤而導致辭ASP停止運行。
      2.運行錯誤:
      這個錯誤是發生在你準備運行ASP時的。例如:如果你試圖給一個變量賦值,但是卻超出了該變量允許的范圍。 
      3.邏輯錯誤:
      邏輯錯誤是最難被發現的,這種錯誤經常是一種結構錯誤,電腦是發現不了的。這就需要我們徹頭徹尾地檢查我們的代碼。
      因為編譯錯誤一般是和邏輯錯誤一起發生的,一般都能顯示出來,所以我們擔心的就只是運行錯誤。它都終止ASP的運行,而且給用戶丟下一堆很不友好的文字。 那么我們要怎樣處理運行錯誤呢?
      我們先來看看,ASP唯一提供給我們的錯誤命令---On Error Resume Next(這里提醒一下初學者,在ASP中只有On Error Resume Next語句,沒有On Error Resume Goto語句) 如果你不使用On Error Resume Next語句的話,一切運行錯誤都會發生,這個是致命的,那么就會有一段錯誤代碼“展現”給用戶,而且ASP程序也會停止。 下面就是一個錯誤代碼:
       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語句時,所有的錯誤都會被忽略,程序會自動執行下一條語句。這樣程序就會完全執行,出錯后用戶也不會看到出錯信息。但是這樣也有 不好的地方,那就是如果程序沒有按照你想像的執行的話,你就很難找到到底是哪里出了問題,所以你就得在必要的地方對錯誤進行處理。
      處理錯誤
      在ASP中,處理錯誤的最好的辦法就是在程序最底端放上代碼來處理錯誤。我也推薦在每個ASP程序都使用緩沖區。這樣的話,如果錯誤發生,頁面就會停止, 頁面內容也會被清除,這樣用戶就不會看到錯誤信息,對你們的抱怨也就少了!下面是一個例子: 
      <%@ LANGUAGE="VBScript" %> 
      <%Response.Buffer = True 
      "設置buffer為True
      On Error Resume Next
      "開始錯誤處理  
      %>
      <%"錯誤處理 
      If Err.Number <> 0 Then 
      "清除頁面 
      Response.Clear 
      "顯示錯誤信息給用戶 
      %> 
      <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 ,這樣出現錯誤就不會影響程序的執行。
      錯誤處理和數據庫
      在錯誤處理中加入數據庫的執行是很復雜的。假若我們有一個程序,有很多的命令去向數據庫中添加記錄,如果insert/update在程序的最底部執行,如果我們前面又錯誤發生,那就完了!我們就會向數據庫中添加了一個錯誤的信息。因為我們用了On Error Resume Next 一切的錯誤都被忽略了!即使前面出錯,程序依舊會向數據庫中添加數據的。
      為避免這種情況,我們就先得做些手腳,正確處理的方法如下: 
      If Err.Number = 0 And objConnection.Errors.Count = 0 Then 
      "這里才能執行語句,因為沒有錯誤 
      Set rstResults = dbData.Execute(txtSql) 
      End If 
      更多高級的處理辦法
      當一個錯誤發生時,你們也可以顯示更多的錯誤信息。下面是同時處理數據庫和頁面錯誤的例子,有了它我們一下就能發現我們程序中的所有錯誤。 (由于有些地方我覺得英文更能說時問題,所以沒有翻譯)。 
      <% 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 %> 
      上面的例子讓我們一下了處理了很多在數據庫中出現的問題,這個在我們日常編程也是常用的!我們也應該看到那個Select Case 語句,它能讓我們來處理特定的錯誤。
      Redirect 和錯誤處理
      有一點我們就當注意一下,就是我們常用到的redirect對象,如果一個頁面中出現了redirect對象,那么錯誤處理就失去了意義。所以在轉向之前我們還得處理一下,如下: 
      If Err.Number = 0 And objConnection.Errors.Count = 0 Then 
      Response.Clear 
      Response.Redirect ?lt;URL Here>? 
      End If 
      把代碼變得更整齊
      為了讓代碼變得更整齊,首先把錯誤處理的文件放在一個包含文件中。這樣你就可以在任何文件中使用它。這樣修改也方便。在你程序的最上方加入(當然在語言聲明之后)On Error Resume Next語句。在你執行SQL以前進行錯誤檢查。使用redirect以前也要進行錯誤處理。
      讓你處理錯誤的包含文件在代碼的最上面
      我希望這篇文章對你們有所用,因為我在我們的論壇中已經發現有人在問這個問題了!也許我編譯出這篇文章能對你們起些作用。 
      簡單介紹
      ASP是非常簡單的,以至于許多的開發者不會去思考錯誤處理。錯誤處理能夠讓你的應用程序更加合理。我看到過很多個用ASP編寫的商業網站,大多數都忽略了錯誤處理。 錯誤的類型
      有三種主要的錯誤類型:
      1.編譯錯誤:
      這種錯誤出現一般都是代碼的語法問題。因為編譯錯誤而導致辭ASP停止運行。
      2.運行錯誤:
      這個錯誤是發生在你準備運行ASP時的。例如:如果你試圖給一個變量賦值,但是卻超出了該變量允許的范圍。 
      3.邏輯錯誤:
      邏輯錯誤是最難被發現的,這種錯誤經常是一種結構錯誤,電腦是發現不了的。這就需要我們徹頭徹尾地檢查我們的代碼。
      因為編譯錯誤一般是和邏輯錯誤一起發生的,一般都能顯示出來,所以我們擔心的就只是運行錯誤。它都終止ASP的運行,而且給用戶丟下一堆很不友好的文字。 那么我們要怎樣處理運行錯誤呢?
      我們先來看看,ASP唯一提供給我們的錯誤命令---On Error Resume Next(這里提醒一下初學者,在ASP中只有On Error Resume Next語句,沒有On Error Resume Goto語句) 如果你不使用On Error Resume Next語句的話,一切運行錯誤都會發生,這個是致命的,那么就會有一段錯誤代碼“展現”給用戶,而且ASP程序也會停止。 下面就是一個錯誤代碼:
       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語句時,所有的錯誤都會被忽略,程序會自動執行下一條語句。這樣程序就會完全執行,出錯后用戶也不會看到出錯信息。但是這樣也有 不好的地方,那就是如果程序沒有按照你想像的執行的話,你就很難找到到底是哪里出了問題,所以你就得在必要的地方對錯誤進行處理。
      處理錯誤
      在ASP中,處理錯誤的最好的辦法就是在程序最底端放上代碼來處理錯誤。我也推薦在每個ASP程序都使用緩沖區。這樣的話,如果錯誤發生,頁面就會停止, 頁面內容也會被清除,這樣用戶就不會看到錯誤信息,對你們的抱怨也就少了!下面是一個例子: 
      <%@ LANGUAGE="VBScript" %> 
      <%Response.Buffer = True 
      "設置buffer為True
      On Error Resume Next
      "開始錯誤處理  
      %>
      <%"錯誤處理 
      If Err.Number <> 0 Then 
      "清除頁面 
      Response.Clear 
      "顯示錯誤信息給用戶 
      %> 
      <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 ,這樣出現錯誤就不會影響程序的執行。
      錯誤處理和數據庫
      在錯誤處理中加入數據庫的執行是很復雜的。假若我們有一個程序,有很多的命令去向數據庫中添加記錄,如果insert/update在程序的最底部執行,如果我們前面又錯誤發生,那就完了!我們就會向數據庫中添加了一個錯誤的信息。因為我們用了On Error Resume Next 一切的錯誤都被忽略了!即使前面出錯,程序依舊會向數據庫中添加數據的。
      為避免這種情況,我們就先得做些手腳,正確處理的方法如下: 
      If Err.Number = 0 And objConnection.Errors.Count = 0 Then 
      "這里才能執行語句,因為沒有錯誤 
      Set rstResults = dbData.Execute(txtSql) 
      End If 
      更多高級的處理辦法
      當一個錯誤發生時,你們也可以顯示更多的錯誤信息。下面是同時處理數據庫和頁面錯誤的例子,有了它我們一下就能發現我們程序中的所有錯誤。 (由于有些地方我覺得英文更能說時問題,所以沒有翻譯)。 
      <% 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 %> 
      上面的例子讓我們一下了處理了很多在數據庫中出現的問題,這個在我們日常編程也是常用的!我們也應該看到那個Select Case 語句,它能讓我們來處理特定的錯誤。
      Redirect 和錯誤處理
      有一點我們就當注意一下,就是我們常用到的redirect對象,如果一個頁面中出現了redirect對象,那么錯誤處理就失去了意義。所以在轉向之前我們還得處理一下,如下: 
      If Err.Number = 0 And objConnection.Errors.Count = 0 Then 
      Response.Clear 
      Response.Redirect ?lt;URL Here>? 
      End If 
      把代碼變得更整齊
      為了讓代碼變得更整齊,首先把錯誤處理的文件放在一個包含文件中。這樣你就可以在任何文件中使用它。這樣修改也方便。在你程序的最上方加入(當然在語言聲明之后)On Error Resume Next語句。在你執行SQL以前進行錯誤檢查。使用redirect以前也要進行錯誤處理。
      讓你處理錯誤的包含文件在代碼的最上面
      我希望這篇文章對你們有所用,因為我在我們的論壇中已經發現有人在問這個問題了!也許我編譯出這篇文章能對你們起些作用。 
      簡單介紹
      ASP是非常簡單的,以至于許多的開發者不會去思考錯誤處理。錯誤處理能夠讓你的應用程序更加合理。我看到過很多個用ASP編寫的商業網站,大多數都忽略了錯誤處理。 錯誤的類型
      有三種主要的錯誤類型:
      1.編譯錯誤:
      這種錯誤出現一般都是代碼的語法問題。因為編譯錯誤而導致辭ASP停止運行。
      2.運行錯誤:
      這個錯誤是發生在你準備運行ASP時的。例如:如果你試圖給一個變量賦值,但是卻超出了該變量允許的范圍。 
      3.邏輯錯誤:
      邏輯錯誤是最難被發現的,這種錯誤經常是一種結構錯誤,電腦是發現不了的。這就需要我們徹頭徹尾地檢查我們的代碼。
      因為編譯錯誤一般是和邏輯錯誤一起發生的,一般都能顯示出來,所以我們擔心的就只是運行錯誤。它都終止ASP的運行,而且給用戶丟下一堆很不友好的文字。 那么我們要怎樣處理運行錯誤呢?
      我們先來看看,ASP唯一提供給我們的錯誤命令---On Error Resume Next(這里提醒一下初學者,在ASP中只有On Error Resume Next語句,沒有On Error Resume Goto語句) 如果你不使用On Error Resume Next語句的話,一切運行錯誤都會發生,這個是致命的,那么就會有一段錯誤代碼“展現”給用戶,而且ASP程序也會停止。 下面就是一個錯誤代碼:
       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語句時,所有的錯誤都會被忽略,程序會自動執行下一條語句。這樣程序就會完全執行,出錯后用戶也不會看到出錯信息。但是這樣也有 不好的地方,那就是如果程序沒有按照你想像的執行的話,你就很難找到到底是哪里出了問題,所以你就得在必要的地方對錯誤進行處理。
      處理錯誤
      在ASP中,處理錯誤的最好的辦法就是在程序最底端放上代碼來處理錯誤。我也推薦在每個ASP程序都使用緩沖區。這樣的話,如果錯誤發生,頁面就會停止, 頁面內容也會被清除,這樣用戶就不會看到錯誤信息,對你們的抱怨也就少了!下面是一個例子: 
      <%@ LANGUAGE="VBScript" %> 
      <%Response.Buffer = True 
      "設置buffer為True
      On Error Resume Next
      "開始錯誤處理  
      %>
      <%"錯誤處理 
      If Err.Number <> 0 Then 
      "清除頁面 
      Response.Clear 
      "顯示錯誤信息給用戶 
      %> 
      <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 ,這樣出現錯誤就不會影響程序的執行。
      錯誤處理和數據庫
      在錯誤處理中加入數據庫的執行是很復雜的。假若我們有一個程序,有很多的命令去向數據庫中添加記錄,如果insert/update在程序的最底部執行,如果我們前面又錯誤發生,那就完了!我們就會向數據庫中添加了一個錯誤的信息。因為我們用了On Error Resume Next 一切的錯誤都被忽略了!即使前面出錯,程序依舊會向數據庫中添加數據的。
      為避免這種情況,我們就先得做些手腳,正確處理的方法如下: 
      If Err.Number = 0 And objConnection.Errors.Count = 0 Then 
      "這里才能執行語句,因為沒有錯誤 
      Set rstResults = dbData.Execute(txtSql) 
      End If 
      更多高級的處理辦法
      當一個錯誤發生時,你們也可以顯示更多的錯誤信息。下面是同時處理數據庫和頁面錯誤的例子,有了它我們一下就能發現我們程序中的所有錯誤。 (由于有些地方我覺得英文更能說時問題,所以沒有翻譯)。 
      <% 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 %> 
      上面的例子讓我們一下了處理了很多在數據庫中出現的問題,這個在我們日常編程也是常用的!我們也應該看到那個Select Case 語句,它能讓我們來處理特定的錯誤。
      Redirect 和錯誤處理
      有一點我們就當注意一下,就是我們常用到的redirect對象,如果一個頁面中出現了redirect對象,那么錯誤處理就失去了意義。所以在轉向之前我們還得處理一下,如下: 
      If Err.Number = 0 And objConnection.Errors.Count = 0 Then 
      Response.Clear 
      Response.Redirect ?lt;URL Here>? 
      End If 
      把代碼變得更整齊
      為了讓代碼變得更整齊,首先把錯誤處理的文件放在一個包含文件中。這樣你就可以在任何文件中使用它。這樣修改也方便。在你程序的最上方加入(當然在語言聲明之后)On Error Resume Next語句。在你執行SQL以前進行錯誤檢查。使用redirect以前也要進行錯誤處理。
      讓你處理錯誤的包含文件在代碼的最上面
      我希望這篇文章對你們有所用,因為我在我們的論壇中已經發現有人在問這個問題了!也許我編譯出這篇文章能對你們起些作用。


      日韩精品一区二区三区高清