delphi编写的ASP组件问题(100分)

我用Delphi编写了一个asp的Activex组件,在该组件中通过Socketconection与
后台的中间件服务器连接,编译注册后,在ASP页面中调用,出现如下错误:

错误类型：
(0x8000FFFF)
/myactivex/loginc.asp, 第 11 行

我的loginc.asp是:
<%
Set DelphiASPObj = Server.CreateObject("logincp.loginc")
rg=DelphiASPObj.GetKeystr()
response.write rg
rg1=DelphiASPObj.GetUserPassStr("rg","123","456")
Response.write rg1
%>

其中错误就出现在: rg1=DelphiASPObj.GetUserPassStr("rg","123","456")

GetUesrPassstr()在delphi中这样定义

function Tloginc.GetUserPassStr(const UserName, Passwords,
Cipher: WideString): Integer;
begin
With datamodule1 do
begin
if SocketConnection1.Connected =False then
begin
SocketConnection1.Connected :=True; '连接到后台应用程序服务器;
end;
Result:=1;
end;

end;

经过测试发现问题出现在Socketconection与后台连接时,但我在设计阶段直接将
Socketconection的connection属性设为Ture,有能够连接到后台,那么为何会
出现以上错误呢?

g

你的答案在那儿

我已经解决了

多人接受答案了。