delphi http请求返回问题

[gongqs]

从一个接口地址,用户名和密码，两个参数（订单号，产品号），查询产品明细数据信息。应该要怎么写语句呀,参照网络上面的,
url:= 'http://aa.aabo.cn:8088/WebService/QRService.asmx/GetHgzForALL",{"account": "user1","password": "user123","data": [{"productCode": "010059252","quantity": "2"}]}'
jsonstr := IdHTTP.Get(url);
是哪边错了呀提示"http/1.1 400 bad request"

[wallace_xie]

是webservice，没必要用http控件来获取结果，直接调用webservice就可以了。

[缘中人]

参考这种写法 http://blog.csdn.net/cb168/article/details/8817830

[gongqs]

能不能给一个示例呀。不会正在学

[**Dragon**]

这是因为接口的返回 status code : 400 ,但是你使用的 post 方法不支持这种状态的问题！你要解决的是怎么让请求支持 code = 400的返回。解决了，可以分享下，我现在也在这个坑里面。哈哈

[qtc26]

发一个我的通用版
sendrecord=record
ord:integer;
num:string;
url:string;
host:string;
refer:string;
useragent:string;
accept:string;
myheader:string;
cookie:string;
postdata:string;
acceptencoding:string;
contenttype:string;
ProxyServer:string;
ProxyPort:integer;
image:tmemorystream;
yzm:string;
tag:string;
end;
var
send:sendrecord;
send.url:='http://aa.aabo.cn:8088/WebService/QRService.asmx/GetHgzForALL';
send.postdata:='{"account": "user1","password": "user123","data": [{"productCode": "010059252","quantity": "2"}]}'';
if (send.postdata='') and (post=false) then gethttp.Get(send.url,response)
else
begin
postd:=tstringstream.Create('');
try
postd.WriteString(send.postdata);
http.Request.ContentLength:=postd.Size;
http.post(send.url,postd,response);
finally
postd.Free;
end;
end;
直接用get应该也可以要改下格式，send.url:=send.url+'&account='+'user1'+'&password='+'user123'+...

[落单的拖鞋]

把网站发我，可以做个样例给你