第7章          
調試和錯誤處理
前面已經介紹了使用ASP所需要的基本技能，本章要討論的另外一個問題是當ASP出現錯誤時怎么辦，ASP出錯時是什么情況。當精心編排的ASP頁面出現問題停止了執行時，用戶一般得到的僅是一些用處不大的建議，諸如：點擊“刷新”按鈕，或者“與站點的Web管理員聯系，告訴他們你的頁面不能正常工作了”等等。
本章除了提供有用的信息外，還想提供一個幫助區域。我們將詳細介紹在腳本和頁面中錯誤如何出現，可能產生的錯誤類型，以及什么造成了這些錯誤。更重要的是，要討論如何盡可能避免錯誤的發生，如不能避免又如何妥善處理。
因此，本章將要探討頁面調試技術，也就是如何花費不多的精力和時間就能找到錯誤并解決問題。
本章包括以下內容：
· 能夠出現的錯誤類型。
· 如何防止各種錯誤的產生。
· 如果不能防止錯誤發生，如何妥善處理這些錯誤。
· 如何發現和處理腳本錯誤及其他類型的錯誤。
· 如何使用定制的錯誤頁面得到錯誤信息。
· 如何記錄發生的錯誤以監視我們的網站。
· 創建一個定制錯誤網頁和一個錯誤日志文件。
· 提供相關的在線幫助。
本章不涉及如何處理使用ActiveX Data Objects（ADO）訪問數據源時出現的各種特殊類型的錯誤。像許多組件一樣，ADO提供了自己的錯誤處理系統，第8章將深入討論這一點。本章將從討論能出現的各種錯誤類型開始，使我們能夠認識這些錯誤并采取相應的措施。
據說，在非洲最黑暗的雨林深處，有這樣一群程序員，他們的程序代碼從來沒有出現過錯誤。但是，很遺憾他們從沒有享受過調試一段不能正常工作的應用程序的樂趣。調試程序代碼是一個真正充滿快樂的工作，所以我們要面對這個問題，在調試程序的過程中檢驗我們的觀察力和橫向思維能力。大多數“真實世界”的程序員能夠體驗這些樂趣是一件好事。
當然，有些人會說，調試程序與其說是判斷，不如說是碰運氣。花費了許多時間去調試一段有錯誤的程序，在某種程度上可以說確實是依賴運氣。但是，如果第一步從合適的地方開始查看，可能會更快地解決問題。
但這不是程序調試應采取的辦法。從理論上講，當某段程序運行失敗時，應該以邏輯或順序方式跟蹤錯誤。作為一個聰明和有經驗的程序員，這才是調試時常用的方法，只有業余人員才隨意改變程序中變量的值，到處添加Response.Write語句進行調試。
然而，為了能夠在邏輯上跟蹤程序中的錯誤，必須了解有關錯誤如何出現方面的基礎知識，更重要的是知道錯誤出現在哪里，以便很快就能找到相應的地方。本章討論的內容是有關程序中能夠出現的不同種類的錯誤，錯誤的不同表現，以及如何記錄和排除這些錯誤。同樣重要的是，還將介紹如何避免這些錯誤的發生。
本章將從介紹可能出現的不同種類的錯誤開始，如果認為你的代碼不會出現任何錯誤，可以直接跳到下一章。

7.1 錯誤的種類

7.1.1 語法或“編譯”錯誤
       當我們第一次運行新編寫的程序代碼時，通常看到的第一種錯誤類型是“syntax error”。這就是所說的，程序代碼上的語法錯誤。這就像在寫作中使用了錯誤的語法，使讀者不能了解其中的含義。而解釋器（諸如腳本引擎）和編譯器對語法要求得更加嚴格和準確。
       語法錯誤通常也是最早出現和需要排除的。大多數情況下，解釋器和編譯器會指出行號和所在行中的字符位置，以及在相應的位置上缺少的內容。下面舉一個簡單的例子，如下所示的這樣一段程序：
       <%
       Response.Write "The repayments for your loan are $" & chrPayment _
                            & " per " & strInterval & , due on the " &strDay & " of each "
                            & strInterval & "."
       %>
       我們希望得到下面的結果：
       The repayments for your loan are $124.50 per month, due on the 12th of each month.
       實際上得到的結果如圖7-1所示：

圖7-1  程序執行結果1
       豆豆注：
              如果你的錯誤提示信息無法出現“語法錯誤”，請將你的WINNT\Help\iisHelp\common\500-100.asp做如下改變（加了兩行黑體字）：
  ...
  Dim bakCodepage
  bakCodepage = Session.Codepage
  Session.Codepage = 936
  Response.Write Server.HTMLEncode(objASPError.Category)
  If objASPError.ASPCode > "" Then Response.Write Server.HTMLEncode(", " & objASPError.ASPCode)
  Response.Write Server.HTMLEncode(" (0x" & Hex(objASPError.Number) & ")" ) & "<br>"

  If objASPError.ASPDescription > "" Then Response.Write Server.HTMLEncode(objASPError.ASPDescription) & "<br>"

  blnErrorWritten = False
  
  Response.Write "<B>"
  
  If objASPError.Description > "" Then Response.Write Server.HTMLEncode(objASPError.Description) & "<br>"

  ' Only show the Source if it is available and the request is from the same machine as IIS
  …
       文件中第3行是Response.Write語句的第2行。報告錯誤信息時，VBScript解釋器忽略一行中的引導空格和制表符。所以在數完26個字符之后，可以找到語法錯誤的地方，這里明顯缺少了一個雙引號。加上雙引號后再運行這個頁面，我們可以得到如圖7-2所示：

