在ASP中，對VBScript提供了強(qiáng)勁的支持，能夠無縫集成VBScript的函數(shù)、方法，這樣給擴(kuò)展ASP的現(xiàn)有功能提供了很大便利。由于ASP中已經(jīng)模糊了變量類型的概念，所以，在進(jìn)行ASP與VBScript交互的過程中，很多程序員也慣于不聲明VBScript的變量，這樣加重了服務(wù)器的解析負(fù)擔(dān)，進(jìn)而影響服務(wù)器的響應(yīng)請求速度。 鑒于此，我們可以象在VB中強(qiáng)制用戶進(jìn)行變量聲明一樣在VBScript中強(qiáng)制用戶進(jìn)行變量聲明。實(shí)現(xiàn)方法是： 在ASP程序行首放置% option explicit%>。 2.對URL地址進(jìn)行編碼 在我們使用ASP動態(tài)生成一個帶參數(shù)URL地址并進(jìn)行跳轉(zhuǎn)時，在IE中解析很正常，但在NetScrape瀏覽時卻有錯誤如下： HTTP Error 400 400 Bad Request Due to malformed syntax, the request could not be understood by the server. The client should not repeat the request without modifications. 解決方法是對生成的URL參數(shù)使用ASP內(nèi)置server對象的URLencode方法進(jìn)行URL編碼，例子如下： % URL="xur.asp" var1="username=" server.URLencode("xur") var2="company=" server.URLencode("xurstudio") var3="phone=" server.URLencode("021-53854336-186") response.redirect URL "?" var1 var2 var3 %> 3.清空對象 當(dāng)使用完對象后，首先使用Close方法來釋放對象所占用的系統(tǒng)資源；然后設(shè)置對象值為“nothing”釋放對象占用內(nèi)存。下面的代碼使用數(shù)據(jù)庫內(nèi)容建立一個下拉列表。代碼示例如下： % myDSN="DSN=xur;uid=xur;pwd=xur" mySQL="select * from authors where AU_ID100" set conntemp=server.createobject("adodb.connection") conntemp.open myDSN set rstemp=conntemp.execute(mySQL) if rstemp.eof then response.write "數(shù)據(jù)庫為空" response.write mySQL conntemp.close set conntemp=nothing response.end end if%> %do until rstemp.eof %> % rstemp.movenext loop rstemp.close set rstemp=nothing conntemp.close set conntemp=nothing %> 4.使用字符串建立SQL查詢 使用字符串來建立查詢并不能加快服務(wù)器的解析速度，相反，它還會增加服務(wù)器的解析時間。但在這里仍然推薦使用字符串代替簡單的查詢語句來進(jìn)行查詢。這樣做的好處是，可以迅速發(fā)現(xiàn)程序問題所在，從而便利高效地生成程序。示例如下： %mySQL= ""select * " mySQL= mySQL "from publishers" mySQL= mySQL "where state='NY'" response.write mySQL set rstemp=conntemp.execute(mySQL) rstemp.close set rstemp=nothing %> 5.使用case進(jìn)行條件選擇 在進(jìn)行條件選擇的時候，盡量使用case語句，避免使用if語句。使用case語句，可以使程序流程化，執(zhí)行起來也比if語句來的快。示例如下： % FOR i = 1 TO 1000 n = i Response.Write AddSuffix(n) "br>" NEXT %> % Function AddSuffix(num) numpart = RIGHT(num,1) SELECT CASE numpart CASE "1" IF InStr(num,"11") THEN num = num "th" ELSE num = num "st" END IF CASE "2" IF InStr(num,"12") THEN num = num "th" ELSE num = num "nd" END IF CASE "3" IF InStr(num,"13") THEN num = num "th" ELSE num = num "rd" END IF CASE "4" num = num "th" CASE ELSE num = num "th" END SELECT AddSuffix = num END FUNCTION %> 6.使用adovbs.inc文件中定義的常量打開記錄集 打開記錄集時，可以定義記錄集打開的游標(biāo)類型和鎖定類型。在adovbs.inc文件中定義了一些常量來定義這些類型。adovbs.inc文件保存在\inetpub\iissamples\IISamples目錄下面。下面列舉幾個常用的游標(biāo)類型和鎖定類型。 游標(biāo)類型：adOpenFowardOnly游標(biāo)只能向前；adOpenKeyset游標(biāo)可向前或者向后，如一用戶添加記錄，新記錄不會出現(xiàn)在記錄集中；adOpenDynamic游標(biāo)動態(tài)隨意；adOpenStatic記錄集不對其他用戶造成的記錄修改有所反映。 鎖定類型：adLockReadOney不能修改記錄集中的記錄；adLockPessimistic在編輯一條記錄時鎖定它；adLockOptimstic調(diào)用記錄集Update方法時才鎖定記錄；adLockBatchOpeimstic記錄只能成批更新。 !--#INCLUDE VIRTUAL="/ADOVBS.INC" --> % connectme="DSN=xur;uid=xur;pwd=xur" sqltemp="select * from publishers where name='xur'" set rstemp=Server.CreateObject("adodb.Recordset") rstemp.open sqltemp, connectme, adOpenStatic，adLockOptimstic response.write rstemp.recordcount " records inbr>" sqltemp rstemp.close set rstemp=nothing %> 7.避免在使用global.asa文件中進(jìn)行對象定義 由于global.asa文件中的內(nèi)容可以為站點(diǎn)內(nèi)所有文件引用，無疑，在global.asa文件中進(jìn)行對象定義可以省去很多重復(fù)工作。比如在global.asa中的application_onstart函數(shù)中進(jìn)行如下定義： %SUB application_onstart set application("theCONN")=server.createobject("adodb. connection") END SUB %>; 這樣就可以在站點(diǎn)任何代碼中做類似引用： % mySQL="select * from publishers where state='xur' set rstemp=application("theconn").execute(mySQL) %> 同樣地，可以在session_onstart函數(shù)中創(chuàng)建記錄集對象 %SUB session_onstart set session("rstemp")=server.createobject("adodb.recordset") END SUB %> 然后在站點(diǎn)也面中進(jìn)行如下引用： % mySQL="select * from publishers where state='xur' set session("rstemp")=conntemp.execute(mySQL) %> 但這樣做的同時也有很大的負(fù)面影響，由于Application和Session變量都只有在關(guān)閉網(wǎng)站的時候才釋放占用的資源，所以Session參數(shù)會浪費(fèi)大量不必要內(nèi)存，而且此時Application變量成為服務(wù)器性能的瓶頸。 解決方法：建立定義對象ASP頁面，在需要進(jìn)行調(diào)用這些對象的頁面上，引入這張ASP頁面。假設(shè)定義對象的ASP頁面名稱為define.asp，則只要在對應(yīng)ASP頁面中加入以下語句就能引入該頁面。 !--#INCLUDE VIRTUAL="/define.asp" --> 在進(jìn)行頁面引進(jìn)時，最好在待引進(jìn)的ASP文件中不要包含%@LANGUAGE="VBSCRIPT"%>語句。因為在ASP文件中，只能有一句由@來定義的腳本解析語言。 8.安全防護(hù) ASP提供了很好的代碼保護(hù)機(jī)制，所有的ASP代碼都在服務(wù)器端執(zhí)行而只返回給客戶端代碼執(zhí)行結(jié)果。即便這樣，在老版本的IIS中還可以在文件名后面加::$DATA來查看ASP的源代碼，這已經(jīng)屬于Web Server安全范疇不在本文討論范圍內(nèi)。下面提出兩點(diǎn)簡單的安全注意事項。 雖然在ASP中建議引入文件以inc作為擴(kuò)展名，在這里仍建議以ASP作為引文件的擴(kuò)展名。當(dāng)這些代碼在安全機(jī)制不好的Web Server上運(yùn)行時，只需在地址欄上輸入引入文件的地址(inc為擴(kuò)展名)，就可以瀏覽該引入文件的內(nèi)容，這是由于在Web Server上，如果沒有定義好解析某類型（比如inc）的動態(tài)連接庫時，該文件以源碼方式顯示。 不要把數(shù)據(jù)庫文件放在網(wǎng)站結(jié)構(gòu)內(nèi)部，這樣，當(dāng)惡意人士獲取數(shù)據(jù)庫路徑后，就可以輕易獲取該數(shù)據(jù)庫，進(jìn)而肆意更改數(shù)據(jù)庫內(nèi)容。比較好的做法是，為數(shù)據(jù)庫建立DSN（Date Source Name），而在進(jìn)行數(shù)據(jù)庫訪問時直接訪問該DSN。
ASP提速技巧五則
技巧之一：提高使用Request集合的效率 訪問一個ASP集合來提取一個值是費(fèi)時的、占用計算資源的過程。因為這個操作包含了一系列對相關(guān)集合的搜索，這比訪問一個局部變量要慢得多。因此，如果打算在頁面中多次使用Request集合中的一個值，應(yīng)該考慮將其存貯為一個局部變量。例如將代碼寫成下面的形式以加快腳本引擎處理速度： strTitle=Request.Form("Title") strFirstName=Request.Form("FirstName") strLastName=Request.Form("LastName") If Len(strTitle) Then strTitle=strTitle " " If strFirstName="" Then strFullName=strTitle " " strLastName Elseif Len(strFirstName)=1 Then strFullName=strTitle strFirstName ". " strLastName Else strFullName=strTitle strFirstName " " strLastName End If
技巧之二：直接訪問適當(dāng)?shù)募?/B> 如果不是別無選擇，否則不要使用strPage=Request("page")的這樣的形式來獲取參數(shù)，因為這將按順序搜索全部的集合—QueryString、Form、Cookies、ClientCertificate、ServerVarible直到發(fā)現(xiàn)第一個匹配值的名稱。這樣做比直接訪問適當(dāng)?shù)募闲实停⑶沂遣话踩模悄芙^對保證這個值不會出現(xiàn)在另外一個集合中。 例如，可能希望搜索滿足客戶請求的WEB服務(wù)器名稱，這通過出現(xiàn)在每個查詢中的Request.ServerVarables集合中尋找“SERVER_NAME”來實(shí)現(xiàn)。然而，假如其他的集合也包含名為“SERVER_NAME”的值（鍵名不區(qū)分大小寫），當(dāng)使用Request("server_Name")時，就會得到錯誤的結(jié)果。總而言之，應(yīng)盡可能直接訪問適當(dāng)?shù)募稀?br> 技巧之三：在費(fèi)時操作前使用Response.IsClientConnected屬性 使用Response.IsClientConnected是觀察用戶是否仍連到服務(wù)器并正在載入ASP創(chuàng)建的網(wǎng)頁的有用方式。如果用戶斷開連接或停止下載，我們就不用再浪費(fèi)服務(wù)器的資源創(chuàng)建網(wǎng)頁，因為緩沖區(qū)內(nèi)容將被IIS丟棄。所以，對那些需要大量時間計算或資源使用較多的網(wǎng)頁來說，值得在每一階段都檢查游覽者是否已離線： …… Code to create first part of the page If Response.IsClientConnected Then Response.Flush Else Response.End End If …… Code to create next part of page
技巧之四：優(yōu)化ASP中的ADO操作 通常面言，數(shù)據(jù)構(gòu)成了WEB站點(diǎn)的實(shí)際內(nèi)容。所以，優(yōu)化ADO操作以加速ASP代碼執(zhí)行，十分有用： a. 僅選擇所需的列：當(dāng)打開ADO記錄集時，除非需要獲得所有的列，否則不應(yīng)自動地使用表名（即SELECT *）。使用單獨(dú)的列意味著將減少發(fā)送到服務(wù)器或從服務(wù)器取出的數(shù)據(jù)量。即使需要使用全部列，單獨(dú)地命名每個列也會獲得最佳的性能，因為服務(wù)器不必再解釋這些列的名字。 b. 盡可能的使用存儲過程。存儲過程是預(yù)先編譯的程序，含有一個已經(jīng)準(zhǔn)備好的執(zhí)行計劃，所以比SQL語句執(zhí)行更快。 c. 使用適當(dāng)?shù)墓鈽?biāo)和鎖定模式。如果所做的全部工作只是從記錄集中讀取數(shù)據(jù)，并將其顯示在屏幕上，那么就使用缺省的只能前移、只讀的記錄集。ADO用來維護(hù)記錄和鎖定的細(xì)節(jié)的工作越少，執(zhí)行的性能就越高。 d. 使用對象變量。當(dāng)遍歷記錄集時一個肯定能提高性能的方法是使用對象變量指向集合中的成員。例如： While Not RsGc.EOF Response.Write "工程名稱：" RsGc("GcMC") "(工程代碼：" RsGc("GcCode") ") " RsGc.MoveNext Wend 可以用改寫為下面的代碼以加快執(zhí)行： set GcMc=RsGc("GcMc") set GcCode=RsGc("GcCode") While Not rsGc.EOF Response.Write "工程名稱：" GcMc "(工程代碼：" GcCode ") " RsGc.MoveNext Wend
