我用delphi7中idhttp控件做一个自动登陆网页的程序。在post数据的时候总是出现一个“http1.1 /302 found”的错误。
代码如下:
procedure TForm1.Button1Click(Sender: TObject);begin
poststr := tstringlist.Create;
poststr.add('username=XXXX');
poststr.add('password=XXXX');
poststr.add('utoLogin=true');
poststr.add('ourl=http%3A%2F%2Fwww.56.com%2F%3F8401');
idhttp1.HandleRedirects := true;
str := idhttp1.post('http://XXXXX.com/php/urs.php', poststr);
memo1.Text := system.UTF8Decode(str);
poststr.Free;
end;
如果把idhttp1.HandleRedirects := false;就出现“http/1.1 404”错误。
同样抓包回来的数据用VB写的程序post的时候就没有问题,所以数据应该是没有问题的。
代码如下:
procedure TForm1.Button1Click(Sender: TObject);begin
poststr := tstringlist.Create;
poststr.add('username=XXXX');
poststr.add('password=XXXX');
poststr.add('utoLogin=true');
poststr.add('ourl=http%3A%2F%2Fwww.56.com%2F%3F8401');
idhttp1.HandleRedirects := true;
str := idhttp1.post('http://XXXXX.com/php/urs.php', poststr);
memo1.Text := system.UTF8Decode(str);
poststr.Free;
end;
如果把idhttp1.HandleRedirects := false;就出现“http/1.1 404”错误。
同样抓包回来的数据用VB写的程序post的时候就没有问题,所以数据应该是没有问题的。
解决方案 »
- 散分了,三个三角了~~
- Image图片透明显示问题,我在picture的属性里导入图片是透明的,而用canvas画图时却又变成不透明的了(Transparent我已设为true)
- 编写组件遇到个问题,,麻烦各位解答
- 如何调用VC编写的DLL,DLL中只含有一个类,需在Delphi中重载调用
- 北京出售全新《Borland Delphi管理信息系统开发案例》
- 芳,今天是我们恋爱二周年,再次说声:我爱你!
- delphi调用wervice出错
- 在线帮忙!!!!分5000
- 编译错误:提示找不到Proxies.pas文件,这是怎么回事??????
- 计划任务中'唤醒计算机运行该任务'是如何实现的?
- Delphi 文件本的输入法总是自动加载如何处理
- 大家帮忙看看这样的表 用什么表格控件能实现 dbgrideh cxgrid 能实现吗?
RT!