Отправить POST-запрос на сервер

[sarmat84]

Здравствуйте форумчане.Кто может подскажите.Есть сайт http://gzakupki.ru/guide/supplier.aspx. Запуская поиск с любым символом, в таблице появляется результат поиска и количество найденых страниц.Проблема в следующем: каким образом программно перейти на любую страницу. Я пробую отправлять POST-запрос с параметрами, которые уловил снифером, но программа выдаёт ошибку "Invalid argument to date encode".Подскажите что я делаю не так?
листинг:

data := TIdMultiPartFormDataStream.Create;

data.AddFormField('__EVENTTARGET', ' ');
data.AddFormField('__EVENTARGUMENT' , '');
data.AddFormField('ctl00_Navigation _NavigationBarGS', '0;0;0;0;1;0;0;0;0;0;0;0;0;0;0');
data.AddFormField('ctl00$Login$txtL ogin', '');
data.AddFormField('ctl00$Login$txtP assword', '');
data.AddFormField('search', '');
data.AddFormField('DXScript', '1_42,1_75,1_60,2_34,2_41,2_27,1_52 ,1_66,3_7,2_30,1_41');
data.AddFormField('ctl00_ContentHol der_txtOrganizationName_Raw', '0');
data.AddFormField('ctl00$ContentHol der$txtOrganizationName', '0');
data.AddFormField('ctl00$ContentHol der$chkConform', 'I');
data.AddFormField('ctl00$ContentHol der$grdSupplier$DXSelInput', '');
data.AddFormField('ctl00$ContentHol der$grdSupplier$DXKVInput', '[]');
data.AddFormField('DXScript', '1_42,1_75,1_60,2_34,2_41,2_27,1_52 ,1_66,3_7,2_30,1_41');
data.AddFormField('__CALLBACKID', 'ctl00$ContentHolder$grdSupplier');
data.AddFormField('__CALLBACKPARAM' , 'c0:KV|2;[];GB|20;12|PAGERONCLICK3|PN1;');

St:= Utf8ToAnsi(IdHTTP1.Post('http://gzakupki.ru/guide/supplier.aspx', data));
Memo1.Lines.Add(St);

[Mifody]

__VIEWSTATE
__EVENTVALIDATION

этоэ ASP'шный сайт, кто-то из этих двух нужен наверняка

[sarmat84]

Пробывал __VIEWSTATE и __EVENTVALIDATION не помогает. __VIEWSTATE вообще абракодабра размером с лист А4.Главное поиск могу запустить программно даже без этих параметров, а вот по страницам пройтись не могу.

[Usov]

А в чем собственно проблема? Поиск умеете запускать, далее спарсите нужные ссылки, и GET запросом получите их содержимое. У меня работатет без проблем:

var
  s: String;
begin
  s := IdHTTP1.Get('http://gzakupki.ru/guide/supplierdet.aspx?supplierInn=7724727192');
  Memo1.Lines.Text := UTF8Decode(s);

[sarmat84]

Да у меня тоже работает.Но мне необходимо именно переходить по страницам.При вводе символа в поиске появляется список страниц.Так как ИНН может быть 10-ти или 12-ти значным, то они появляются все вместе.