Asp DLL

最新推荐文章于 2024-06-11 09:20:08 发布

SunSkyCity

最新推荐文章于 2024-06-11 09:20:08 发布

阅读量804

点赞数

文章标签： asp application vbscript session server dll

本文链接：https://blog.csdn.net/stcaaa/article/details/4166745

版权

Asp DLL

2009-05-10 11:28

vb文件:

加入代码:

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 show()
Response.Write "程序开始运行!"

End Sub

Public Sub rrr()
Response.Write ("<br>程序开发：孙天成")
End Sub
'引用内部对像
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 OnEndPage()
Set Application = Nothing
Set Request = Nothing
Set Response = Nothing
Set Server = Nothing
Set Session = Nothing

Set Context = Nothing
End Sub

Asp文件：

<% @ language="vbscript" %>

<%
Dim b1
Set b1=Server.CreateObject("v11.c11")
b1.show()
b1.rrr()
%>

运行结果：

说明：
在更改过DLL 后, 更改结果不能马上显示出来'
可以结束dllhost.exe（）进程，刷新页面。

SunSkyCity

关注

0
点赞
踩
0

收藏

觉得还不错? 一键收藏
1
评论
Asp DLL

Asp DLL2009-05-10 11:28vb文件:加入代码: Option ExplicitPrivate Context As ScriptingContextPrivate Application As ApplicationPrivate Response As ResponsePrivate Request As Reques
复制链接

扫一扫