急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急! Indy 的 TIdHttp 的 Post 问题,实在想不到办法,求救

  • 主题发起人 主题发起人 idreamc
  • 开始时间 开始时间
I

idreamc

Unregistered / Unconfirmed
GUEST, unregistred user!
急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急急! Indy 的 TIdHttp 的 Post 问题,实在想不到办法,求救!全部分数不要嫌少! (25分)<br />当使用IdHttp对没有文件名的URL进行Post请求,总是错误,求解!

FUNCTION Search():BOOL;
VAR s:STRING;
http:TIdHttp;
para:TStringList;
BEGIN
http:=TIdHttp.Create(NIL);
para:=TStringList.Create;
http.AllowCookies:=TRUE;
HTTP.Request.ContentType := 'application/x-www-form-urlencoded';
s:='http://www.google.com/search';
para.Add('q='+'abcdefg');
para.Add('hl=zh-CN');
para.Add('lr=');
para.Add('ie=UTF-8');
para.Add('oe=UTF-8');
TRY sData:=http.Post(s,Para) Except
ON E: Exception DO BEGIN SHowMessage('Error'); END;
END;
para.Free;
http.Free;
END;
 
这里有好东东,请自己看吧
http://lui2008.8u8.com
 
我要告诉你一件事情,就是,你的这个方法来实现你的目的是没有必要的。
其实你完全可以吧这些参数信息放在url后面,一起发到浏览器。因为这些参数是搜索的,又不是
什么密码之类的,没有必要post。。
直接shellexe。。。。'http://www.google.com.cn/zh-cn...&amp;q=ddd$&amp;....'
就行了。我又一个demo。如果你感觉我的思路可以。
lovecarbe@hotmail.com
 
后退
顶部