Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Интернет и сети
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 13.04.2008, 15:02
Аватар для The Shadow
The Shadow The Shadow вне форума
Продвинутый
 
Регистрация: 11.06.2007
Адрес: Уфа, Россия
Сообщения: 793
Репутация: 35
По умолчанию Авторизация на сайтах ucoz

Как авторизоваться на сайте работающем в системе ucoz
Код:
var
Header: TIdMultiPartFormDataStream;
begin
Header:=TIdMultiPartFormDataStream.Create;
Header.AddFormField('user', 'Айдар');
Header.AddFormField('password', '------');
Header.AddFormField('rem', '1');//скрытое поле
Header.AddFormField('a', '0');//скрытое поле
Header.AddFormField('s', '0');//скрытое поле
Header.AddFormField('c', '0');
//Header.AddFormField('sbm', 'Вход');
Memo1.Lines.Text:=IdHTTP1.Post('http://aidar.3dn.ru/index/', Header);
Header.Free;
В Memo выводится код главной страницы сайта, но я не авторизован. Что не так?
__________________
Что делать, когда сломался комп:
1. Если вы юзер - делать ноги.
2. Если ремонтник - делать деньги.
3. Если вы программист - делать вид, что так было задумано.
Ответить с цитированием
 


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 13:04.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025