7.2.4 客戶端腳本錯誤
       到目前為止，我們已了解了來自ASP的錯誤。然而ASP也經(jīng)常用于創(chuàng)建包含客戶端腳本的網(wǎng)頁。如果包含客戶端代碼的<SCRIPT>元素沒有被設(shè)置成RUNAT="SERVER"屬性，ASP將不考慮服務(wù)器，而把網(wǎng)頁信息不加改變地傳送到客戶端。
       因此，如果打開了一個ASP網(wǎng)頁，并且顯示的是一個瀏覽器錯誤對話框，就不應(yīng)該在服務(wù)器端尋找ASP程序代碼的錯誤。瀏覽器看不到ASP程序代碼，所以不能識別任何錯誤，如果有一個對話框出現(xiàn)在客戶端，那么在客戶端代碼中必定有一個錯誤。
1．  語法錯誤
如果在網(wǎng)頁中的客戶端程序代碼有語法錯誤的話，當腳本下載到客戶端，瀏覽器便會出現(xiàn)相應(yīng)的錯誤。盡管網(wǎng)頁中內(nèi)容仍可正常載入（除非由這些客戶端腳本代碼動態(tài)裝入），但網(wǎng)頁停止執(zhí)行。用戶將看到一個包含錯誤細節(jié)的對話框，或者是一個指示網(wǎng)頁包含錯誤的狀態(tài)條消息。
現(xiàn)代瀏覽器趨向于隱藏網(wǎng)頁腳本錯誤的細節(jié)，而僅在狀態(tài)條上顯示一個小的錯誤圖標。在IE 4.0和IE 5.0中，正常的錯誤對話框可以通過Internet Options對話框的Advanced頁進行設(shè)置來激活，如圖7-14所示：

圖7-14  Advanced頁面設(shè)置屏幕
處理腳本程序代碼中的客戶端錯誤和在服務(wù)器端相似，并且通常會更容易些，因為經(jīng)�？梢灾苯訌姆�務(wù)器目錄中通過雙擊來下載網(wǎng)頁。一般不需要通過Web服務(wù)器和HTTP獲得網(wǎng)頁來觀察瀏覽器中的結(jié)果，其中的唯一不同是一些服務(wù)器交互由客戶端腳本來完成，如使用RDS的數(shù)據(jù)綁定或者動態(tài)裝入。
2．  運行期或語義錯誤
在客戶端腳本中，通�？赡軙�遇到語法錯誤，也會經(jīng)常遇到運行期或語義錯誤。事實上，在客戶端，這種現(xiàn)象是很普遍的。因為在客戶端不能像服務(wù)器端那樣對腳本的環(huán)境進行控制，不能肯定用戶在他們的機器上正運行什么，實際上在服務(wù)器上僅能從一些組件如Browser Capabilities中得到大概情況。
所以，使用客戶端對象或特殊版本的腳本語言和屬性的腳本程序很可能不能正常工作。盡管如此，處理客戶端錯誤和處理服務(wù)器端錯誤是差不多的。
3．  在服務(wù)器上創(chuàng)建的客戶端程序代碼
在錯誤發(fā)生時，作為“客戶端對話框?qū)��?yīng)于ASP錯誤頁面”規(guī)則（關(guān)于出錯的地方）的一個特別的例外是，使用ASP程序代碼在服務(wù)器上動態(tài)地創(chuàng)建客戶端程序代碼。例如，可能想在ASP中進行求值運算，然后把數(shù)據(jù)傳給運行在客戶端的腳本代碼，可能最容易的方法是把數(shù)據(jù)作為一個變量插入腳本代碼中：
<%
' get the name of our server from the ServerVariables collection
strServerNameInASP = Request.ServerVariables("SERVER_NAME")
%>

<SCRIPT LANGUAGE="JScript" RUNAT="CLIENT">
<!-- hide code from older browsers
var strServerName = "<% = strServerNameInASP %>";
…
alert('Server name is: ' + strServerName);
…
// stop hiding code
-->
</SCRIPT>
在客戶端，在ASP處理這個頁面之后，將得到的是：
<SCRIPT LANGUAGE="JScript" RUNAT="CLIENT">
<!-- hide code from older browsers
var strServerName = "WROXBOX";
…
alert('Server name is: ' + strServerName);
…
// stop hiding code
-->
</SCRIPT>
可以忽略RUNAT="CLIENT"屬性，但是加上這一項可以使得在查看運行代碼的ASP網(wǎng)頁時更加清楚。
這樣，如果在某個位置想把服務(wù)器端數(shù)據(jù)庫中的數(shù)據(jù)加入到一個客戶端數(shù)組中，可以采用下面的程序?qū)崿F(xiàn)：
<SCRIPT LANGUAGE="JScript" RUNAT="CLIENT">
<!-- hide code from older browsers
var arrBooks = new Array(10)             //highest available index will be

