求救 delphi7开发webservice问题

[yangzongling]

我用delphi7建立了一个 webservice项目最后编译到iis上面发布，程序是可以跑起来，但是如果用到数据库控件就会报

错“org.apache.axis.AxisFault:Access violation at address 0232A764 in module 'project1.dll'.Read of address ” 麻烦哪位用过

delphi7开发过webservice的高手帮看看,我用的是wsCaller.jar来测试的，还有有没有更好的测试webservice的方法

function Tmain.Deduction(Shopno,openid:string;money:integer):string;
var
bs,cardid:string;
jifen,kj_money:integer;
sjkj_money:integer;
begin
/////如果不执行这段是正常的
WebModule1.ADOQuery1.Close;
WebModule1.ADOQuery1.SQL.Clear;
WebModule1.ADOQuery1.SQL.Add('select * from Wechatinfo where WCIOPENID='''+trim(openid)+'''');
WebModule1.ADOQuery1.Open;
/////如果不执行这段是正常的
result:='aaaaa'
end

[lyhoo163]

多数情况是TADOConnection连接未成功，open就会出错。 置疑数据库的连接，找原因。

[jjpweb]

上下加入CoInitialize和CoUninitialize试试

[yangzongling]

to jjpweb 还是报错，麻烦再帮看看，谢谢

[jouky]

问题解决了吗；我也碰到类似问题，求解

[pcwe2002]

http://blog.csdn.net/pcwe2002/article/details/52527782 示例中包括通过写存储过程提供返回 http json，比webservice高效