这是什么意思啊Microsoft VBScript 运行时错误 (0x800A01AD)

adsl2008 2004-01-14 10:41:20

错误类型：
Microsoft VBScript 运行时错误 (0x800A01AD)
代码如下：
Private objRequest as Request
Private objResponse as Response
Private objServer as Server
Private objSession as Session
Private objApplication as Application

Public Sub onstartpage(sc As ScriptingContext)
' 创建 asp 对象,这样下面的 objRequest...就可以和在 vb 中一样简单了
Set objRequest = sc.Request
Set objResponse = sc.Response
Set objServer = sc.Server
Set objSession = sc.Session
Set objApplication = sc.application
End Sub

Public Sub WriteCopyright()
objResponse.Write "你好！<br>"
objResponse.Write "<a href=http://www.163.net>网易</a>"
End Sub

asp中的部分代码

<%
Set testCom = createObject("testCom.testWrite")
testCom.WriteCopyright
%>

请问各位高手，这那里错了啊

...全文

211 10 打赏收藏转发到动态举报

写回复

用AI写文章

10 条回复

切换为时间正序

请发表友善的回复…

发表回复

xieyj 2004-01-15

打赏
举报

是组件问题

xieyj 2004-01-15

打赏
举报

我也想知道，up！

anddytang 2004-01-15

打赏
举报

写ActiveX dll 时首先要创建一个引用！！

adsl2008 2004-01-15

打赏
举报

我注册过了

x_gn 2004-01-15

打赏
举报

组件错误，检查一下你的组件代码吧

纪俊 2004-01-15

打赏
举报

try

Set testCom = createObject("testCom.testWrite")

-->

Set testCom = Sever.CreateObject("testCom")

yangsm 2004-01-14

打赏
举报

使用控件都是要注册的！

mouseanAnya 2004-01-14

打赏
举报

Set testCom = createObject("testCom.testWrite") '????

Set testCom = server.createObject("testCom.testWrite")

testCom是楼主自己写的activeX dll,或者activeX ocx控件吧?使用前需要到系统注册一下

mouseanAnya 2004-01-14