Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Работа с сетью в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 13.03.2009, 12:11   #1
tuftel
 
Регистрация: 13.03.2009
Сообщений: 6
Печаль Авторизация по IdHTTP без имени компонента

Доброго времени суток вот столкнулся с такой проблемкой снова всем надоевший уже компонент «IdHTTP» мне нужно залогинется на сайте вот в такой форме

Код HTML:
<table width="100%">
    <tr>
        <td width="55" style="padding:5px;" rowspan="2"><img src="engine/skins/images/key.png" border="0"></td>
        <td width="70" style="padding:5px;">Имя:</td>
        <td><input class="edit" type="text" name="username" value='' size="20">&nbsp;&nbsp;</td>
    </tr>
    <tr>
        <td style="padding:5px;">Пароль:</td>
        <td><input class="edit" type="password" name="password" size="20">&nbsp;&nbsp;<input type="submit" class="edit" value="Войти"></td>
    </tr>
</table>

Как ведем у кнопки нету имени и что делать я не знаю помогите пожалуйста!

Вот что я пока сделал без кнопки заодно проверите

Код:
procedure TForm1.Button3Click(Sender: TObject);

var

LoginInfo: TStrings;
response: TStringStream;

Begin

response:=TstringStream.Create('');
LoginInfo := TStringList.Create;
LoginInfo.Add('name=test');
LoginInfo.Add('password=1234');
LoginInfo.Add('value=submit()');
IdHTTP1.Post('http://kinozal.in.ua/admin.php?',LoginInfo,Response);

LoginInfo.Free;
response.free;
end;
также может можно катко узнать прошла авторизация или нет после которой появляется уникальная строка кода

Код HTML:
<a href="http://kinozal.in.ua/index.php?do=lastcomments" target="_blank">последние комментарии</a> ]</td>
Заранее благодарен



Для пээсов и правки существует кнопка "Правка"!
Правила читали? Рекомендую. Во избежание, так сказать...

Последний раз редактировалось tuftel; 13.03.2009 в 18:11. Причина: Объединение постов
tuftel вне форума Ответить с цитированием
Старый 13.03.2009, 13:58   #2
JekaX
Пользователь
 
Регистрация: 11.03.2009
Сообщений: 38
По умолчанию

кинь, посмотрим что можно сделать
JekaX вне форума Ответить с цитированием
Старый 13.03.2009, 15:24   #3
Квэнди
Старожил
 
Аватар для Квэнди
 
Регистрация: 13.12.2006
Сообщений: 3,859
По умолчанию

Это означает что действие будет выполняться Javascript-ом, просматривайте код всех Javascript-ов, которые подгружаются на странице и ищите нужные вам функции.
ICQ не для вопросов, а для предложений. Для вопросов используйте форум
IRC канал клуба программистов|Мои статьи
Квэнди вне форума Ответить с цитированием
Старый 13.03.2009, 18:00   #4
tuftel
 
Регистрация: 13.03.2009
Сообщений: 6
По умолчанию

Цитата:
Сообщение от Квэнди Посмотреть сообщение
Это означает что действие будет выполняться Javascript-ом, просматривайте код всех Javascript-ов, которые подгружаются на странице и ищите нужные вам функции.
Вот полный код страници
вот сама страница куда нужно зайти http://kinozal.in.ua/admin.php? для теста я вам даю логин и пароль "test" "1234"

Зарание большое спосибо
Вложения
Тип файла: txt kod.txt (12.6 Кб, 14 просмотров)

Последний раз редактировалось tuftel; 13.03.2009 в 18:09.
tuftel вне форума Ответить с цитированием
Старый 14.03.2009, 00:12   #5
JekaX
Пользователь
 
Регистрация: 11.03.2009
Сообщений: 38
По умолчанию

Цитата:
Сообщение от tuftel Посмотреть сообщение
Вот полный код страници
вот сама страница куда нужно зайти http://kinozal.in.ua/admin.php? для теста я вам даю логин и пароль "test" "1234"

Зарание большое спосибо
Hacking attempt! Сними покачто защиту )
JekaX вне форума Ответить с цитированием
Старый 14.03.2009, 01:37   #6
tuftel
 
Регистрация: 13.03.2009
Сообщений: 6
По умолчанию

Цитата:
Сообщение от JekaX Посмотреть сообщение
Hacking attempt! Сними покачто защиту )
Отключить не вышло но зато я вот прикрепляю файл Admin.php который отвечает поидеи за авторизацию
Вложения
Тип файла: txt admin.txt (5.8 Кб, 161 просмотров)
tuftel вне форума Ответить с цитированием
Старый 14.03.2009, 09:00   #7
Квэнди
Старожил
 
Аватар для Квэнди
 
Регистрация: 13.12.2006
Сообщений: 3,859
По умолчанию

Для начала попробуйте отправить POST на туже страницу, где форма. Обрабатывается он именно там. только в IdHttp включите Handleredirect
ICQ не для вопросов, а для предложений. Для вопросов используйте форум
IRC канал клуба программистов|Мои статьи
Квэнди вне форума Ответить с цитированием
Старый 14.03.2009, 12:19   #8
tuftel
 
Регистрация: 13.03.2009
Сообщений: 6
По умолчанию

Цитата:
Сообщение от Квэнди Посмотреть сообщение
Для начала попробуйте отправить POST на туже страницу, где форма. Обрабатывается он именно там. только в IdHttp включите Handleredirect
Вот послал POST на эту страницу и включил Handleredirect

Вот тело проги которой отправлял

Код:
procedure TForm1.Button3Click(Sender: TObject);

var params,responseres:tstringlist;

begin
params:=TStringList.Create;
responseres:=TStringList.Create;
params.Add('name=test');
params.Add('password=1234');
responseres.Text:=IdHTTP1.Post('http://kinozal.in.ua/admin.php',params);
if Pos('logout',responseres.Text)>0 then
  ShowMessage('Авторизовались!');
end;
Результатов нету
tuftel вне форума Ответить с цитированием
Старый 16.03.2009, 08:19   #9
Квэнди
Старожил
 
Аватар для Квэнди
 
Регистрация: 13.12.2006
Сообщений: 3,859
По умолчанию

Ну тогда действуйте проще: сниферов смотрите все HTTP заголовки, отправляемые этой тсраницей при авторизации и все встанет на свои места
ICQ не для вопросов, а для предложений. Для вопросов используйте форум
IRC канал клуба программистов|Мои статьи
Квэнди вне форума Ответить с цитированием
Старый 16.03.2009, 16:22   #10
tuftel
 
Регистрация: 13.03.2009
Сообщений: 6
По умолчанию

Вот как я понял вы имеите ввиду вот это выделяю то что пробывал вбивать

Изображения
Тип файла: jpg 2009-03-14 19-41-38.jpg (42.9 Кб, 195 просмотров)
tuftel вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

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

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
IdHTTP и авторизация celovec Работа с сетью в Delphi 4 06.12.2010 21:33
Авторизация через Idhttp xakkkkker Работа с сетью в Delphi 1 08.02.2009 17:10
Авторизация выполена, но с ошибкой(idHTTP) KiDoki Работа с сетью в Delphi 2 06.12.2008 19:45
Прочесс без имени пользователя delphin100 Общие вопросы Delphi 0 29.10.2008 06:45