Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.07.04;
Скачать: CL | DM;

Вниз

Как программно нажать на кнопку Submit?   Найти похожие ветки 

 
der ©   (2002-04-19 14:04) [0]

Была такая тема. Там дали ответом пример
procedure TForm1.Button1Click(Sender: TObject);
var
Coll : IHTMLElementCollection;
i : integer;
Doc : IHtmlDocument2;
begin
Doc:= WebBrowser1.Document as IHTMLDocument2;
Coll:= Doc.All.tags("INPUT") as IHTMLElementCollection;
for i:=0 to Coll.length-1 do
if (Coll.item(i,varEmpty) as IHTMLInputElement).value="But1"
then (Coll.item(i,varEmpty) as IHTMLElement).click;
end;

что такое?
Coll : IHTMLElementCollection;
i : integer;
Doc : IHtmlDocument2;


 
gek ©   (2002-04-19 14:17) [1]

IHTMLElementCollection - набор элементов страницы


 
ec   (2002-04-19 14:32) [2]

Лучше посмотри каким методом отсылается форма Post или Get
а затем NMHTTP.Post или Get("Submit=ok&vasja=lamer");


 
der ©   (2002-04-19 14:57) [3]

отсылается методом POST.
Короче, ситуация такова:
есть страница с несколькими radiobutton и кнопочкой, которя отсылает номер radiobutton.
<form name=forma action= http://www.address.ru/cgi-bin/var.pl method=POST>
<input type=radio name=vote value=1>Вариант 1<br>
<input type=radio name=vote value=2>Вариант 2<br>
<input type=radio name=vote value=3>Вариант 3<br>
<input type=submit value=Отправить>
</form>
мне надо периодически отправлять value=2.
Как это сделать. С программированием для инета не сталкивался ни разу.
Помогите, пож-та!!!



 
ec ©   (2002-04-22 15:29) [4]

В место Post напиши GET, затем в IE посмотри что он наверху в урле напишет.
потом в делфи
NMHTTP.Get("что получил");
Не обязательно это POS"om шубмитиь, GET тоже работает



Страницы: 1 вся ветка

Текущий архив: 2002.07.04;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.016 c
1-9797
Shrek
2002-06-24 00:31
2002.07.04
Формы без 3D. Нет обёмных кнопок.


1-9841
OlDemon
2002-06-11 12:21
2002.07.04
Работа с Excel


1-9856
volph
2002-06-21 15:01
2002.07.04
Parameters.ParamByName( GUID ).Value


14-9962
panov
2002-05-24 14:38
2002.07.04
А не организовать ли встречу в Екатеринбурге?


3-9749
sergeyka
2002-06-12 22:26
2002.07.04
Проблема экспорта в Excel из TQuery