Asp高手帮忙看看这段代码？

Server 对象 错误 'ASP 0177 : 800401f3'

Server.CreateObject 失败

/index.asp，行 230

800401f3

dim adorst

dim objWebNews

set adorst= Server.CreateObject("ADODB.RecordSet")

set objWebNews= Server.CreateObject("SMESWEBObj.WebNews")

set adorst=objWebNews.Query( ,NewsTitle,Flag)

'lmgZz 051017

'//查询所需变量

'从外部和自身得到的变量

NewsTitle2=Request("NewsTitle")

Flag="2"

dim adorst2

set adorst2= Server.CreateObject("ADODB.RecordSet")

set adorst2=objWebNews.Query( ,NewsTitle,Flag)

SMESWEBObj.WebNews

这个组件没有注册,找到这个.dll文件

在运行里输入

regsvr32 组件路径.dll回车注册就好了