用VB做asp调用的dll的通用代码

【本站原创作者：ITlearner 更新时间：2004-04-18 | 字体：大中小】

[导读]Private scriptingContext As scriptingContextPrivate Request As RequestPrivate Response As ResponsePrivate server As serverPrivate Session As Session Public Sub OnStartPage(PassedscriptingContext As s...

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

转载请注明来源：IT学习网网址：http://www.t086.com/ 向您的朋友推荐此文章
特别声明：本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载，但请务必注明出处和原始作者。文章版权归文章原始作者所有。对于被本站转载文章的个人和网站，我们表示深深的谢意。如果本站转载的文章有版权问题请联系我们，我们会尽快予以更正。