用TIdHTTP调用一个cgi程序,老是提示HTTP/1.1 302 Found,我用了get和post方法都不行,而这个cgi在IE中是可以直接调用的。
附代码如下:
var
data: TIdMultiPartFormDataStream;
begin
try
data.AddFormField('dn', '21cn.com');
Memo1.Lines.Text := IDHTTP1.Post('http://www.allwhois.com/cgi-bin/allwhois.cgi', data);
//get也不行
//Memo1.Lines.Text :=IDHTTP1.get('http://www.allwhois.com/cgi-bin/allwhois.cgi');
finally
data.Free;
end;end;
附代码如下:
var
data: TIdMultiPartFormDataStream;
begin
try
data.AddFormField('dn', '21cn.com');
Memo1.Lines.Text := IDHTTP1.Post('http://www.allwhois.com/cgi-bin/allwhois.cgi', data);
//get也不行
//Memo1.Lines.Text :=IDHTTP1.get('http://www.allwhois.com/cgi-bin/allwhois.cgi');
finally
data.Free;
end;end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货