当前位置:我的异常网» Delphi » delphi idhttp post 网页,该如何解决

delphi idhttp post 网页,该如何解决

www.myexceptions.net  网友分享于:2014-03-01  浏览:5次

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

------解决方案--------------------

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

全放到Paramstr中,cookie用cookiemanager自动管理

------解决方案--------------------

应该可以了。嘿嘿

http://my.csdn.net/my/code/detail/18587

文章评论

delphi php post,delphi idhttp post 网页,该如何解决相关推荐

  1. 服务器不能显示中文,彻底解决delphi WebBroker服务器中文乱码 delphi WebBroker服务器不能显示中文网页 WebBroker中文显示乱码...

    彻底解决delphi WebBroker服务器中文乱码 彻底解决WebBroker中文显示乱码 彻底解决delphi WebBroker服务器不能显示中文网页 这个问题被折腾惨啦! 网上一大堆,就没能 ...

  2. 计算机等级delphi取消,计算机二级DELPHI控件:DELPHI过滤记录的实现方法

    所谓过滤就是从表中选取满足特定条件的部分记录.过滤记录首先要通过Filter.属性设置过滤条件,然后将Filtered属性设置为True,即可从数据集组件连接的表中过滤出满足条件的记录. 1.Filt ...

  3. Delphi7升级到Delphi 2010、Delphi XE、Delphi XE2总结 .

    Delphi7升级到Delphi 2010.Delphi XE.Delphi XE2总结 这两天把一个使用Delphi2007成功升级到了Delphi2010.升级途中很艰辛,总结了 以下经验与大家分 ...

  4. 从 Delphi 7 到 Delphi 2010

    从 Delphi 7 到 Delphi 2010 ( 一 )基本数据类型的变化2010-06-30 12:47 -------------------------------------------- ...

  5. 选择 Delphi 2007 ( CodeGear Delphi 2007 for Win32 Version 11.0.2837.9583 ) 的理由

    选择 Delphi 2007 ( CodeGear Delphi 2007 for Win32 Version 11.0.2837.9583 ) 的理由 我不喜欢用InstallRite的全自动安装包 ...

  6. 下载delphi 5 至 delphi 2010

    Delphi Distiller 是delphi爱好者都知晓的一个小工具. 从1.70版本开始,增加了下载页,包括delphi 5 至 delphi 2010 的每个版本和更新. 昨天因为换了硬盘,需 ...

  7. [Delphi]Python For Delphi使用大全 (转)

    原始地址:http://blog.csdn.net/kernelspirit/article/details/760413 Python For Delphi搭建了Delphi和强大的脚本语言Pyth ...

  8. delphi选择打印机:Delphi中获取打印机设备

    delphi选择打印机:Delphi中获取打印机设备名和端口名 疯狂代码 http://www.CrazyCoder.cn/ :http:/www.CrazyCoder.cn/Delphi/Artic ...

  9. Borland Delphi 2005对Delphi语言的支持

    Borland Delphi 2005对Delphi语言的支持 Borland Delphi是Borland Delphi的最新版本,它为用户的Microsoft Windows操作系统和1.1本身的 ...

最新文章

  1. 二维数组c语言矩阵加法,C 语言实例 – 两个矩阵相加 - C 语言基础教程
  2. 解决Ubuntu双击打开 txt 中文乱码(gedit)
  3. Redis运维和开发学习笔记(4) Redis参数意义
  4. 怎样分析java进程占cpu_java进程占用cpu过高分析是哪些线程
  5. 畅通工程续(HDU-1874)
  6. linux服务器,ping没问题,http请求经常超时、时好时坏的解决办法
  7. python迭代对象有哪些_Python可迭代对象操作示例
  8. TensorFlow神经网络(九)VGG net论文阅读笔记
  9. linux怎么进入优盘目录,LINUX 9.0怎么挂载U盘?
  10. 【前端】【cornerstone】如何使用segment分割相关组件
  11. nodejs 中es5 模块的几种写法
  12. 基于华为云IoT设计的智能门锁
  13. Python使用Windows剪贴板
  14. Photoshop脚本 锁定图层组所有图层
  15. 路由之间的转跳及传参
  16. vectorvn1610报价_VECTORVN1610
  17. 小组查经分享《创世记》--概述
  18. QQ授权登录和微信授权登录
  19. leetcode-605. 种花问题
  20. 【SpringBoot】最通俗易懂的安全管理机制(Spring Security)

热门文章

  1. Oracle EBS使用CSV导入Oracle Form及BOM清单导入 API
  2. wow7.1 xd 新手教程
  3. python判断按键是否按下_python – 如何检查键修饰符是否被按下(shift,ctrl,alt)?
  4. gluster volume
  5. mt管理器修改迷你世界服务器,mt管理器修改迷你世界游戏代码 | 手游网游页游攻略大全...
  6. 安卓之位置服务(简单定位用户所在的位置)
  7. QT MetaImage 一款图片工具软件
  8. ModelWhale 云端运行 WRF 中尺度数值气象模式,随时随地即开即用的一体化工作流
  9. OS性能监控及优化——osw工具详解
  10. 鸿图之下服务器维护10月25,鸿图之下11月25日维护更新公告