用VB做asp调用的dll的通用代码
Private scriptingContext As scriptingContext
Private Request As Request
Private Response As Response
Private server As server
Private Session As Session
Public Sub OnStartPage(PassedscriptingContext As scriptingContext)
'初始化相关物件变量
Set scriptingContext = PassedscriptingContext
Set Request = scriptingContext.Request
Set Response = scriptingContext.Response
Set server = scriptingContext.server
Set Session = scriptingContext.Session
End Sub
public test
end public
Public Sub OnEndPage()
Set scriptingContext = Nothing
Set Request = Nothing
Set Response = Nothing
Set server = Nothing
Set Session = Nothing
End Sub
- 上一篇文章:GET方式SQL注入攻击网站入侵防守代码.
- 下一篇文章:网站访问量另类查询(1)
相 关 文 章
相 关 软 件
本站搜索(搜索结果将在新窗口打开)
