用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

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

• 上一篇：GET方式SQL注入攻击网站入侵防守代码.
• 下一篇：网站访问量另类查询(1)
• 查看2004年04月的文章归档
• 关闭 | 打印 | 保存