错误提示:本网的这个文件,有组件的,但是空间商不让装组件!
程序来源:瑞安市安然网络科技有限公司 V2005 BUILD 1010
请问有没有解决方法??

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

Server.CreateObject 失败

/index.asp，行 5

800401f3


以下是源程序INDEX.ASP

<!-- #Include File="Include/EsmsConfig.Asp" -->
<%

Dim AnRowItEsms,TplFileUrl,TplStr
Set AnRowItEsms = Server.CreateObject("AnRowItEsms.EsmsMain"

AnRowItEsms.CheckEsmsSn(EsmsSn) '检查序列号
AnRowItEsms.ChkSqlIn '检查SQL恶意注入
AnRowItEsms.EsmsConnOpen(DatabasePath) '打开数据库
AnRowItEsms.SetEsmsLanguage(LanguageSet) '设置语言
TplStr=AnRowItEsms.ReadFile("Template/"&LanguageSet&"/Index.Html" '读取首页模板
TplStr=replace(TplStr,"{PageHead}",AnRowItEsms.ReadFile("Template/"&LanguageSet&"/Head.Html") '读取页头模板
TplStr=replace(TplStr,"{PageFoot}",AnRowItEsms.ReadFile("Template/"&LanguageSet&"/Foot.Html") '读取页尾模板
TplStr=RepSiteInfo(TplStr) '替换模板－网站配置信息
response.write AnRowItEsms.ProcessCustomTags(TplStr) '主模板多维循环

Conn.Close
Set Conn=Nothing
Set AnRowItEsms=Nothing
Response.End

%>