什麼才是提高ASP性能的最佳選擇
什麼才是提高ASP性能的最佳選擇(一)
ASP開發人員為了在他們的設計專案中獲得更好的性能和可擴展性而不斷努力。幸運地是,有許多書籍和站點在這方面提供了很好的建議。但是這些建議的基礎都是從ASP平臺工作的結構上所得出的結論,對實際獲得的性能的提高沒有量的測量。由於這些建議需要更加複雜的編碼過程並降低了編碼的可讀性,開發人員就只能在看不到實際運行效果的情況下,獨自衡量為了提高他們ASP應用程式的性能是否值得付出這些代價。
本文分為兩大部分,我將介紹一些性能測試結果,幫助開發人員來確定某一特定舉措是否不僅對將來的專案來說是值得的,並且能夠對原來的專案進行更新。在第一部分我將回顧一些ASP開發的基礎性問題。在第二部分,將涉及一些最優化ADO函數,並將它們的結果與調用VB COM物件執行相同ADO函數的ASP頁面進行比較。這些結果很讓人開眼界,甚至有些時候是很令人吃驚的。
在本文中,我們將回答以下問題:
* 將ASP生成的內容寫入回應流中最有效的方法是什??
* 是否應該開啟緩衝器?
* 是否應該考慮向ASP代碼中增加注釋?
* 是否應該為頁面明確地設置默認語言?
* 如果不需要,是否應該關閉Session 狀態?
* 是否應該把腳本邏輯放在副程式和函數區中?
* 使用包含文件有什麼影響?
* 執行錯誤處理時會施加什?樣的負載?
* 設置一個上下文處理是否對性能有影響?
所有測試都是用Microsoft的Web應用程式重點工具(WAST)來進行的,這是一個免費的工具,可以在這裏(http://webtool.rte.microsoft.com/)找到。我用WAST創建了一個簡單的test 腳本,反復調用下面所描述的ASP頁面測試(每個超過70,000次)。反應的時間基於平均最後位元組總時間(TTLB), 也就是從最初請求的時間到工具從伺服器接收最後一位元資料的時間。我們的測試伺服器是一個Pentium 166,記憶體為196MB,客戶機?Pentium 450,記憶體?256MB。你也許會想這些機器的性能並不算很高級,但是不要忘了,我們並不是要測試伺服器的容量,我們只是要測試伺服器每次處理一個頁面所用的時間。測試期間這些機器不做其他工作。WAST 測試腳本、測試報告以及所有的ASP測試頁面都包含在ZIP文件(http://www.asptoday.com/articles/images/20000113.zip)中,你可以自己進行回顧和測試。
將ASP生成的內容寫入回應流中最有效的方法是什麼?
使用ASP的一個最主要原因是在伺服器上生成動態內容。所以很明顯,我們測試的起點是確定將動態內容發送到回應流中的最適合的方式。在多種選擇中,有兩個是最基本的:一是使用內聯ASP標記,另一個是使用Response.Write 語句。
為測試這些選擇,我們創建了一個簡單的ASP頁面,其中定義了一些變數,然後將它們的值插入表格中。雖然這個頁面很簡單也不是很實用,但它允許我們分離並測試一些單獨的問題。
使用ASP內聯標記
第一個測試包括使用內聯ASP標記< %= x % >,其中x是一個已賦值的變數。到目前為止,這個方法是最容易執行的,並且它使頁面的HTML部分保持一種易於閱讀和維護的格式。
< % OPTION EXPLICIT
Dim FirstName
Dim LastName
Dim MiddleInitial
Dim Address
Dim City
Dim State
Dim PhoneNumber
Dim FaxNumber
Dim EMail
Dim BirthDate
FirstName = "John"
MiddleInitial = "Q"
LastName = "Public"
Address = "100 Main Street"
City = "New York"
State = "NY"
PhoneNumber = "1-212-555-1234"
FaxNumber = "1-212-555-1234"
EMail = "john@public.com"
BirthDate = "1/1/1950"
% >
< HTML >
< HEAD >
< TITLE >Response Test< / TITLE >
< /HEAD >
< BODY >
< H1 >Response Test< /H1 >
< TABLE >
< tr >< td >< b >First Name:< /b >< /td >< td >< %= FirstName % >< /td >< /tr >
< tr >< td >< b >Middle Initial:< /b >< /td >< td >< %= MiddleInitial % >< /td >< /tr >
< tr >< td >< b >Last Name:< /b >< /td >< td >< %= LastName % >< /td >< /tr >
< tr >< td >< b >Address:< /b >< /td >< td >< %= Address % >< /td >< /tr >
< tr >< td >< b >City:< /b >< /td >< td >< %= City % >< /td >< /tr >
< tr >< td >< b >State:< /b >< /td >< td >< %= State % >< /td >< /tr >
< tr >< td >< b >Phone Number:< /b >< /td >< td >< %= PhoneNumber % >< /td >< /tr >
< tr >< td >< b >Fax Number:< /b >< /td >< td >< %= FaxNumber % >< /td >< /tr >
< tr >< td >< b >EMail:< /b >< /td >< td >< %= EMail % >< /td >< /tr >
< tr >< td >< b >Birth Date:< /b >< /td >< td >< %= BirthDate % >< /td >< /tr >
< /TABLE >
< /BODY >
< /HTML >
/app1/response1.asp的完整代碼
以前的最佳(反應速度) = 8.28 msec/page
在HTML的每一行使用Response.Write 語句
許多比較好的學習文檔建議避免使用前面的那種方法。其主要理由是,在輸出頁面和處理頁面施加反應時間的過程中,如果web 伺服器不得不在發送純HTML和處理腳本之間進行轉換,就會發生一種被稱?上下文轉換的問題。大部分程式師一聽到這裏,他們的第一反應就是將原始的HTML的每一行都包裝在Response.Write函數中。
…
Response.Write("< html >")
Response.Write("< head >")
Response.Write(" < title >Response Test< /title >")
Response.Write("< /head >")
Response.Write("< body >")
Response.Write("< h1 >Response Test< /h1 >")
Response.Write("< table >")
Response.Write("< tr >< td >< b >First Name:< /b >< /td >< td >" & FirstName & "< /td >< /
tr >")
Response.Write("< tr >< td >< b >Middle Initial:< /b >< /td >< td >" & MiddleInitial & "<
/td >< /tr >")
…
/app1/response2.asp的片段
以前的最佳(反應速度) = 8.28 msec/page
反應時間 = 8.08 msec/page
差= -0.20 msec (減少 2.4%)
我們可以看到,使用這種方法與使用內聯標記的方法相比在性能上獲得的收益非常小,這也許是因為頁面給伺服器裝載了一大堆小的函數調用。這種方法最大的缺點是,由於現在HTML都嵌入腳本中,所以腳本代碼變得更加冗長,更加難以閱讀和維護。
使用包裝函數
當我們試圖使用Response.Write 語句這種方法時,最令人灰心的發現可能就是Response.Write 函數不能在每行的結尾處放置一個CRLF 。因此,當你從瀏覽器中閱讀源代碼時,本來佈置得非常好的HTML,現在成了沒有結束的一行。我想,你的下一個發現可能會更令你恐怖:在Response 物件中沒有其姊妹函數Writeln 。所以,一個很明顯的反應就是?Response.Write 函數創建一個包裝函數,以便給每一行都附加一個CRLF 。
…
writeCR("< tr >< td >< b >First Name:< /b >< /td >< td >" & FirstName & "< /td >< /tr >")
…
SUB writeCR(str)
Response.Write(str & vbCRLF)
END SUB
/app1/response4.asp的片段
以前的最佳(反應速度)= 8.08 msec/page
反應時間= 10.11 msec/page
差 = +2.03 msec (增加 25.1%)
當然,由於這種方法有效地使函數調用次數加倍,其對性能的影響也很明顯,因此要不惜一切代價避免。具有諷刺意味的是CRLF也向反應流中?每行增加了2個位元組,而這是瀏覽器不需要呈現到頁面上的。格式化良好的HTML所做的一切就是讓你的競爭者更容易閱讀你的HTML源代碼並理解你的設計。
將連續的Response.Write 連接到一個單獨語句中
不考慮我們前面用包裝函數進行的測試,下一個合乎邏輯的步驟就是從單獨的Response.Write 語句中提取出所有的字串,將它們連接到一個單獨語句中,這樣就減少了函數調用的次數,極大地提高了頁面的性能。
…
Response.Write("< html >" & _
"< head >" & _
"< title >Response Test< /title >" & _
"< /head >" & _
"< body >" & _
"< h1 >Response Test< /h1 >" & _
"< table >" & _
"< tr >< td >< b >First Name:< /b >< /td >< td >" & FirstName & "< /td >< /tr >" & _
…
"< tr >< td >< b >Birth Date:< /b >< /td >< td >" & BirthDate & "< /td >< /tr >" & _
"< /table >" & _
"< /body >" & _
"< /html >")
/app1/response3.asp的片段
以前的最佳(反應速度)= 8.08 msec/page
反應時間 = 7.05 msec/page
差 = -1.03 msec (減少12.7%)
目前,這是最優化的配置。
將連續的Response.Write 連接到一個單獨語句中,在每行結尾處增加一個CRLF
考慮到那些要求他們的源代碼從瀏覽器中看要很純粹的人,我用vbCRLF 常量在前面測試中每行的結尾處插入了一些回車,然後重新運行。
…
Response.Write("< html >" & vbCRLF & _
"< head >" & vbCRLF & _
" < title >Response Test< /title >" & vbCRLF & _
"< /head >" & vbCRLF & _
…
/app1/response5.asp的片段
前面的最佳(反應速度)= 7.05 msec/page
反應時間= 7.63 msec/page
差 = +0.58 msec (增加 8.5%)
運行的結果在性能上有一點降低,這也許是由於額外的串聯和增加的字元量。
回顧和觀測
從前面有關ASP輸出的測試中可以得出一些規則:
* 避免內聯ASP的過多使用。
* 總是將連續Response.Write 語句連接進一個單獨語句內。
* 永遠不要在Response.Write 周圍使用包裝函數來附加CRLF。
* 如果必須格式化HTML輸出,直接在Response.Write 語句內附加CRLF。
什麼才是提高ASP性能的最佳選擇 (二)
是否應該開啟緩衝器?
通過腳本程式啟動緩衝器
在ASP腳本的頂部包含Response.Buffer=True ,IIS就會將頁面的內容緩存。
< % OPTION EXPLICIT
Response.Buffer = true
Dim FirstName
…
/app1/buffer__1.asp的片段
以前的最佳(反應時間)= 7.05 msec/page
反應時間 = 6.08 msec/page
差= -0.97 msec (降低13.7%)
性能得到了極大提高。但是等等,還能有更好的。
通過伺服器配置啟動緩衝器
雖然在IIS 5.0中緩衝器是被默認啟動的,但是在IIS 4.0中還必須手動來啟動它。這時要找到站點的Properties 對話方塊,在那裏,從Home Directory 標簽中選擇配置按鈕。然後在"App options"下選擇"enable buffering" 。對於這個測試,Response.Buffer 語句從腳本中被移走了。
以前的最佳= 7.05 msec/page
反應時間 = 5.57 msec/page
差= -1.48 msec (降低 21.0%)
目前,這是我們所得到的最快反應了,比我們以前最好情況下的反應時間還要降低21%。從現在開始,我們以後的測試都要把這個反應時間作為基準值。
回顧及觀測
緩衝器是提高性能的好方法,所以把緩衝器設置成伺服器的預設值很有必要。如果因為某些原因,頁面不能正確地使緩衝器運行,只需要Response.Buffer=False 命令即可。緩衝器的一個缺點是在整個頁面處理完之前,用戶從伺服器看不到任何東西。因此,在複雜頁面的處理期間,偶而調用一次Response.Flush 來更新用戶是個好主意。
現在在我們的規則中又增加了一條:總是通過伺服器設置開啟緩衝器。
是否應該考慮向ASP代碼中增加注釋?
大部分HTML開發人員都知道包含HTML注釋不是個好主意,首先會增加傳輸資料的規模,其次它們只是向別的開發人員提供有關你頁面組織的資訊。但是ASP頁面上的注釋又如何呢?它們從來不離開伺服器,但也確實要增加頁面的規模,因此必須用ASP進行分解。
在這次的測試中,我們增加20條注釋,每條有80個字元,總共有1600個字元。
< % OPTION EXPLICIT
'-------------------------------------------------------------------------------
… 20 lines …
'-------------------------------------------------------------------------------
Dim FirstName
…
/app2/comment_1.asp片段
基準= 5.57 msec/page
反應時間= 5.58 msec/page
差 = +0.01 msec (增加 0.1%)
測試的結果是驚人的。雖然注釋幾乎相當於文件本身的兩倍,但是它們的存在並沒有給反應時間帶來很大的影響。所以說我們可以遵循以下規則:
只要使用適度,ASP注釋對性能的影響很小或根本沒有影響。
是否應該為頁面明確地設置默認語言?
IIS處理VBScript是默認的設置,但是我看到,在大多數例子中還是用< %@LANGUAGE=VBSCRIPT% >聲明將語言明確地設置為VBScript 。我們的下一個測試將檢驗這個聲明的存在對性能有什麼影響。
< %@ LANGUAGE=VBSCRIPT % >
< % OPTION EXPLICIT
Dim FirstName
…
/app2/language1.asp片段。
基準值= 5.57 msec/page
反應時間= 5.64 msec/page
差= +0.07 msec (增加1.2%)
可以看到,包含了語言的聲明對性能有一個輕微的影響。因此:
* 設置伺服器的默認語言配置以與站點上使用的語言相匹配。
* 除非你使用非默認語言,不要設置語言聲明。
如果不需要,是否應該關閉Session 狀態?
避免使用IIS的Session上下文有許多理由,那些已經可以獨立成為一篇文章。我們現在試圖回答的問題是當頁面不需要時,關閉Session上下文是否對性能提高有所幫助。從理論上講應該是肯定的,因為這樣一來就不需要用頁面例示Session上下文了。
同緩衝器一樣,Session狀態也有兩種配置方法:通過腳本和通過伺服器設置。
通過腳本關閉Session上下文
對於這個測試,要關閉頁面中的Session上下文,我增加一個Session狀態聲明。
< %@ ENABLESESSIONSTATE = FALSE % >
< % OPTION EXPLICIT
Dim FirstName
…
/app2/session_1.asp片段。
基準值= 5.57 msec/page
反應時間= 5.46 msec/page
差= -0.11 msec (降低2.0%)
只通過這樣一個小小的努力就得到了不錯的進步。現在看看第二部分。
通過伺服器配置關閉Session 上下文
要在伺服器上關閉Session 上下文,請到站點的Properties 對話方塊。在Home Directory 標簽上選擇Configuration 按鈕。然後在"App options"下取消"enable session state" 的選擇。我們在沒有ENABLESESSIONSTATE 聲明的情況下運行測試。
基準值 = 5.57 msec/page
反應時間= 5.14 msec/page
差= -0.43 msec (降低7.7%)
這是性能的又一個顯著提高。所以,我們的規則應是:在不需要的情況下,總是在頁面或應用程式的水平上關閉Session狀態。
使用Option Explicit 會使性能有實質改變嗎?
在一個ASP頁面的頂部設置Option Explicit 以要求所有的變數在使用之前都要在頁面上進行聲明。這有兩個原因。首先應用程式可以更快地處理變數的存取。其次,這樣可以防止我們無意中錯用變數的名字。在這個測試中我們移走Option Explicit 引用和變數的Dim 聲明。
基準值 = 5.57 msec/page
反應時間= 6.12 msec/page
差 = +0.55 msec (9.8% 增加)、
儘管有一些代碼行從頁面中去掉了,反應時間卻依然增加了。所以儘管使用Option explicit 有時候費時間,但是在性能上卻有很顯著的效果。因此我們又可以增加一條規則:在VBScript中總是使用Option explicit。
是否應該把腳本邏輯放在副程式和函數區?
用函數和副程式來組織和管理代碼是一個很好的方法,特別是當一個代碼區在頁面中多次使用的情況。缺點是要在系統上增加一個做相同工作的額外函數調用。副程式和函數的另一個問題是變數的範圍。從理論上說,在一個函數區內指定變數更有效。現在我們看看這兩個方面如何發生作用。
將Response.Write 語句移入副程式
這個測試只是將Response.Write 語句移入一個子程式區內。
…
CALL writeTable()
SUB writeTable()
Response.Write("< html >" & _
"< head >" & _
…
"< tr >< td >< b >EMail:< /b >< /td >< td >" & EMail & "< /td >< /tr >" & _
"< tr >< td >< b >Birth Date:< /b >< /td >< td >" & BirthDate & "< /td >< /tr >" & _
"< /table >" & _
"< /body >" & _
"< /html >")
END SUB
/app2/function1.asp片段
基準值= 5.57 msec/page
反應時間= 6.02 msec/page
差 = +0.45 msec (8.1% 增加)
同預料中一樣,副程式調用給頁面帶來了額外的負擔。
將所有腳本移入副程式中
在這個測試中,Response.write 語句與變數聲明都移入一個子程式區中。
< % OPTION EXPLICIT
CALL writeTable()
SUB writeTable()
Dim FirstName
…
Dim BirthDate
FirstName = "John"
…
BirthDate = "1/1/1950"
Response.Write("< html >" & _
"< head >" & _
" < title >Response Test< /title >" & _
"< /head >" & _
"< body >" & _
"< h1 >Response Test< /h1 >" & _
"< table >" & _
"< tr >< td >< b >First Name:< /b >< /td >< td >" & FirstName & "< /td >< /tr >" & _
…
"< tr >< td >< b >Birth Date:< /b >< /td >< td >" & BirthDate & "< /td >< /tr >" & _
"< /table >" & _
"< /body >" & _
"< /html >")
END SUB
/app2/function2.asp片段
基準值= 5.57 msec/page
反應時間= 5.22 msec/page
差 = -0.35 msec (6.3% 降低)
非常有趣!儘管將變數移到函數範圍內增加了額外的函數調用,但實際上卻提高了性能。我們又可以增加以下規則:
* 在一個頁面上,如果代碼要使用一次以上,就將代碼封入函數區。
* 適當時候,將變數聲明移到函數範圍內。
使用包含文件有什麼影響?
ASP編程的一個重要功能就是包含來自其他頁面的代碼。通過這項功能,程式師可以在多個頁面上共用函數,使代碼更易於維護。缺點在於伺服器必須從多個來源組裝頁面。以下是使用Include文件的兩個測試。
使用內聯代碼的Include 文件
在這個測試中,有一小段代碼被移到一個Include 文件中:
< % OPTION EXPLICIT
Dim FirstName
…
Dim BirthDate
FirstName = "John"
…
BirthDate = "1/1/1950"
% >
< !-- #include file="inc1.asp" -- >
/app2/include_1.asp片段
基準值 = 5.57 msec/page
反應時間= 5.93 msec/page
差 = +0.36 msec (6.5% 增加)
這不奇怪。使用Include 文件形成了負載。
在函數區使用Include 文件
在這裏,代碼都包裝在一個Include 文件中的副程式裏。Include 引用是在頁面頂部進行的,在ASP腳本的適當位置調用副程式。
< % OPTION EXPLICIT
Dim FirstName
…
Dim BirthDate
FirstName = "John"
…
BirthDate = "1/1/1950"
CALL writeTable()
% >
< !-- #include file="inc2.asp" -- >
/app2/include_2.asp片段
基準值 = 5.57 msec/page
反應時間= 6.08 msec/page
差 =+0.51 msec (9.2% 增加)
這對性能造成的影響比functions調用還大。因此:只有當代碼在頁面之間共用時才使用Include 文件。
執行錯誤處理時會形成多大的負載?
對於所有真正的應用程式來說,錯誤處理都是必要的。這個測試中,通過調用On Error Resume Next函數來調用錯誤控制碼。
< % OPTION EXPLICIT
On Error Resume Next
Dim FirstName
…
/app2/error_1.asp片段
基準值 = 5.57 msec/page
反應時間= 5.67 msec/page
差= 0.10 msec (1.8% 增加)
你可以看到,錯誤控制碼帶來了代價。我們可以提出以下建議:只有在會發生超出測試或控制能力之外的情況時才使用錯誤控制碼。一個最基本的例子就是使用存取其他資源,如ADO或FileSystem 物件的COM物件。
設置一個上下文處理是否對性能有影響?
當錯誤發生時,在頁面上設置一個上下文處理允許腳本進行反轉操作。這是通過在頁面上使用處理聲明來設置的。
< %@ TRANSACTION = REQUIRED % >
< % OPTION EXPLICIT
Dim FirstName
…
/app2/transact1.asp片段
基準值 = 5.57 msec/page
反應時間= 13.39 msec/page
差 = +7.82 msec (140.4% 增加)
啊!這真實最具有戲劇性的結果。所以請留意以下規則:只有當兩個或更多操作被作為一個單元執行時,才使用處理上下文。
什麼才是提高ASP性能的最佳選擇(三)
在本文的第一部分中,我回顧了有關ASP開發的一些基本問題,介紹了一些性能測試的結果,以理解我們放置在頁面中的代碼可能對運行性能造成什麼樣的影響。在這個系列的第二部分,我們將探討經過論證的ASP最廣泛的用途,即通過ActiveX 資料物件(ADO)交互使用資料庫內容。ADO是Microsoft通用並簡單的資料庫介面。
ADO有很多的功能設置,因此準備這篇文章時最大的挑戰便是限制測試問題的範圍。考慮到讀取大資料集會為web 伺服器施加很大的負載,我決定將研究的內容局限在為使用ADO記錄集尋找最優化配置的方面。但是這個限制還是提出了一個挑戰,因為ADO為執行同一個功能提供了多種方式。比如說,記錄集可以從Recordset 類中恢復,也可以從Connection和Command 類中恢復。另外,一旦你有了一個記錄集,那麼有很多個選擇會戲劇性地影響性能。因此,同第一部分一樣,我將盡可能地多涉及一些具體問題。
目的
我研究的目的是獲取足夠的資訊以找到以下問題的答案:
* 是否應該使用ADOVBS.inc包含文件?
* 當使用一個記錄集時,是否應該創建一個單獨的Connection物件?
* 恢復一個記錄集最好的方法是什麼?
* 指標和鎖的類型中,哪些是最有效的?
* 是否應該使用斷開的記錄集?
* 設置記錄集(Recordset)屬性的最好方法是什麼?
* 引用記錄集中域值的最有效方法是什麼?
* 使用臨時字串可以較好地代替緩衝器嗎?
測試是如何設立的?
為進行這項研究中的測試,我們共組裝了21個ASP頁面(包含在本文下載內容中)。每個頁面都被配置成用3個不同的查詢返回記錄集運行,這些記錄集中分別有0、25、250條記錄。這可以幫助我們將裝載記錄集的問題和在記錄集中迴圈上的性能問題隔離開。
為滿足這些變化的條件,資料庫連接字串和測試SQL字串都作為應用程式變數存儲在Global.asa中。因為我們的測試資料庫是在Microsoft SQL Server 7.0上運行的,因此我們的連接字串指定OLEDB作為連接供應者、Northwind 樣本資料庫(包含在SQL伺服器中)作為當前資料庫。SQL SELECT語句要求Northwind Orders 表格中的7個特定域。
< SCRIPT LANGUAGE=VBScript RUNAT=Server >
Sub Application_OnStart
Application("Conn") = "Provider=SQLOLEDB; " & _
"Server=MyServer; " & _
"uid=sa; " & _
"pwd=;" & _
"DATABASE=northwind"
Application("SQL") = "SELECT TOP 0 OrderID, " & _
" CustomerID, " & _
" EmployeeID, " & _
" OrderDate, " & _
" RequiredDate, " & _
" ShippedDate, " & _
" Freight " & _
"FROM [Orders] "
End Sub
< /SCRIPT >
'alternate sql ?25 records
Application("SQL") = "SELECT TOP 25 OrderID, " & _
" CustomerID, " & _
" EmployeeID, " & _
" OrderDate, " & _
" RequiredDate, " & _
" ShippedDate, " & _
" Freight " & _
"FROM [Orders] "
'alternate sql ?250 records
Application("SQL") = "SELECT TOP 250 OrderID, " & _
" CustomerID, " & _
" EmployeeID, " & _
" OrderDate, " & _
" RequiredDate, " & _
" ShippedDate, " & _
" Freight " & _
"FROM [Orders] "
我們的測試伺服器是一個雙450 MHz Pentium ,512MB的RAM,在其上運行著NT Server 4.0 SP5, MDAC 2.1 (資料訪問元件)以及Microsoft Scripting Engine的5.0版本。SQL伺服器在一個同樣規格的單獨機器上運行。同第一篇文章一樣,我使用Microsoft的Web應用程式重點工具記錄從最初的頁面請求到傳輸最後一個位元組(TTLB )的時間,精確到伺服器上的毫秒級。這個測試腳本運行20小時,調用每個頁面1300次以上。顯示的時間是session的平均TTLB。要記住的是,同第一篇文章一樣,我們只是試圖涉及性能方面的問題,而非伸縮性和容量的問題。
還請注意,我們在伺服器上開啟了緩衝器。另外,我把所有的檔案名都定為同樣長度,因此檔案名中就會有一個或多個下劃線來襯墊。
開始
在第一個測試中,我們使用典型Microsoft ASP ADO 樣本文件中的典型場景來恢復一個簡單的記錄集。在這個例子( ADO__01.asp )中,我們首先創建一個Connection物件,然後創建一個Recordset物件。當然,我在腳本中進行了一些修改,以反映在本系列的第一部分中涉及到的一些好的做法。
< % Option Explicit % >
< !-- #Include file="ADOVBS.INC" -- >
< %
Dim objConn
Dim objRS
Response.Write( _
"< HTML >< HEAD >" & _
"< TITLE >ADO Test< /TITLE >" & _
"< /HEAD >< BODY >" _
)
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open Application("Conn")
Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.ActiveConnection = objConn
objRS.CursorType = adOpenForwardOnly
objRS.LockType = adLockReadOnly
objRS.Open Application("SQL")
If objRS.EOF Then
Response.Write("No Records Found")
Else
'write headings
Response.Write( _
"< TABLE BORDER=1 >" & _
"< TR >" & _
"< TH >OrderID< /TH >" & _
"< TH >CustomerID< /TH >" & _
"< TH >EmployeeID< /TH >" & _
"< TH >OrderDate< /TH >" & _
"< TH >RequiredDate< /TH >" & _
"< TH >ShippedDate< /TH >" & _
"< TH >Freight< /TH >" & _
"< /TR >" _
)
'write data
Do While Not objRS.EOF
Response.Write( _
"< TR >" & _
"< TD >" & objRS("OrderID") & "< /TD >" & _
"< TD >" & objRS("CustomerID") & "< /TD >" & _
"< TD >" & objRS("EmployeeID") & "< /TD >" & _
"< TD >" & objRS("OrderDate") & "< /TD >" & _
"< TD >" & objRS("RequiredDate") & "< /TD >" & _
"< TD >" & objRS("ShippedDate") & "< /TD >" & _
"< TD >" & objRS("Freight") & "< /TD >" & _
"< /TR > " _
)
objRS.MoveNext
Loop
Response.Write("< /TABLE >")
End If
objRS.Close
objConn.Close
Set objRS = Nothing
Set objConn = Nothing
Response.Write("< /BODY >< /HTML >")
% >
結果是這樣的:
.......
現在先來看看每一欄中的數位代表什麼:
0 代表運行返回0個記錄的查詢時的TTLB,單位毫秒。在我們所有測試中,這個數位用來標誌頁面的負載或裝載頁面創建物件但不在資料中迴圈所用的時間。
25 裝載並顯示25條記錄的TTLB(毫秒)。
tot time/25 TTLB除以25條記錄(毫秒)。代表每條記錄的總平均時間。
disp time/25 以毫秒計的TTLB減去“0”那欄的TTLB,並除以25條記錄。代表在記錄集中迴圈顯示每條記錄的時間。
250 裝載並顯示250條記錄的TTLB(毫秒)。
tot time/250 TTLB除以250條記錄(毫秒)。代表每條記錄的總平均時間。
disp time/250 以毫秒計的TTLB減去“0”那欄的TTLB,並除以250條記錄。代表在記錄集中迴圈顯示每條記錄的時間。
我們將用下面測試的結果與這些值相比較。
是否應該使用ADOVBS.inc 包含文件?
這個問題我想快點解決。Microsoft 提供的ADOVBS.inc 文件包含270行代碼,代表可以應用于ADO屬性的大部分常量。我們的例子中只引用了這個文件中的2個常量。因此對於這個測試( ADO__02.asp ),我取消了包含文件的引用,並用屬性列舉中的實際數位代替了常量。
objRS.CursorType = 0 ' adOpenForwardOnly
objRS.LockType = 1 ' adLockReadOnly
我們可以看到裝載時間減少了23%。這與每條記錄的顯示時間有定義上的不同,因為這種改變對於在記錄集中迴圈不應該有影響。這個問題有幾種解決辦法。我建議使用ADOVBS.inc 文件作為參考,必要時使用注釋來注明數位。要記住,就如同在第一部分所闡明的一樣,注釋是不需要懼怕的,因為只要使用適度,它們不會給性能帶來大的影響。另一種方法是只從文件中將你所需要的常量複製到頁面中。
解決這個問題有一個很酷的方法,通過將ADO類庫連接到你的應用程式,使所有的ADO常量都可用。將以下代碼增加到你的Global.asa 文件,你就可以直接使用所有的常量。
< !--METADATA TYPE="typelib"
FILE="C:\Program Files\Common Files\SYSTEM\ADO\msado15.dll"
NAME="ADODB Type Library" -- >
或
< !--METADATA TYPE="typelib"
UUID="00000205-0000-0010-8000-00AA006D2EA4"
NAME="ADODB Type Library" -- >
所以,這裏是我們的第一個規則:
* 避免包含ADOVBS.inc文件,用其他方法來使用常量。
什麼才是提高ASP性能的最佳選擇(四)
結論
本文第一部分的重要之處在於許多小事情的累積。為了強調這個問題,我設置了最後一個測試,在其中進行了我們以前曾經測試過的看來無所謂但實際上有壞影響的所有操作。我包含了許多Response.Write 聲明、關閉了緩衝器、設置了默認語言、去掉了Option Explicit 引用並初始化了錯誤控制碼。
< %@ LANGUAGE=VBSCRIPT % >
< %
On Error Resume Next
FirstName = "John"
…
BirthDate = "1/1/1950"
Response.Write("< html >")
Response.Write("< head >")
Response.Write(" < title >Response Test< /title >")
Response.Write("< /head >")
Response.Write("< body >")
Response.Write("< h1 >Response Test< /h1 >")
Response.Write("< table >")
Response.Write("< tr >< td >< b >First Name:< /b >< /td >< td >" &_
"FirstName & "< /td >< /tr >")
…
Response.Write("< tr >< td >< b >Birth Date:< /b >< /td >< td >" &_
" BirthDate & "< /td >< /tr >")
Response.Write("< /table >")
Response.Write("< /body >")
Response.Write("< /html >")
% >
/app2/final_1.asp片段
基準值 = 5.57 msec/page
反應時間 = 8.85 msec/page
差 = +3.28 msec (58.9% 增加)
聽起來可能很明顯,但是理解更重要,那就是我們放置在頁面上的代碼會對性能有影響。頁面上的小變化有時會大大地增加反應時間。
規則概括
* 避免內聯ASP的過多使用。
* 總是將連續Response.Write 語句連接進一個單獨語句內。
* 永遠不要在Response.Write 周圍使用包裝函數以附加CRLF。
* 如果必須格式化HTML輸出,直接在Response.Write 語句內附加CRLF。
* 總是通過伺服器設置開啟緩衝器。
* 只要使用適度,ASP注釋對性能的影響很小或根本沒有影響。
* 設置伺服器的默認語言配置以與站點上使用的語言相匹配。
* 除非你使用非默認語言,不要設置語言聲明。
* 在VBScript中總是使用Option explicit 。
* 在不需要的情況下,總是在頁面或應用程式的水平上關閉Session狀態。
* 只有當代碼在頁面之間共用時才使用Include 文件。
* 在一個頁面上,如果代碼要使用一次以上,就將代碼封入函數區。
* 適當時候,將變數聲明移到函數範圍內。
* 只有會發生超出測試或控制能力之外的情況時才使用錯誤控制碼。
* 只有當兩個或更多操作被作為一個單元執行時,才使用上下文處理。
現在回顧一下,有許多問題可以作為普遍性的方針:
* 避免冗餘--不要設置那些默認狀態下已經設置的屬性。
* 限制函數調用的次數。
* 縮小代碼的範圍。
以上文章轉貼自PaintAsp Studio [ Nigi 製作、維護 ]
作者為青蘋果工作室編譯
留言列表