读书人

delphi idhttp post 网页解决办法

发布时间: 2013-07-01 12:33:04 作者: rapoo

delphi idhttp post 网页
用httpwath 抓包工具下来的提交数据

POST /login.php?forward=http%3A%2F%2Fmy.2345.com HTTP/1.1
Accept: image/gif, image/jpeg, image/pjpeg, image/pjpeg, application/x-shockwave-flash, application/vnd.ms-excel, application/msword, */*
Referer: http://login.2345.com/login.php?forward=http%3A%2F%2Fmy.2345.com
Accept-Language: zh-cn
User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; QQDownload 714)
Content-Type: application/x-www-form-urlencoded
Accept-Encoding: gzip, deflate
Host: login.2345.com
Content-Length: 135
Connection: Keep-Alive
Cache-Control: no-cache
Cookie: goHd=; site_str=; localNav=; lastLogin=; sts=1; lc2=54511; wc=54511; lc=54511; wc_n=%25u5317%25u4EAC; gy=setM%2ClastLogin2012-9-3%252013%253A9%253A29%2C; name_ie=%25115%25121%25115%25116%25101%25109%25116%25101%25115%25116; validatenum=8b519f198dd26772e3e82874826b04aa; email=localhhost@localhost.localhost; ggbd=0; code_str=; mystyle_display=; theme=0; theme_logo=0; wc_sf=; __utma=62515951.1042536828.1346641565.1346641565.1346641565.1; __utmz=62515951.1346641565.1.1.utmcsr=2345.com|utmccn=(referral)|utmcmd=referral|utmcct=/; finished_online1161895=1; zcValue_u=08d017227bb3ec0145e88cebd20e9da4; zcValue_lo=4a584ce72b09f1b7f0c538b3a8bd9b28; iden=89c50900e524d1607f9ce370de255c44; PHPSESSID=ec1d3t12ruppmaell3obf44gq4; validatenum=046ddf96c233a273fd390c3d0b1a9aa4

cmd=login&forward=http%3A%2F%2Fmy.2345.com&password=54b53072540eeeb8f8e9343e71f28176&username=systemtest&pwd=system&check_code=&button=


代码
procedure TForm1.Button2Click(Sender: TObject);
Var
Response:string;
Paramstr:Tstringlist;
IdHTTP1:Tidhttp;
begin
IdHTTP1:=Tidhttp.create(nil);
Paramstr:= TStringList.Create;
Paramstr.Add('username=system');
Paramstr.Add('password=systemtest');

IdHTTP1.Request.Referer := 'http://login.2345.com/login.php?forward=http%3A%2F%2Fmy.2345.com';
IdHTTP1.Request.ContentType := 'application/x-www-form-urlencoded';
IdHTTP1.Request.UserAgent := 'Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; QQDownload 714)';
IdHttp1.Request.SetHeaders;
IdHttp1.Request.CustomHeaders.add('Cookie: goHd=; site_str=; localNav=; lastLogin=; sts=1; lc2=54511; wc=54511; lc=54511; wc_n=%25u5317%25u4EAC; gy=setM%2ClastLogin2012-9-3%252013%253A9%253A29%2C;');
IdHttp1.Request.CustomHeaders.add(' name_ie=%25115%25121%25115%25116%25101%25109%25116%25101%25115%25116; validatenum=8b519f198dd26772e3e82874826b04aa; email=localhhost@localhost.localhost; ggbd=0; ');
IdHttp1.Request.CustomHeaders.add('code_str=; mystyle_display=; theme=0; theme_logo=0; wc_sf=;');
IdHttp1.Request.CustomHeaders.add(' __utma=62515951.1042536828.1346641565.1346641565.1346641565.1; __utmz=62515951.1346641565.1.1.utmcsr=2345.com|utmccn=(referral)|utmcmd=referral|utmcct=/;');
IdHttp1.Request.CustomHeaders.add(' finished_online1161895=1; zcValue_u=08d017227bb3ec0145e88cebd20e9da4; zcValue_lo=4a584ce72b09f1b7f0c538b3a8bd9b28; iden=89c50900e524d1607f9ce370de255c44;');
IdHttp1.Request.CustomHeaders.add(' PHPSESSID=ec1d3t12ruppmaell3obf44gq4; validatenum=046ddf96c233a273fd390c3d0b1a9aa4');
IdHttp1.Request.CustomHeaders.add('cmd=login&forward=http%3A%2F%2Fmy.2345.com&password=54b53072540eeeb8f8e9343e71f28176&username=systemtest&pwd=system&check_code=&button=');


Response:=IdHTTP1.Post('http://login.2345.com/login.php?forward=http%3A%2F%2Fmy.2345.com', Paramstr);
showmessage(Response);
Freeandnil(IdHTTP1);
Paramstr.Free;

end;

提交总是不成功

测试账号:system
测试密码:systemtest
测试网址:http://login.2345.com/login.php?forward=http%3A%2F%2Fmy.2345.com


应该可以了。嘿嘿
http://my.csdn.net/my/code/detail/18587

读书人网 >.NET

热点推荐