关闭

VB中使用ASP对象实例

标签: aspvbapplicationmicrosoftlibraryserver
1289人阅读 评论(0) 收藏 举报
分类:

开发步骤:
1.新建立Activex Dll 项目
2.修改Project 名称
3.修改Module名称
4.添加引用:在NT和98下开发时,必须在项目中引用Microsoft Transaction Server Type Library,在Windows 2000下开发,必须引用COM+ Service Type Library。
5.调试代码,生成*.dll文件

Option Explicit

    Dim m_objResponse As Response

    Dim m_objRequest As Request

    Dim m_objServer As Server

    Dim m_objApplication As Application

    Dim m_objSession As Session

    Private Sub Class_Initialize()

    Dim objContext As ObjectContext

    Set objContext = GetObjectContext()

    Set m_objResponse = objContext("Response")

    Set m_objRequest = objContext("Request")

    Set m_objServer = objContext("Server")

    Set m_objApplication = objContext("Application")

    Set m_objSession = objContext("Session")

    End Sub

    Public Sub ASPTest()

    m_objResponse.Write "告别写字板,使用VB环境编写ASP程序!"

    End Sub

6.在IIS中测试ASP代码

<%Set objTest = Server.CreateObject("ASPObject.ASPCLass")
objTest.ASPTest
Set objTest = Nothing
%>

0
0

查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    个人资料
    • 访问:1213523次
    • 积分:15256
    • 等级:
    • 排名:第777名
    • 原创:294篇
    • 转载:60篇
    • 译文:2篇
    • 评论:188条
    文章存档
    最新评论
    C#+Jquery
    C#+Jquery