ActiveX 访问 Web Service问题

HsWong 2010-11-19 02:35:15
我编写的ActiveX插件,通过THTTPRIO访问Web Service,在IE6、IE7都用正常工作,但在IE8上报AC错误。

//取Web Service接口
function GetMapXSoap(UseWSDL: Boolean; Addr: string; HTTPRIO: THTTPRIO): MapXSoap;
const
defWSDL = 'http://192.168.1.48/MapX/mapX.asmx?WSDL';
defURL = 'http://192.168.1.48/MapX/mapX.asmx';
defSvc = 'MapX';
defPrt = 'MapXSoap';
var
RIO: THTTPRIO;
begin
Result := nil;
if (Addr = '') then
begin
if UseWSDL then
Addr := defWSDL
else
Addr := defURL;
end;
if HTTPRIO = nil then
RIO := THTTPRIO.Create(nil)
else
RIO := HTTPRIO;
RIO.HTTPWebNode.UseUTF8InHeader := true;
try
Result := (RIO as MapXSoap);
if UseWSDL then
begin
RIO.WSDLLocation := Addr;
RIO.Service := defSvc;
RIO.Port := defPrt;
end else
RIO.URL := Addr;
finally
if (Result = nil) and (HTTPRIO = nil) then
RIO.Free;
end;
end;

//调用
function TMapXServices.Select(const DBIndex: Integer; const Where,
CustomTable: string): TXmlDataSet;
var
Json: string;
begin
try
//取单个项目
Json := GetMapXSoap.Select(DBIndex, Where, CustomTable);
Result := JsonToXmlDataSet(Json);
except
on E: Exception do
begin
Result := nil;
FLastError := E.Message;
TAppUtils.WriteErrorFile('TMapXServices.Select:' + FLastError);
end;
end;
end;



大家有没遇到此情况?怎么解决?谢谢!
...全文
146 5 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
亮剑_ 2010-11-22
  • 打赏
  • 举报
回复
安全性设置原因?
HsWong 2010-11-22
  • 打赏
  • 举报
回复
哗,bdmh的星星好耀眼!
likeyrain 2010-11-19
  • 打赏
  • 举报
回复
那很或能是网页方面的问题
whisht 2010-11-19
  • 打赏
  • 举报
回复
IE8

MS非要把人折磨死不可
bdmh 2010-11-19
  • 打赏
  • 举报
回复
只能是对ie8研究不深,ie8确实出现了很多问题,无解

1,594

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 网络通信/分布式开发
社区管理员
  • 网络通信/分布式开发社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