將ASP代碼移植為VB COM組件(3)

使用子程式和函數
作 者 : 青苹果電腦工作室
一個快速回答的問題：為什麼關於ASP的書中，討論使用子程式和函數的代碼的那麼少？
雖然一行一行地寫ASP代碼要更加簡單，但是以程式的形式來編碼卻有許多益處。
首先，非程式化的代碼不容易移植到Visual Basic。也許目前你沒有這個計劃，但是總有一天你會為了
其效能或可擴充性而將一些代碼移植到組件中。
其次是程式是運行得更快。對ASP效能的最大消耗是上下文轉換，每次從ASP代碼區< % % > 移到無格式的
HTML時都會發生。因為你不會在程式內部編碼一個上下文轉換，就不諱感覺到這種消耗。另外，ASP的
緩衝器也顯示當子程式用程式化代碼點擊頁面時會有很大的不同。這裡是使用程式化代碼的ASP應用程式
"Hello World" 的必須部分：
Private Sub Main()
Response.Write "Hello World!"
End Sub
Call Main
為了完整起見，我在程式中包含了一個上下文轉換的小例子。如果你實驗這個代碼，它會運行，但是請
不要在你自己的應用程式內部這樣做。
< %@ Language=VBScript % >
< %
Private Sub DoStuff()
% >
This is < b > HTML Text! < /b >
< %
End Sub
% >
< HTML >
< HEAD >
< META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0" >
< /HEAD >
< BODY >
< P >< % Call DoStuff % >< /P >
< /BODY >
< /HTML >
程式化的代碼還有一些其它益處。首先你會發現再利用包含在程式中的代碼部分更加容易。其次，要
實現同樣的目的所需要的程式碼更少。第三，你將要開始開發一個大的可再利用程式碼程式庫。開始時它的
形式是.inc 檔案，最後你自己的普通COM組件看起來就像Jeff Gordon（著名賽車選手）一樣棒。
移植你的代碼
有幾件事與從VBScript向Visual Basic移植代碼一樣簡單。一般來說，你需要移走代碼並增加資料類型。
有時，也可以在Visual Basic中應用一些更有效演算法，但是必須先保證代碼可以正常工作。
在我們這個應用程式舉例中，將要移植一些簡單的代碼到兩個Visual Basic COM 組件中。將一些HTML