表单提交问题
昨天提问按照erhan的提示重写了一部分,当时问解决,可是第二天在其它电脑上试验又出现原来的问题,无法提交表单,提交后返回的页面依然是提交前的页面
- Delphi(Pascal) code
procedure TForm1.btn1Click(Sender: TObject);var ss:Tstringlist; mstr: string;begin idhtp1.HandleRedirects := true; SS := Tstringlist.Create; SS.Add('nickname=yyyyyyy'); ss.Add('birthdayYear=1980'); ss.Add('birthdayMonth=1'); ss.Add('birthdayDay=1'); ss.Add('birthdayHour=19'); ss.Add('birthdayMin=30'); ss.Add('place1=北京市'); ss.Add('place2=北京市'); ss.Add('recom='); mstr := idhtp1.Post('http://www.go108.com.cn/unit007/item00209/result.php',ss); mmo1.Lines.Add(mstr); ss.Destroy;end;
用普通网页提交表单得到的表头如下图
如何修改才能得到提交后的页面呢?还请各位再费费心
[解决办法]
童鞋,昨天跟你说了,那网站区分大小写的哟
SS.Add('nickname=yyyyyyy');
改为
SS.Add('nickName=yyyyyyy');