<% ' start of ASP processing
intIndex = 0
Do While { not at the end of some recordset }
              strTitle = { get title from database record }
              Response.Write "arrBooks[" & CInt(intIndex) & "] = '" _
                                   & strTitle & "'; " & vbCrlf
              intIndex = intIndex +1
              { move to next record in database }
Loop
…
do something here on the client with the array of book titles
…
// stop hiding code
-->
</SCRIPT>
這段服務(wù)器端ASP程序代碼產(chǎn)生的客戶端代碼，在客戶端運行時創(chuàng)建書名標題數(shù)組。同時產(chǎn)生的客戶端腳本錯誤出現(xiàn)在瀏覽器的錯誤對話框中。錯誤的原因是以arrBooks命名的數(shù)組是由JavaScript代碼運行在客戶端時創(chuàng)建的，僅能接受9個書名；而服務(wù)器端代碼能很可能產(chǎn)生多于9個的書名，具體多少由源數(shù)據(jù)庫中的記錄數(shù)來決定。這相當于如下客戶端代碼：
<SCRIPT LANGUAGE="JScript" RUNAT="CLIENT">
<!-- hide code from older browsers
var arrBooks = new Array(10)             //highest available index will be
arrBooks[0] = 'Instant JavaScript';
arrBooks[1] = 'Professional ASP 3.0 Programming';
arrBooks[2] = 'ADO 2.5 Programmers Reference';
…
etc
…
arrBooks[9] = 'ASP Techniques for Webmasters';
arrBooks[10] = 'ASP Programmers Reference';          // <- client-side error occurs here
arrBooks[11] = 'ADSI CDO Programming';
arrBooks[12] = 'Professional MTS and MSMQ Programming';
…
do something here on the client with the array of book titles
…
// stop hiding code
-->
</SCRIPT>
這個頁面只有經(jīng)過修正之后才能正常工作，可以通過增加數(shù)組大小，也可以通過控制來自數(shù)據(jù)庫的記錄數(shù)使其正常工作。

7.3 防止錯誤
       上面已經(jīng)看到了能夠出現(xiàn)的一些不同類型的錯誤，并且有了一些查找錯誤的感覺。下面將考慮如何避免把錯誤引入程序中，盡管不能保證所編寫的程序沒有錯誤，但是這里概括的許多技術(shù)有助于減少錯誤數(shù)目。

良好的編程習慣
       在編程中避免出現(xiàn)錯誤是和良好的編程習慣相關(guān)的，這里有許多工作我們要做，以減少把錯誤帶進網(wǎng)頁的可能性�？赡苡行┤艘虿捎媚硞�技術(shù)而走向極端，甚至一定程度上在某個特殊問題上因書生氣十足而引入了更多的錯誤。當然編程人員也不可能采用了這里列出的所有技術(shù)。
       要考慮的主要內(nèi)容是：
       · 代碼的格式化和縮進編排。
       · 變量顯式表明。
       · 變量轉(zhuǎn)換為合適的數(shù)據(jù)類型。
       · 使用有意義的變量命名約定。
       · 封裝腳本。
       · 注意潛在的錯誤情況。
1．  代碼的格式化和縮進編排
許多VBScript編程員懶于格式化編排其書寫的程序。盡管這并不阻礙程序運行，但這使得查找何處產(chǎn)生了錯誤變得困難。例如，在前面我們看到的程序中，丟失了一個End If，由于嵌套結(jié)構(gòu)的縮進，錯誤在哪里是相當明顯的：
                            objCounters.Remove strCounterName
                     Response.Write "Removed counter " & strCounterName
              <--- missing 'End If' should be here
       End If
