-
peter888 © (10.06.09 15:07) [0]Мне надо войти в аккаунт через прогу.
Сайт http://tworeferals.com/accaunt.php (лично мой).
Там есть аккаут: логин - peter888 и пароль - 111 .
Искал в интернете - вот что нашол:
Код Delphi
var
Http : TidHttp;
data: TIdMultiPartFormDataStream;
StrPage : string;
begin
try
data := TIdMultiPartFormDataStream.Create;
Http := TIdHTTP.Create(Self);
data.AddFormField('login_', 'peter888');
data.AddFormField('pass_', '111');
StrPage := Http.Post('http://www.tworeferals.com/accaunt.php', data);
RichEdit1.Lines.Text := StrPage;
finally
data.Free;
Http.Free;
end;
if Pos('ВОЙТИ В АККАУНТ', StrPage) = 0 then
ShowMessage('Авторизация прошла успешно')
else
ShowMessage('Авторизация провалилась');
end;
Ошибок вроде нет, но в конце при верном и не верном введении логина и пароля все равно выскакивает "Авторизация провалилась", т.е. в StrPage находится html-код странички "до авторизации".
В чем проблема? -
Медвежонок Пятачок © (10.06.09 16:11) [1]а на третий день индеец джо заметил, что форм на странице больше чем одна и у них разные имена
-
Медвежонок Пятачок © (10.06.09 16:13) [2]это уже как минимум одна проблема
-
peter888 © (10.06.09 16:37) [3]Не понял...
Что? -
peter888 © (10.06.09 16:42) [4]Я тут подумал, что наверное можно обойти этот момент.
Мне надо просто из БД из таблицы users вытянуть инфу о, например, peter888.
в users есть такие поля: id, use_login, use_password, use_mail, use_da_te_create.
Надо вытянуть use_mail зная только логин (peter888) и пароль (111). Ну и все к доступу до БД.
Как єто зделать, какие компоненті надо установить? Я с таким впервіе сталкиваюсь. Помогите....! -
Медвежонок Пятачок © (10.06.09 16:54) [5]кроме этого там еще куки присутствуют
-
Медвежонок Пятачок © (10.06.09 17:07) [6]и полей там не два а три
-
peter888 © (10.06.09 17:23) [7]Да с куками тож пробувал. вот http://parsing-and-i.blogspot.com/2009/05/idhttppost.html. тож самое.
Но мне по сути не надо заходить в акк, просто надо инфу из базы вытянуть. -
peter888 © (10.06.09 17:24) [8]
> и полей там не два а три
Объясни, о чем ты -
Медвежонок Пятачок © (10.06.09 17:25) [9]первое поле login_
второе поле pass_
третье поле button_login -
peter888 © (10.06.09 17:51) [10]Это типа кнопка? И че мне надо прописать?
data.AddFormField('button_login', 'Что здесь?');
data.AddFormField('login_', 'peter888');
data.AddFormField('pass_', '111');
? -
Медвежонок Пятачок © (10.06.09 18:11) [11]а на ней самой разве не написано что туда надо прописать?
-
peter888 © (10.06.09 18:14) [12]"Войти" ?
-
Медвежонок Пятачок © (10.06.09 18:19) [13]
-
peter888 © (10.06.09 18:38) [14]Действительно, пошло...
А как с БД? -
Медвежонок Пятачок © (10.06.09 18:50) [15]с какой такой БД?
-
Empleado © (10.06.09 19:18) [16]
-
peter888 © (10.06.09 19:34) [17]Да я его закинул. И прогу пише не для єтого сайта. Он у меня для разных испытаний :).
-
Медвежонок Пятачок © (10.06.09 20:08) [18]программист-испытатель первого класса
-
peter888 © (11.06.09 10:39) [19]Ну так как мне с БД вытянуть use_mail юзера peter888?