用delphi写asp组件的问题。来者有分！急！急！急！急！急！

Question

我刚开始学用delphi写asp组件，遇到一个问题。请各位老大帮忙。
我有这么一个函数，为了测试用！
function Tfunctiontest.outmethod(Param1: Integer): Integer;
var
tempint:integer;
begin
   tempint:=Param1+100;
   result:=tempint;
end;在asp中这么用的。
<%
   dim param
   Set DelphiASPObj = Server.CreateObject("Profunc.functiontest") 
   set param=DelphiASPObj.outmethod(10)
   response.write param
%>
现在浏览的时候报500错误！
请各位高手帮帮我啊！谢谢了。

Answer 1

试用：
dim DelphiASPObj
   Set DelphiASPObj = Server.CreateObject("Profunc.functiontest") 
iInput=10
param=DelphiASPObj.outmethod(iInput+0)

Answer 2

andytang03() 非常感谢，问题解决了。
不过我想知道错误的原因，能劳驾解释一下吗？
分数马上就兑现。
太谢谢你了。

Answer 3

andytang03() 
我还想问一个问题。
如果我想带一个字符串进来。
那么我在
function Tfunctiontest.outmethod(Param1: Integer): Integer;
var
tempint:integer;
begin
   tempint:=Param1+100;
   result:=tempint;
end;
里怎么设置Param1的变量类型呢？

Answer 4

首先，dim DelphiASPObj定义变量；Set DelphiASPObj = Server.CreateObject("Profunc.functiontest") 给DelphiASPObj
赋值。然后才能调用里面的方法。参数如果是INTEGER，则参数+0，如果是STRING，则参数传递时用    参数&""    。DELPHI中STRING在方法定义时用BSTR* ,即widestring.没有string类型。其余可用variant*