End If
%>
如果程序看起來像下面所示的那樣，尋找錯誤將不是一件易事：
<% 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
%>
2．  顯式表明變量
VBScript支持Option Explicit語句。在一個腳本頁面的開頭插入Option Explicit語句時，可以避免使用沒有用Dim命令（或用于動態(tài)數(shù)組的ReDim）定義的變量。似乎不需要這么做，因為腳本語言允許通過給一個變量賦值來創(chuàng)建一個需要的變量。然而用Option Explicit進行定義有助于避免錯誤，特別是那些難以發(fā)現(xiàn)的引起腳本產(chǎn)生不正確結(jié)果的邏輯錯誤。
例如，編寫如下程序：
<%
' get value for calculation
strSalesTotal = Request.Form("SalesTotal")
curSalesTotal = CCur(strSalesTotal)
sngCommissionPercent = 2.5

' calculate commission payment
sngCommission = curSalesTotal * (sngComissionPercent /100)
%>
運行這段程序不會產(chǎn)生錯誤（當然，除非用戶給銷售合計值賦了非法的值）。然而這段程序總是會產(chǎn)生0的結(jié)果，因為在程序的最后一行中sngCommissionPercent變量名拼寫錯了。腳本解釋器將產(chǎn)生一個新的變量名（叫作sngComissionPercent），由于沒有賦值，在數(shù)學計算時返回值總為0。
為了防止這種錯誤，僅需在程序開頭增加Option Explicit語句。
<%
Option Explicit
Dim strSalesTotal
Dim curSalesTotal
Dim sngCommissionPercent

' get value for calculation
strSalesTotal = Request.Form("SalesTotal")
curSalesTotal = CCur(strSalesTotal)
sngCommissionPercent = 2.5

' calculate commission payment
sngCommission = curSalesTotal * (sngComissionPercent /100)
%>
這時，當腳本引擎試圖解釋程序時將識別出一個語法錯誤，并且能夠指出此變量沒有聲明，如圖7-15所示：

圖7-15  顯示的錯誤信息
在JScript中引用一個沒有聲明的變量將返回一個“Undefined”信息，并且在試圖使用變量之前，能夠檢測到這種情況。
3．  變量轉(zhuǎn)換為合適的數(shù)據(jù)類型
回頭看看前面的程序，可能發(fā)現(xiàn)用CCur函數(shù)把用戶提供的數(shù)據(jù)轉(zhuǎn)換成了貨幣型數(shù)據(jù)類型。在VBScript中，有一系列類似這樣的數(shù)據(jù)變形變換函數(shù)，在第3章中有詳細的描述。
blnBoolean = Cbool(varVariant)     ' converts to a Variant of subtype Boolean
bytByte = Cbyte(varVariant)          ' converts to a Variant of subtype Byte
curCurrency = CCur(varVariant)   ' converts to a Variant of subtype Currency
datDate = CDate(varVariant)         ' converts to a Variant of subtype Date
dblDouble = CDbl(varVariant)       ' converts to a Variant of subtype Double
intInteger = CInt(varVariant)         ' converts to a Variant of subtype Integer
lngLong = CLng(varVariant)         ' converts to a Variant of subtype Long
sngSingle = CSng(varVariant)       ' converts to a Variant of subtype Single
strString = CStr(varVariant)          ' converts to a Variant of subtype String
如果不能完成變換，也就是說變量內(nèi)容對新數(shù)據(jù)類型來說是無效的，便會出現(xiàn)一個運行期錯誤。然而，如果對數(shù)值類型進行變換，我們希望這個數(shù)值是有效的，并且能在程序中使用。因此能夠檢測一個均衡的值對于防止錯誤的出現(xiàn)是一件“幸事”。
如果想把輸入空格作0對待，并且把任何其他無效的輸入作為用戶錯誤對待，前面程序變?yōu)椋?br>strSalesTotal = Request.Form("SalesTotal")
If Len(strSalesTotal) = 0 Then
       ' no value entered, so assume zero
       curSalesTotal = 0
ElseIf Not IsNumeric(strSalesTotal) Then
       ' not a valid number, so report an error and stop
       Response.Write "The value you entered is not a valid number. "
       Response.Flush
       Resonse.End
Else
       ' OK to conver the string value and use it
       curSalesTotal = CCur(strSalesTotal)
