如何把ASP編寫成DLL(3)

領測軟件測試網 的是,我們得在我們的建立的類中,寫上OnEndPage子函數,這個OnStartPage是相反的!OnStartPage是創建對象,OnEndPage是消毀對象.

Public Sub OnEndPage()
Set MyScriptingContext = Nothing
Set MyApplication = Nothing
Set MyRequest = Nothing
Set MyResponse = Nothing
Set MyServer = Nothing
Set MySession = Nothing
End Sub
SayHello方法
我們來建立一個子函數,用于顯示"Holle World".這個SayHello方法只是HelloWorld這個類中一個子函數,我們以后會在ASP中用以下的顯示這個方法

〈%
Set ObjReference = Server.CreateObject("Example1.HelloWorld")
ObjReference.SayHello
%>
SayHello的程序,很簡單的!

Public Sub SayHello()
MyResponse.Write ("Hello World")
End Sub

現在一個小型的組件編寫完成,剩下的工作就是編譯這個組件,在"工程"菜單中保存它,取什么名字都可以,我們用Exmaple1.vbp吧! 然后就用在菜單中選擇"make exmaple1.dll",將其編譯成DLL文件.一個組件就真正完成了!
注意,編譯了此組件那么你就得先把你的PWS關掉,然后再編譯此組件.否則VB就會告訴你些組件在使用中.

在ASP中使用我們的自己的組件.

當你更正了在編譯中的錯誤,成功地編譯了example1這個工程,現在你就得拿出你最喜歡的HTML編輯器來寫下下面的語句,保存為ASP文件.

〈HTML>
〈HEAD>
〈TITLE>Example 1〈/TITLE>
〈/HEAD>

〈BODY>

〈%
Set ObjReference = Server.CreateObject("Example1.HelloWorld")
ObjReference.SayHello
%>

〈/BODY>
〈/HTML>

運行后即可看到結果:

Hello World

注冊組件

如果你想和你的朋友,鄰居分享你的組件,那么你就得在你的系統上注冊你的組件.我們一般使用Regsvr32.exe來注冊組件.注冊后你的組件會出現在Win95/Win98的windows/system目錄中.下面是一個注冊的例子:
Regsvr32.exe C:/wwwroot/Example1/Example1.dll
在你的系統中,VB會自動給你注冊,所以你很少用到Regsvr32.exe
我們這里只是寫了一個非常小的組件,你們可以寫好自己的更大的組件,而且還可以用VB中的很多控件.

文章來源于領測軟件測試網 http://www.kjueaiud.com/