求一个ASP调用DELPHI编写COM组件的例子！！（在线等） ( 积分: 50 )

要求很简单，就是用DELPHI写一个最简单的COM组件供ASP调用，COM组件里面就带个求和的函数就可以了，要求ASP能够显示出返回值来，用不了你们5分钟时间，拿分的大好机会！！

跟贴或者发到我邮箱都可以
coolkillerjmq@163.com

要求很简单，就是用DELPHI写一个最简单的COM组件供ASP调用，COM组件里面就带个求和的函数就可以了，要求ASP能够显示出返回值来，用不了你们5分钟时间，拿分的大好机会！！

跟贴或者发到我邮箱都可以
coolkillerjmq@163.com

摘自 网际快车 的jc_link.htm 希望有所帮助

<script language=&quot;VBScript&quot;>


Sub AddLink(Url,Info)
On Error Resume Next
set JetCarCatch=CreateObject(&quot;JetCar.Netscape&quot
if err<>0 then
MsgBox(&quot;FlashGet not properly installed!&quot;+ vbCrLf+&quot;Please install FlashGet again&quot
else
call JetCarCatch.AddUrl(Url, Info, external.menuArguments.document.Url)
end if
end sub


</script>
其中JetCar.Netscape是com接口,而addurl是接口的method

我现在的问题不是出在调用程序上面，我现在的问题是在COM组件上面，也就是说我的COM组件做的可能有问题

1 建ActiveX Library
2 建ActiveX Server Object
3 在接口里面添加属性和方法
4 在方法里面调用属性
5 注册Run->Register Active Server
6 写ASP程序调用

接受答案了.