End If
在JScript中，所有的變量都是對象，并且有typeOf()方法�？梢允褂胻ypeOf()來確定存在變量中的數(shù)據(jù)是什么類型，見第3章中的詳細論述。
也可以對“null”（VBScript中為Null）進行測試保證在程序使用各種變量之前它們已經(jīng)賦了值。一個特例是從數(shù)據(jù)庫中獲得數(shù)據(jù)時，數(shù)據(jù)庫中的字段內(nèi)容經(jīng)常是Null，表示沒有數(shù)據(jù)。
4．  變量命名和編碼約定
閱讀過本章和前面幾章后，讀者可以看出我們對變量名使用三個字母的前綴，用以指明它所代表的數(shù)據(jù)類型。盡管在這兩種腳本語言中用ASP提供的所有變量都是Variant（或JScript中的等價物）類型的，但用變量名來區(qū)分出存儲在其中的數(shù)據(jù)的類型仍是非常有用的，有助于防止編寫程序時出錯。
有許多不同的變量命約定，經(jīng)常使用的見表7-2：
表7-2  變量類型及前綴
變量類型
前   綴

布爾型（Boolean）
bln

字節(jié)型（Byte）
byt

日期/時間型（Date/Time）
dat或dtm

集合型（Collection）
col

雙精度型（Double）
dbl

整型（Integer）
int

長整型（Long）
lng

對象型（Object）
obj

單精度型（Single）
sng

字符型（string）
str

對于一個包含函數(shù)和子程序的網(wǎng)頁，指出某個變量是否已經(jīng)聲明或存在于任何函數(shù)和子程序之外是非常有用的。若已經(jīng)聲明，則該變量對網(wǎng)頁來說是全局變量。對全局變量加上“g”前綴，所以一全局字符串變量可能被命名為gstrMystring；類似的，以“a”為前綴的變量是數(shù)組或數(shù)組元素。

程序注釋
       許多編程人員感覺到對程序增加注釋不僅增加了不必要的開發(fā)時間，而且也減緩了網(wǎng)頁的運行速度，因為腳本解釋器每次必須先讀整個程序，然后再跳過這些注釋。盡管這種觀點有一定的道理，但是一個月后再回過頭來想讀懂沒有注釋的程序，是非常困難的。
       至少應(yīng)該對常用函數(shù)和子程序進行注釋以便你和其他人能重新使用這些程序。特別是，使用新的Server.Execute方法更加容易（詳細情況參閱第4章）。下面是微軟提供的一個例程的注釋格式。
       '*****************************************************
       'Purpose: what the routine is designed to achieve
       'Inputs: a list of all the parameters to the routine
       '      parameter1: description, data-type, etc.
       '      parameter2: description, data-type, etc.
       'Returns: what data type is returned, and what it contains
       'Comments: other comments about the routine, update history, etc.
       '*****************************************************
