[iodjin]

Здравствуйте. Прошу помощи.
Есть админка интернет-магазина http://rusatribut.ru/simpla
Пытался перехватить post запрос, но ничего не вышло. Вообще не понимаю, как с такой формой входа работать.
В итоге решил делать через webbrowser. Открыть сайт и ввести данные в форму - пол беды.
Вопрос вот в чем: как подставить логин и пароль из 2-ух edit'ов? Т.е чтобы я ввел логин и пароль в edit'ы, а потом
при нажатии на кнопку "вход" эти данные автоматом подставились в форму и произошла авторизация.
Спасибо заранее.

Далее мне нужно будет переходить в админке по ссылкам и парсить информацию, поэтому авторизация нужна через то, что мне-новичку будет понятнее и правильнее с точки зрения программирования.

[Alegun]

А где же ваш код чтобы править? Да ещё похоже не в тот раздел пост, под тырнет здесь есть отдельная ветка. Ну да ладно, каков вопрос, таков ответ:

Нажать кнопку можно так (при условии что она одна, если больше, то это совсем другая песня)

Код:

...
WebBrowser1.OleObject.Document.forms.item(0).elements.item(0).click;
...

Вставить текст в поле, что-то типа такого

Код:

var 
item: variant; 
...

if (Webbrowser1.ReadyState and READYSTATE_INTERACTIVE) = 3 then 
begin 
item:= WebBrowser1.OleObject.Document.all.tags('Edit');
if (item.type = 'text') or 
   (item.type = 'password') or 
   (item.tagname = 'TEXTAREA') then item.Value:= Edit1.Text;
end; 

на работоспособность эту компиляцию из DRKB не проверял, может где и ошибка

[iodjin]

На форме: Webbrowser, label, edit, button.
Вот обработчик кнопки входа.

Код:

procedure TForm1.Button1Click(Sender: TObject);
var
document: IHTMLDocument2;
begin
WebBrowser1.Navigate(edit1.text+'/simpla');
while WebBrowser1.ReadyState<READYSTATE_COMPLETE do
begin
Application.ProcessMessages;
end;
document := WebBrowser1.Document as IHTMLDocument2;
if (document<>nil) and (WebBrowser1.OleObject.Document.Title='Товары') then
label1.caption:='Авторизовались'
else label1.Caption:='Не авторизовались';
if label1.caption='Авторизовались' then form2.ShowModal;
end;

Ввожу адрес сайта и нажимаю вход, далее вылазит форма входа, где надо ввести логин с паролем, но хотелось бы это подгружать еще из edit'ов все-таки))

[Alegun]

форма входа лежит в document или это уже после авторизации? В смысле, до неё можно достучаться?

[iodjin]

Сообщение от Alegun

форма входа лежит в document или это уже после авторизации? В смысле, до неё можно достучаться?

Нет, в document я кладу страницу, которую получаю после успешной авторизации. Не понял вопроса Хочу просто еще 2 edit'а, куда буду вводить логин и пароль и они будут при нажатии на кнопку "вход" передаваться в webbrowser. Потому как сейчас при нажатии на вход вылазит стандартная форма входа. Вроде как лучше, чтобы логин и пароль приходилось писать в программе, нежели вылазила эта ужасная форма от IE.

[Alegun]

Так тогда выходит данные вам нужно передавать не в поля ввода, а сразу адресату - нужно отловить как это выглядит при отправке через стандартное оконце и по такому "шаблону" скидывать взад.