ActiveX DLL 不能用?为什么?!!!

subzero 2000-03-03 02:40:00
VB ACTIVEX 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

ASP代码如下:
<%
Set objTest = Server.CreateObject("YourPrjName.ASPTest")
objTest.ASPTest
Set objTest = Nothing
%>

为什么页面出错“OBJECT变量或WITH块未设置”
...全文
280 9 打赏 收藏 转发到动态 举报
写回复
用AI写文章
9 条回复
切换为时间正序
请发表友善的回复…
发表回复
subzero 2000-03-06
  • 打赏
  • 举报
回复
vb5不行吗?
wangzq 2000-03-06
  • 打赏
  • 举报
回复
sorry, 是MTSTransactionMode,可以在ActiveX DLL类型的Project中的Class Module的属性中看到的。我用的是VB6。

你可以在MSDN中搜索一篇名为“Developing a Visual Basic Component for IIS/MTS”的文章看一下,讲得很具体。
subzero 2000-03-06
  • 打赏
  • 举报
回复
MTSTranscationMode?
怎样设置?
也就是说上面的代码要在objectcontrol_activate中了?
wangzq 2000-03-05
  • 打赏
  • 举报
回复
这段代码大概不是你自己写的吧?:)
ObjectContext是MTS中的概念,在MTS中运行的对象,如果要用到上下文(context)的话,除了要设置Class Module的属性MTSTransactionMode之外,还必须实现ObjectControl这个接口,只有在ObjectControl_Activate()和ObjectControl_Deactivate()当中ObjectContext才是可访问的。另外,调试MTS对象也比较麻烦,你只能在NT4+SP4, 并且安装了MTS 2.0 + SP1之后才可以直接在VB IDE中调试,否则,只能编译成DLL,然后到MTS Explorer中安装上才能使用了。
subzero 2000-03-05
  • 打赏
  • 举报
回复
wangzq,你所说的我还是不太明白
讲清楚一些好吗?150分耶!谢谢啦!
wangzq 2000-03-05
  • 打赏
  • 举报
回复
你需要Implements ObjectControl
然后在ObjectControl_Activate中间进行GetObjectContext()的调用.
CCL 2000-03-05
  • 打赏
  • 举报
回复
可能很简单,没注册罢了。:)
littletao 2000-03-03
  • 打赏
  • 举报
回复
我试了,可以的。
你的classname也是ASPTest吗?
会不会是你的web服务器有些问题了?
Un1 2000-03-03
  • 打赏
  • 举报
回复
把此语句移出Class_Initialize放在Class级试一下。
Dim objContext As ObjectContext

7,759

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