谁写过被ASP调用的组件，我写的最简单都不运行，我出100分买一个最简单的例子。

[workboy]

出现错：
Microsoft VBScript 运行时错误 错误 '800a01b6'

对象不支持此属性或方法: 'ttinfo'

/com/mytest.asp，行 9

[workboy]

在线等候

[zihan]

你是怎么创建的??创建的时候最好不要直接创建com对象,也就是File->New->Others->ActivexLibrary,然后File->New->Others->ActiveX server object.不要直接加com object
因为vb里面的不存在虚方法表,所以可以通过这样的方法创建一个asp可以调用的.

[workboy]

能用QQ联系以下吗？我的QQ:65065459
我马上给分！

[aiirii]

http://hubdog.csdn.net/Download/dlIndex.htm

基于Indy的Email发送组件源码 [下载]
用法示意如下：
<%@LANGUAGE="VBSCRIPT"%>
<%
'option explicit
dim DbConn,connstr,db
'Email配置信息
dim SmtpHost, AdminName, AdminEmail, NeedAuth, EmailAccount, EmailPW
SmtpHost="smtp.263.net"
AdminEmail="[e-mail]"
NeedAuth=true '是否需要认证
EmailAccount="hubdog"
EmailPW="XXXX"
AdminName="管理员"
'发送email
function SendMail(Email, Subject, Body)
set MailSender=Server.CreateObject("IndyMail.MailSender")
MailSender.SetBody Body
MailSender.SetFrom """"+AdminName+""" <"+AdminEmail+">"
MailSender.SetHost SmtpHost
MailSender.SetAuth NeedAuth
MailSender.SetSenderName EmailAccount
MailSender.SetSenderPW EmailPW
MailSender.SetSubject Subject
MailSender.SetTo Email
SendMail=MailSender.Send
end function
%>

[eboywy]

是不是没有注册组件？

[zihan]

就是我说的那种方法,就ok,他会自动帮你创建一个asp文件,上面会有测试的调用方法,我原来做过的.没有问题.22282874