5．  封裝腳本語言以便代碼重用
剛剛看到了如何注釋子程序和函數(shù)以便易于重新使用。面向?qū)ο缶幊痰脑�理是建立在程序代碼重用的基礎(chǔ)上的，并且SSI的#include和新的Server.Execute方法使調(diào)用存儲在程序庫中的函數(shù)更容易。
例如，如果有一系列函數(shù)用于計算稅收和商品的應(yīng)付費用。可把包含這段程序的頁面插入其他頁面中：
<!-- #inculde VIRTUAL="/library/code/online_sales/tax_and_delivery.inc" -->
包含文件必須含有腳本定界符，或者用<SCRIPT RUNAT="SERVER">...</SCRIPT>或者用<%...%>，每一個子程序和函數(shù)應(yīng)該采用其要求的數(shù)值做參數(shù)，并且用函數(shù)值或更新的參數(shù)返回結(jié)果。不能使用全局變量，況且不同網(wǎng)頁之間的全局變量也是不可用的。但在主網(wǎng)頁中的程序能安全地調(diào)用所需的函數(shù)和子程序。
另外可使用Server.Execute（或者Server.Transfer）把執(zhí)行轉(zhuǎn)到另一個網(wǎng)頁。如果有一段ASP代碼用來為客戶創(chuàng)建在線采購一覽表，這種方法是非常有用的。它包含HTML用來創(chuàng)建標題、表格，用代碼進行計算并用Request集合的內(nèi)容填寫相應(yīng)值（記住不能使用Server.Execute或Server.Transfer把腳本變量傳到另一個網(wǎng)頁）。另外，運行的網(wǎng)頁能夠支持函數(shù)、類定義（在VBScript中），或者其他設(shè)計為可重新使用的內(nèi)容。
6．  注意潛在的錯誤情況
編程時不管如何仔細，比如在使用和對變量類型轉(zhuǎn)換之前對變量值進行測試，但總還是有一些情況不能避免錯誤的出現(xiàn)。明顯的例子是：當使用FileSystemObject對象的方法設(shè)法訪問一個用戶指定的文件時，不能確定這個文件是否已移動、刪除或者標記成只讀型，所有這些操作都可能使程序不能工作。
其他類似的情況可能是，當訪問數(shù)據(jù)庫或其他數(shù)據(jù)存儲時，對用戶帳戶而言，有時要求某一層權(quán)限。在這種情況下，可能因為需要的訪問不能實現(xiàn)，使程序不能工作。
可以通過采取預(yù)防性措施編寫程序，來測試類似的潛在錯誤。例如，可以使用Tools組件或者FileSystemObject對象的FileExists方法來查看，是否一個文件在訪問之前就已存在了；或者使用Permission Checker組件來查看當前用戶帳號是否有訪問需要的文件或資源的權(quán)限；也可以通過使用FileSystemObject獲得一個文件的屬性設(shè)置，以便在刪除或重寫之前查看文件是否是只讀的。
如果不考慮可能發(fā)生的錯誤并防止錯誤發(fā)生的話，這些情況和許多類似的情況都可能是潛在的運行期錯誤源。
7．  最后的測試
很明顯，測試是對錯誤的最好防范方法。錯誤能通過應(yīng)用程序影響到其他操作，如果不及時發(fā)現(xiàn)能引起不可估量的損失。用各種數(shù)值（如用戶提交的，或者訪問一個數(shù)據(jù)庫得到的數(shù)據(jù)）對網(wǎng)頁進行測試。同時，更重要的是，如果采用我們不希望的值會發(fā)生什么。程序能避免這些情況產(chǎn)生其他錯誤或者避免擾亂正在測試的子程序嗎？
好的測試技術(shù)應(yīng)該包括一系列值，如期望的值、邊界條件值和超出邊界的值。用期望傳送到網(wǎng)頁的值進行測試是應(yīng)該經(jīng)常做的工作，同樣超出邊界的值通常比較容易阻止。例如，可以限制可接受的數(shù)值范圍為-100~+100，程序如下：
If (intValue < -100) or (intValue > 100) Then
       ' not a valid value, so report an error and stop
       Response.Write "Value must be between –100 and +100 inclusive. "
       Response.Flush
       Response.End
End If
然而要記住查看邊界條件，上面的程序能處理-100和+100嗎？想把數(shù)據(jù)限制在-100~+100中嗎？取0時會發(fā)生什么？上面的程序會顯示“Divide By Zero”錯誤而最終停止執(zhí)行嗎？

7.4 處理錯誤
       即使采用了防御性編程技術(shù)之后，錯誤仍能進入到網(wǎng)頁，這可能是因為測試并不充分，或者是因為所依靠的一些其他資源或服務(wù)沒有正確工作。為了防止頁面出現(xiàn)問題，在程序中要能夠進行定制錯誤處理。

7.4.1 ASP缺省錯誤處理器
       前面已經(jīng)看到過，ASP和IIS能找出網(wǎng)頁中的大多數(shù)錯誤，并且能自動生成錯誤信息頁，這些錯誤幾乎總是500.100類型的，并且IIS用Server.Transfer方法裝載以500-100.asp命名的缺省錯誤頁，然后傳送給客戶。第4章介紹了這一工作過程，以及如何與定制錯誤網(wǎng)頁接口。
       然而，運行期腳本錯誤不總是由IIS發(fā)現(xiàn)的，當一個運行期錯誤發(fā)生時，腳本引擎會查看一下目前執(zhí)行點或語句的環(huán)境。如果正在執(zhí)行一個子程序或函數(shù)，缺省的腳本引擎錯誤處理器通過終止子程序的運行并返回調(diào)用子程序的地方來指出錯誤。
       在這里，程序會查看是否實現(xiàn)了其他的錯誤處理器，如果沒有的話，又會重復(fù)這個過程，然后返回到調(diào)用子程序的地方。當子程序返回到網(wǎng)頁的主程序（在任何其他子程序或函數(shù)外面）時，程序又查看是否實現(xiàn)了任何其他的錯誤處理器。在這個過程中，只有確實沒有發(fā)現(xiàn)其他的錯誤處理器，程序才給ASP提示錯誤，指示IIS把執(zhí)行轉(zhuǎn)到缺省的錯誤頁面。