asp編譯成dll-圖形化教程第2/2頁(yè)
4。編寫(xiě)代碼:
Option Explicit
Private Context As ScriptingContext
Private Application As Application
Private Response As Response
Private Request As Request
Private Session As Session
Private Server As Server
Public Sub OnStartPage(PassedscriptContext As ScriptingContext)
Set Context = PassedscriptContext
Set Application = Context.Application
Set Request = Context.Request
Set Response = Context.Response
Set Server = Context.Server
Set Session = Context.Session
End Sub
Public Sub showsuc()
Response.Write "我是藍(lán)色理想的老農(nóng),您好"
End Sub
' 釋放內(nèi)部對(duì)象
Public Sub OnEndPage()
Set Application = Nothing
Set Request = Nothing
Set Response = Nothing
Set Server = Nothing
Set Session = Nothing
Set Context = Nothing
End Sub
其中,除10處,其他都是必須的.
10處是我們自己要表現(xiàn)的程序.
ctrl+s保存在d:\mylib\cjjer.cls
在把工程保存為d:\mylib\bi.vbp
5 。編譯,注冊(cè)成dll:
點(diǎn)擊生成bi.dll
沒(méi)啥警告的話那就ok了,路徑保存在d:\mylib\bi.dll.
然后開(kāi)始--------->運(yùn)行-->
regsvr32 d:\mylib\bi.dll
這就注冊(cè)成功了.
6。使用bi.dll:
新建asp文件,輸入:
<%
Dim bicjjer
Set bicjjer=Server.CreateObject("bi.cjjer")
bicjjer.showsuc()
%>
瀏覽器,預(yù)覽,顯示如下:
注意:對(duì)已經(jīng)存在的組建名稱或這修改了dll文件,必須先停止IIS,再重啟注冊(cè)使用,否則會(huì)一直在原來(lái)的基礎(chǔ)上.
另外補(bǔ)充一點(diǎn):生成的dll文件不注冊(cè)到服務(wù)器也可以使用:
<% @ language="vbscript" %>
<!--METADATA TYPE="typelib" FILE="e:\web\web\asp\bi\bi.dll"-->
<%
Dim bicjjer
Set bicjjer=Server.CreateObject("bi.cjjer")
bicjjer.showsuc()
%>
這絕對(duì)是個(gè)好消息,有人說(shuō)這個(gè)沒(méi)什么價(jià)值,那我說(shuō)"您還是固陋寡聞或者您技術(shù)高的藐視dll...",哈哈哈,當(dāng)然是玩笑了,注意,METADATA的file路徑是絕對(duì)的物理路徑,否則無(wú)法裝載.
相關(guān)文章
ASP 循環(huán)導(dǎo)入導(dǎo)出數(shù)據(jù)處理 不使用緩存
非常不錯(cuò),大家可以自己應(yīng)用下。2009-01-01ASP是使用正則提取內(nèi)容里所有圖片路徑SRC的實(shí)現(xiàn)代碼
有時(shí)候客戶提交的內(nèi)容里包含多個(gè)圖片,客戶想單獨(dú)把圖片路徑提取出來(lái)進(jìn)行保存,下面腳本之家小編跟大家分享ASP正則提取內(nèi)容里所有圖片路徑SRC的方法函數(shù),需要的朋友可以參考下2019-09-09asp飛飛無(wú)限級(jí)分類(lèi)v1.0 Asp+sql+存儲(chǔ)過(guò)程+ajax提供下載
飛飛Asp樂(lè)園Asp Sql存儲(chǔ)過(guò)程版無(wú)限級(jí)分類(lèi) 開(kāi)發(fā)說(shuō)明: 本程序基于Asp環(huán)境開(kāi)發(fā) 使用的數(shù)據(jù)庫(kù):SQLServer2000(存儲(chǔ)過(guò)程) js框架:Jquery/ajax 數(shù)據(jù)庫(kù)名稱:archives2008-03-03在ASP中連接MySQL數(shù)據(jù)庫(kù),最好的通過(guò)ODBC方法
在ASP中連接MySQL數(shù)據(jù)庫(kù),最好的通過(guò)ODBC方法...2006-11-11asp createTextFile生成文本文件支持utf8
一般情況下可以使用fso的createTextFile函數(shù),但有時(shí)候我們需要生成utf8格式的文件,那么就可以用下面的函數(shù)擴(kuò)展了2020-08-08