delphi php post,delphi idhttp post 网页,该如何解决
当前位置:我的异常网» 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 网页,该如何解决相关推荐
- 服务器不能显示中文,彻底解决delphi WebBroker服务器中文乱码 delphi WebBroker服务器不能显示中文网页 WebBroker中文显示乱码...
彻底解决delphi WebBroker服务器中文乱码 彻底解决WebBroker中文显示乱码 彻底解决delphi WebBroker服务器不能显示中文网页 这个问题被折腾惨啦! 网上一大堆,就没能 ...
- 计算机等级delphi取消,计算机二级DELPHI控件:DELPHI过滤记录的实现方法
所谓过滤就是从表中选取满足特定条件的部分记录.过滤记录首先要通过Filter.属性设置过滤条件,然后将Filtered属性设置为True,即可从数据集组件连接的表中过滤出满足条件的记录. 1.Filt ...
- Delphi7升级到Delphi 2010、Delphi XE、Delphi XE2总结 .
Delphi7升级到Delphi 2010.Delphi XE.Delphi XE2总结 这两天把一个使用Delphi2007成功升级到了Delphi2010.升级途中很艰辛,总结了 以下经验与大家分 ...
- 从 Delphi 7 到 Delphi 2010
从 Delphi 7 到 Delphi 2010 ( 一 )基本数据类型的变化2010-06-30 12:47 -------------------------------------------- ...
- 选择 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的全自动安装包 ...
- 下载delphi 5 至 delphi 2010
Delphi Distiller 是delphi爱好者都知晓的一个小工具. 从1.70版本开始,增加了下载页,包括delphi 5 至 delphi 2010 的每个版本和更新. 昨天因为换了硬盘,需 ...
- [Delphi]Python For Delphi使用大全 (转)
原始地址:http://blog.csdn.net/kernelspirit/article/details/760413 Python For Delphi搭建了Delphi和强大的脚本语言Pyth ...
- delphi选择打印机:Delphi中获取打印机设备
delphi选择打印机:Delphi中获取打印机设备名和端口名 疯狂代码 http://www.CrazyCoder.cn/ :http:/www.CrazyCoder.cn/Delphi/Artic ...
- Borland Delphi 2005对Delphi语言的支持
Borland Delphi 2005对Delphi语言的支持 Borland Delphi是Borland Delphi的最新版本,它为用户的Microsoft Windows操作系统和1.1本身的 ...
最新文章
- 二维数组c语言矩阵加法,C 语言实例 – 两个矩阵相加 - C 语言基础教程
- 解决Ubuntu双击打开 txt 中文乱码(gedit)
- Redis运维和开发学习笔记(4) Redis参数意义
- 怎样分析java进程占cpu_java进程占用cpu过高分析是哪些线程
- 畅通工程续(HDU-1874)
- linux服务器,ping没问题,http请求经常超时、时好时坏的解决办法
- python迭代对象有哪些_Python可迭代对象操作示例
- TensorFlow神经网络(九)VGG net论文阅读笔记
- linux怎么进入优盘目录,LINUX 9.0怎么挂载U盘?
- 【前端】【cornerstone】如何使用segment分割相关组件
- nodejs 中es5 模块的几种写法
- 基于华为云IoT设计的智能门锁
- Python使用Windows剪贴板
- Photoshop脚本 锁定图层组所有图层
- 路由之间的转跳及传参
- vectorvn1610报价_VECTORVN1610
- 小组查经分享《创世记》--概述
- QQ授权登录和微信授权登录
- leetcode-605. 种花问题
- 【SpringBoot】最通俗易懂的安全管理机制(Spring Security)
热门文章
- Oracle EBS使用CSV导入Oracle Form及BOM清单导入 API
- wow7.1 xd 新手教程
- python判断按键是否按下_python – 如何检查键修饰符是否被按下(shift,ctrl,alt)?
- gluster volume
- mt管理器修改迷你世界服务器,mt管理器修改迷你世界游戏代码 | 手游网游页游攻略大全...
- 安卓之位置服务(简单定位用户所在的位置)
- QT MetaImage 一款图片工具软件
- ModelWhale 云端运行 WRF 中尺度数值气象模式,随时随地即开即用的一体化工作流
- OS性能监控及优化——osw工具详解
- 鸿图之下服务器维护10月25,鸿图之下11月25日维护更新公告