xqf222的专栏

ASP,JSP,ASP.NET,C#;Sql Server,Oracle,Informix累积历程和经验分享

VB中使用ASP对象实例

开发步骤:
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
%>

阅读更多
个人分类: VB数据库开发
想对作者说点什么? 我来说一句

没有更多推荐了,返回首页

不良信息举报

VB中使用ASP对象实例

最多只允许输入30个字

加入CSDN,享受更精准的内容推荐,与500万程序员共同成长!
关闭
关闭