好东西呀 丢上来了以后我会再次用到就不用瞎翻了用Post提交数据
大鸟哥说ContentType很重要哩
Delphi代码
- Var
- Url :String;
- TAction :TStringStream;
- begin
- Url :='XXXXXXXXXXXXX?Dis_Province=11';
- TAction :=TStringStream.Create('');
- IdAntiFreeze1.OnlyWhenIdle :=False;
- TAction.WriteString('__EVENTTARGET=DropDownList_Page&DropDownList_Page=3');
- IdHTTP1.Request.SetHeaders;
- IdHTTP1.Request.Referer :=Url;
- IdHTTP1.Request.ContentType :='application/x-www-form-urlencoded';
- ShowMessage(IdHTTP1.Post(Url,TAction));
- end;
