RedBull@12
16.11.2006, 08:46
Здравствуйте,Уважаемые Античатовцы.
Вот как-то сидел за компом и не знал что делать,тут меня посетила замечательная мысль написать прогу на Delph'е. Смысл проги ходить по интету по определенным сайтам и собирать информацию из аккаунта.
Все начиналось довольно хорошо, но появилась загвоздка...а именно мне нужно сформировать POST запрос к серверу и получить от сервера ответ и куки.
а вот вроде пишу правильно, но при прогонке делфа мне выдает ошибку сокета #10061
begin
tL := TStringList.Create;
tL.Add('cf=akk-login');
tL.Add('ulogin='+ login );
tL.Add('pass='+pass);
tL.Add('imageField.x='+xs2);
tL.Add('imageField.y'+ys2);
try
IdHTTP1.post(adres,tL);
finally
tL.Free;
end;
end;
Что здесь написано не правильно?
Вот как-то сидел за компом и не знал что делать,тут меня посетила замечательная мысль написать прогу на Delph'е. Смысл проги ходить по интету по определенным сайтам и собирать информацию из аккаунта.
Все начиналось довольно хорошо, но появилась загвоздка...а именно мне нужно сформировать POST запрос к серверу и получить от сервера ответ и куки.
а вот вроде пишу правильно, но при прогонке делфа мне выдает ошибку сокета #10061
begin
tL := TStringList.Create;
tL.Add('cf=akk-login');
tL.Add('ulogin='+ login );
tL.Add('pass='+pass);
tL.Add('imageField.x='+xs2);
tL.Add('imageField.y'+ys2);
try
IdHTTP1.post(adres,tL);
finally
tL.Free;
end;
end;
Что здесь написано не правильно?