圖7-2  程序執行結果2
       這次又是另外一個簡單錯誤。實際上錯誤出現在第3行而不是第4行。我們漏掉了第三行末尾的續行符'_'。程序代碼應該是：
<%
       Response.Write "The repayments for your loan are $" & chrPayment _
                            & " per " & strInterval & ", due on the " &strDay & " of each " _
                            & strInterval & "."
       %>
1．  錯誤出現在什么地方
需要注意的是腳本解釋器僅指出所發現錯誤的地方，但實際上那兒并不一定是錯誤真正出現的地方。在上例中，前面三行的語法正確的；并產生相應的輸出結果，而恰恰是第4行引起問題，因為這一行是以一種非法字符開頭的，腳本解釋器沒有意識到這一行是上一行的一部分。
這樣的錯誤是普遍存在的，因為通常我們主要考慮的是要輸出的文本內容，而不是雙引號、連字符（在VBScript中為“&”）、續行符等的正確順序。
對于關鍵字、內部函數名拼寫錯誤或函數的非法參數列表而引起的語法錯誤，通常比較容易發現，因為錯誤信息提示可能就指出了錯誤的實際位置。例如：下面這段代碼是想把明天的日期寫入頁面。
Response.Write DateAdd(Now(),"d", 1)
實際得到的結果如圖7-3所示：

圖7-3  程序執行結果3
這是因為DateAdd函數的語法應該是：
DateAdd (interval_string, interval_number, start_date)
所以應該改寫為如下的代碼：
Response.Write DateAdd("d", 1, Now())
腳本解釋器檢測到了我們為第二個參數提供的是一個字符型數據，而DateAdd函數需要的是整型數據類型。
代碼結構和腳本結構
語法錯誤的另一個原因是：當制作網頁時使用嵌套的或復雜的腳本結構，如If Then … Else … End If或者Do While … Loop。這有時會造成難以找到的語法錯誤。
例如下面這段程序：
<%
If Len(Request.Form("cmdSet")) Then
       strCounterName = Request.Form("lstSet")
       strNewValue = Request.Form("txtSet")
       If IsNumeric(strNewValue) Then
              intNewValue = Cint(strNewValue)
              objCounters.Set strCounterName, intNewValue
              Response.Write "Set counter " & strCounterName & " to " & strNewValue
       Else
              Response.Write strNewValue & " is not a valid number"
              If Len(Request.Form("cmdRemove")) Then
                     strCounterName = Request.Form("lstRemove")
                     objCounters.Remove strCounterName
                     Response.Write "Removed counter " & strCounterName
       End If
End If
%>
產生的錯誤如圖7-4所示：

圖7-4  程序執行結果4
為什么提示在網頁程序中需要一個End語句呢？看一下程序就可以發現，丟失了一個End If，而不是End，在程序的最末尾應該還有另一個End If。
                     …
                     Response.Write "Removed counter " & strCounterName
       End If
End If
       End If
       %>
       在這種情況下，根據代碼的縮排格式可以很容易地找到相應的錯誤。特別當錯誤信息指出錯誤的大致位置時，很快就可以找到錯誤位置。然而，這段代碼很短，如果在分界符<%…%>中另外還有40行代碼，那么錯誤行號仍然可能指向最后一行（line 56）；并且如果在新的代碼中的其他腳本結構搞亂了嵌套的結構，錯誤可能會指向另一個位置。
2．  關于JScript
如果你不是一位JavaScript高手，并且確實想試驗一些語法錯誤，那么就從VBScript切換到JScript。JScript比VBScript對程序編寫的要求更嚴格，并且對關鍵字和變量名大小寫敏感，看下面的程序段。
<%
var datToday = new Date();
Response.Write(datToday.GetMonth());
%>
運行這段程序會產生“Object doesn’t support this property or method”（對象不支持這種屬性或方法）錯誤，如圖7-5所示：

圖7-5  程序執行結果5
原因很簡單，返回月份數的JScript函數是getMonth，而不是GetMonth。下面這段程序就可以正常運行。
<%
var datToday = new Date();
Response.Write(datToday.getMonth());
%>
當然，如果重試這段程序，可能得不到同樣的錯誤消息。我們第一次運行這段程序時，得到如圖7-6所示的錯誤。

圖7-6  程序執行結果6
第2行有什么錯誤？如果使用JScript解釋器，沒有錯誤出現。錯誤消息說明，這是一個VBScript語法錯誤。用VBScript解釋器分析JScript程序，所以會得到奇怪的錯誤消息。
記住正在使用語言
這所以出現上述錯誤是因為在頁面的代碼前面忘記加@LANGUAGE指令。缺省是VBScript（如果在注冊表或在Internet Services Manager中沒有改變它），所以VBScript引擎用于處理前面不帶@LANGUAGE指令的程序。即使一直使用專為自己的服務器設置的缺省語言，始終使用@LANGUAGE指令是避免產生上述錯誤的好方法。這樣，如果把網頁移到另一個缺省語言不同的服務器上，也會得到預期的結果。
這里講述的內容不可能覆蓋所有可能遇到的語法錯誤，人們往住想知道為什么會出現錯誤，而錯誤信息提示并不總是像人們希望的那樣準確。理想的方式應該是ASP給我們提供一個簡潔的錯誤顯示頁面，有對錯誤的全面精確的描述，甚至詢問我們是否想自動處理錯誤。事實上應用程序Microsoft Script Debugger正試圖為我們提供類似的功能，本章后面要對其進行討論，也要概括避免出現語法錯誤的一些要點。現在，我們繼續研究經常在網頁中出現的第二類錯誤。