Как автоматически из моей программы входить в почтовик?

← →
Volf_555 (2006-01-17 13:34) [0]

Есть следующий html-файл:
<html> <head> <body bgcolor=black> <title> Вход на почтовики </title> <h3 class=head_1><Font color=lightgreen size=6><center>Авторизация на </h3></center></Font><center><img src="mail.ru.gif"></img></center> <br> <p class=abzac><Font color=orange size=4>Для входа в систему введите, пожалуйста, логин и пароль. Если у Вас еще нет логина, Вам необходимо <a href=http://win.mail.ru/cgi-bin/signup><Font color=lightblue>зарегистрироваться.</a></p></Font></Font> <form name=Auth method=post action="http://win.mail.ru/cgi-bin/auth"> <input type=hidden name=Mpopl value=378896770> <input type="hidden" name="page" value=""> <input type="hidden" name="post" value=""> <input type="hidden" name="login_from" value=""> <br><Font color=yellow>Имя</Font> <br><input type="text" name="Login" value="MYLOGIN" class=w_100></td> <select class=w_100 name="Domain"> <option value="mail.ru" >@mail.ru</option> <option value="inbox.ru" >@inbox.ru</option> <option value="bk.ru" >@bk.ru</option> <option value="list.ru" SELECTED>@list.ru</option></select> <br> <br><Font color=yellow>Пароль</Font> <br><input type="password" name="Password" value="MYPASSWORD" class=w_100> <a href="http://www.mail.ru/pages/help/92.html" target=_new><Font color=magenta>Забыли пароль?</a></Font> <br> <p><input type=checkbox name="level" value=1 id="alien"><label for="alien"><Font color=cyan>Чужой компьютер</label></Font> <br> <br> <p><input type="Submit" value=" Войти " style="margin-top:4px"> </form> </body> </html>

После нажатия на кнопку Войти - попадаю на свой почтовик.

Как из Delphi автоматически можно было проделать тоже самое?
(открыть IE и отправить форму)

← →
dimodim (2006-01-17 19:58) [1]

Смотри на примере yandexa как через параметр yandsearch?= передается
значение поиска
те посмотри как твой html после нажатия кнопки
отправь форму

← →
Volf_555 (2006-01-17 22:22) [2]

Как отправить форму через Delphi и получить результат?

← →
Neoguru © (2006-02-07 02:24) [3]

в Яндексе отрабатывается метод GET и параметры передаются в командной строке. А в данном случае имеет место метод POST. Это разные вещи. Присоединяюсь к вопросу. КАК?

← →
Usamo Ben Laden (2006-02-07 03:43) [5]

Для начало лучше почитать про HTML там где описывается метод отправки данных, легче будет понять,
а если по теме то всё что есть в теле документа HTML между
тега <form </form> является формой отправки данных на сервер.
Чтобы узнать каккии данные надо отправить ищем первый name= а параметр value= это значение которое можно менять например Mpopl=378896770 потом прибавляеш следущее,и.т.д
из дельфи можно примерно так делать
Var request : TStringList;AData : TStringStream;D:TStringList;Data:String; begin // idhttp1.ProxyParams.ProxyPort := StrToInt(PortEdit.Text); // idhttp1.ProxyParams.ProxyServer := ProxyEdit.Text; //Формируем запрос request.Add("Mpopl=378896770"); request.Add(""page"="""); request.Add(""post"="""); request.Add(""login_from"="""); request.Add(""Login"="MYLOGIN""); request.Add(""Domain"="mail.ru""); request.Add(""Password"="MYPASSWORD""); request.Add(""level"=1"); try idhttp1.Post("http://win.mail.ru/cgi-bin/auth",request,Adata); except on E:Exception do end; request.Free; try Data := AData.DataString;//Создаём и присваеваем ответ сервера в DATA AData.Free; D:=TStringList.Create; D.Text:=Data;//думаю понятно дальше можеш посмотреть ответ например в мемо D.Free; Except end;
Вот написал с использованием idhttp он у тебя наверно есть в delphi 6 ?,
если нету переделай на winsock
Сам я не проверял лень было проверять, проверь ты, должно работать,возможно гдето есть ошибка но запрос вроде я сформировал правельно,ответ от сервера попробуй в мемо получить чтобы проверить получилось или нет

Как автоматически из моей программы входить в почтовик? Найти похожие ветки