(1)在delphi内怎么用inet来自动post数据给页面啊!
(2)怎么对应下面的包信息,来填写inet控件里的第三个和第四个参数????我参照网上很多vb资料写的,
var
url , FormData , SendHeader : String;begin
url := 'http://63.221.80.120/app/member/m_message/m_message_r.php';
FormData := 'gid%3D'+gid1+'%26uid%3D'+uid1+'%26long%3D'+long1+'%26type%3D'+type1;
SendHeader := 'Content-Type: application/x-www-form-urlencoded';inet1.Execute(url,'post',FormData,SendHeader);
inet1.Cancel;
end;结果一点反应都没有,而且,用抓包工具看,根本没有POST的动作!是不是FormData或者SendHeader的出错啊,那为大哥帮忙看看页面抓包信息如下:
POST /app/member/m_message/m_message_r.php HTTP/1.1
Accept: */*
Referer: http://221.135.6.89/app/member/m_message/m_message_r.php?gid=129&uid=ac15de88&type=H&num=0089&long=C
Accept-Language: zh-cn
Content-Type: application/x-www-form-urlencoded
UA-CPU: x86
Accept-Encoding: gzip, deflate
User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.2; SV1; QQDownload 1.7; Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1) ; .NET CLR 1.1.4322; CIBA; .NET CLR 2.0.50727; .NET CLR 3.0.04506.30)
Host: 221.135.6.89
Content-Length: 268
Connection: Keep-Alive
Cache-Control: no-cachegid=129&uid=ac15de88&long=C&type=3----------------------------------------------------------------------
(2)怎么对应下面的包信息,来填写inet控件里的第三个和第四个参数????我参照网上很多vb资料写的,
var
url , FormData , SendHeader : String;begin
url := 'http://63.221.80.120/app/member/m_message/m_message_r.php';
FormData := 'gid%3D'+gid1+'%26uid%3D'+uid1+'%26long%3D'+long1+'%26type%3D'+type1;
SendHeader := 'Content-Type: application/x-www-form-urlencoded';inet1.Execute(url,'post',FormData,SendHeader);
inet1.Cancel;
end;结果一点反应都没有,而且,用抓包工具看,根本没有POST的动作!是不是FormData或者SendHeader的出错啊,那为大哥帮忙看看页面抓包信息如下:
POST /app/member/m_message/m_message_r.php HTTP/1.1
Accept: */*
Referer: http://221.135.6.89/app/member/m_message/m_message_r.php?gid=129&uid=ac15de88&type=H&num=0089&long=C
Accept-Language: zh-cn
Content-Type: application/x-www-form-urlencoded
UA-CPU: x86
Accept-Encoding: gzip, deflate
User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.2; SV1; QQDownload 1.7; Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1) ; .NET CLR 1.1.4322; CIBA; .NET CLR 2.0.50727; .NET CLR 3.0.04506.30)
Host: 221.135.6.89
Content-Length: 268
Connection: Keep-Alive
Cache-Control: no-cachegid=129&uid=ac15de88&long=C&type=3----------------------------------------------------------------------
解决方案 »
- 请问c语言的putc函数,怎么转换成delphi的?
- 有一关于活动边框的问题,急!各位大哥指点一下
- 用Idsmtp 发送邮件,怎么对方显示成垃圾邮件,怎么搞的,那位大侠知道?谢谢!
- 调用readln读取文件怎么总停留在第一行?
- 配置文件与ADOConnection
- DLLProc和ExitProc有什么区别???
- 我想做个可以远程发送指令给服务器,服务器做相关动作
- xe5的ANDROID获取屏幕色深失败。请帮看看是怎么回事?
- 关于数据库中SESSION的问题
- 一个非常奇怪的问题!——我将IMAGE中的图象保存到数据库中,但是程序每启动一次只能成功存储一幅图,其余的都变花了,很难看,这是怎么回事???!!!
- 我想将鼠标放在控件的四个角或者四条边上,然后可以拖动鼠标使它变大、缩小,该怎样做呢?謝謝!(100)
- 如何利用Delphi访问远程SQLServer数据库?
url := 'http://221.135.6.89/app/member/m_message/m_message_r.php';