Конференция VBStreets

**neic** » 02.04.2006 (Вс) 21:35

Kovu
Вот ссылка:
http://www.wm-loto.net/

Там где тебе предлогают ввести WMID и WMR, ниже есть кнопка. Вот мне её и не нажать

**Odrick** » 02.04.2006 (Вс) 22:39

1 - а с чего ты решил, что тебе нужна именно первая форма? Не думал, что их может быть несколько на странице?

2 - уверен, что форма на основном документе, а не в iframe, например?
3 - на крайняк неужели так сложно определить порядковый номер кнопки, коль уж у нее нет имени и id?

Ну это так, лирика. Так конкретно, что на этой странице тебе нужно нажать?

**neic** » 02.04.2006 (Вс) 23:41

Odrick
Там где тебе предлогают ввести WMID и WMR, ниже есть кнопка. Вот мне её и не нажать.

Почти в самом низу страницы!

Насчёт порядкого номера! Пробовал не помогает!

**Odrick** » 03.04.2006 (Пн) 0:21

Да?

Интересно, а как искал номер-то? Вот, прекрасно работает:

IE.Document.All(1005).Click

Номер получен за 5 секунд с помощью моей-же тулзовины HTMLSpy

**neic** » 03.04.2006 (Пн) 0:24

Не работает!!!

**neic** » 03.04.2006 (Пн) 1:08

И вот ещё, ковырял код, ковырял, что-то не работает.

Захожу на эту страницу : http://medicinform.ru/

жду полной загрузки и выполняеться код:

Код: Выделить всё: Ie.Document.All("rbonus_form").Click

Вот наткнулся на этот код(откуда собствено и взял rbonus_form):

<FORM style="PADDING-RIGHT: 0px; PADDING-LEFT: 0px; PADDING-BOTTOM: 0px; MARGIN: 0px; PADDING-TOP: 0px" name=rbonus_form action=http://www.freewm.ru/bonus.php method=post target=bonus><IMG style="CURSOR: hand" onclick="javascript:window.open('','bonus','width=250,height=200,toolbar=no,location=no, directories=no,status=no,menubar=no,scrollbars=no');rbonus_form.submit();" height=31 alt="Бонус здесь!" src="http://www.freewm.ru/images/buttons/bonus3.gif" width=88 border=0><INPUT type=hidden name=ss><INPUT type=hidden name=s></FORM>

Вот, жму его и ничего.

Мне нужно нажать на кнопку(или рисунок) : Бонус внизу страницы

**Odrick** » 03.04.2006 (Пн) 1:35

Ну и на что ты кликаеш? На форму? :shock:

Конечно ничего не будет происходить. Кликать на имедже нужно. В общем подозреваю, что у иебя рога в коде. Так как предыдущий пример работает железно - сам не поленился и проверл

В общем полный код работы с IE в студию.

**neic** » 08.04.2006 (Сб) 16:25

ТАк погоди, киданика твой последний HTMLSPY (или HTMLFILTER как там его?).

**Odrick** » 08.04.2006 (Сб) 23:42

Куда его кидать?

Вот тут он: http://bbs.vbstreets.ru/viewtopic.php?t=20244&start=60

**neic** » 09.04.2006 (Вс) 10:30

Страно на wm-loto.net, у меня на кнопку вот что выдаёт!

**Odrick** » 09.04.2006 (Вс) 13:04

И что тебя смутило? Все правильно выдает - тип, innerHTML

Да, у нее нет ни имени, ни ID. Зато у нее есть порядковый номер - 929. И по этому номеру с нем можно работать:

document.all(929).click()

То, о чем я и говорил выше

**neic** » 09.04.2006 (Вс) 20:53

Видимо у меня была ошибка, потому что я не ставил скобки после document.all(929).click ?

**neic** » 09.04.2006 (Вс) 21:08

Корче, чё-то у меня получаеться, вот код.

Код: Выделить всё: On Error GoTo gt: Dim Ie As Object Set Ie = CreateObject("InternetExplorer.Application") Ie.Navigate "http://www.wm-loto.net/" Ie.MenuBar = 1 Ie.ToolBar = 1 Ie.StatusBar = 1 Ie.AddressBar = 1 Ie.Visible = 1 gt: Do While Ie.Busy DoEvents Loop Ie.Document.All("wmid").Value = "******" Ie.Document.All("wmz").Value = "******" 'Ie.Document.Forms(0).Submit Ie.Document.All("929").Click If Err.Number = "91" Then GoTo gt: End If

Васик ссылаеться на click

**Odrick** » 09.04.2006 (Вс) 23:04

Ie.Document.All("929").Click - ошибка. Если аргумент в скобках, подразумевается, что это имя или ID. Нужно: Ie.Document.All(929).Click. Кроме того, 929 - это элемент <BR>. Кнопка - 930.

**neic** » 11.04.2006 (Вт) 20:55

Odrick
ОК. Пасибо всё работает! А как насчёте этого случая?

И вот ещё, ковырял код, ковырял, что-то не работает.

Захожу на эту страницу : http://medicinform.ru/

жду полной загрузки и выполняеться код:
Код:

Ie.Document.All("rbonus_form").Click

Вот наткнулся на этот код(откуда собствено и взял rbonus_form):

<FORM style="PADDING-RIGHT: 0px; PADDING-LEFT: 0px; PADDING-BOTTOM: 0px; MARGIN: 0px; PADDING-TOP: 0px" name=rbonus_form action=http://www.freewm.ru/bonus.php method=post target=bonus><IMG style="CURSOR: hand" onclick="javascript:window.open('','bonus','width=250,height=200,toolbar=no,location=no, directories=no,status=no,menubar=no,scrollbars=no');rbonus_form.submit();" height=31 alt="Бонус здесь!" src="http://www.freewm.ru/images/buttons/bonus3.gif" width=88 border=0><INPUT type=hidden name=ss><INPUT type=hidden name=s></FORM>

Вот, жму его и ничего.

Мне нужно нажать на кнопку(или рисунок) : Бонус внизу страницы

**Odrick** » 11.04.2006 (Вт) 22:34

Так... Прямая тебе дорога в изучение спецификации HTML и Java Script. Я не буду тебе рассказывать каждый раз как сымитировать то или иное событие - почитай и пойми что к чему. В первую очередь - в чем разница между формой, кнопкой, ссылкой и т.д. Вот объясни, чего ты хочешь добиться, имитируя клик по форме, если по спецификации W3C форма даже не имеет такого события??? Тебе нужно всего-лишь сымитировать отправку данных формой: Ie.Document.All("rbonus_form").submit . В общем давай на этом и закончим - пока не разберешься со стандартами, продолжать нету смысла.

**neic** » 11.04.2006 (Вт) 23:01

Лан, посмотрю что делать с этим.

Но у меня опять вопрос!

Захожу на этот сайт:
http://www.wmbingo.com/

Запускаю твою прогу. Жму по кнопке внизу. Прога выдаёт? что Ordinal у этой кнопки 1319. Основываясь на этих результатах пишу строку:

Код: Выделить всё: Ie.Document.All("1319").Click

О мне прога пишет : "Ой, вы ошиблись! Error 91"

П.с. пробывал 1320 тотже результат!

**Odrick** » 12.04.2006 (Ср) 0:19

Мля... Читать выше про разницу между id, name и порядковым номером объекта в коллекции all в html-документе :evil:

Ты до сих пор так ничего и не понял. Такое впечатление, что ты не стремишься научиться, а делаешь все методом тыка

**neic** » 12.04.2006 (Ср) 18:07

Всё разобрался. А как вписать занчения в активное окно IE?

**FaKk2** » 12.04.2006 (Ср) 18:09

neic
Любой элемент на странице это обьект. А у любого обьекта есть свойства. Смотри справочник и ищи подходящее свойство.

**neic** » 12.04.2006 (Ср) 22:36

FAKK2 писал(а):neic
Любой элемент на странице это обьект. А у любого обьекта есть свойства. Смотри справочник и ищи подходящее свойство.

Да не всё! С элементами я разобрался. Всё понял!
Огромное пасибо Odrick

**alibek** » 12.04.2006 (Ср) 22:40

neic, или ты убираешь из своей подписи реферал, или мы убираем тебя на неделю.

**neic** » 12.04.2006 (Ср) 22:43

alibek писал(а):neic, или ты убираешь из своей подписи реферал, или мы убираем тебя на неделю.

Что ж убираю =(

**alibek** » 12.04.2006 (Ср) 22:47

Я не имел ввиду ссылку.
Я имел ввиду ?secret=12345

**novichok_07** » 09.01.2008 (Ср) 18:24

многое почерпнул из данного топика.

но вот загвоздочка возникла небольшая

, подскажите как отправить данные в такой форме:

Код: Выделить всё: <FORM onsubmit="SetCookie('loginc',document.getElementById('login').value, '+2y', '/');" action=http://ххххххх.хх/login.php method=post><INPUT type=hidden value=admin name=admin> <INPUT type=hidden name=sid> <TBODY> <TR> <TD vAlign=top width=94></TD> <TD style="PADDING-RIGHT: 0px; PADDING-LEFT: 0px; PADDING-BOTTOM: 0px; PADDING-TOP: 57px" vAlign=top width=111><INPUT id=login style="BORDER-RIGHT: #ffbbbb 1px solid; BORDER-TOP: #ffbbbb 1px solid; FONT-WEIGHT: bold; FONT-SIZE: 10px; BACKGROUND: #900000; BORDER-LEFT: #ffbbbb 1px solid; WIDTH: 100px; COLOR: #ffbbbb; BORDER-BOTTOM: #ffbbbb 1px solid; HEIGHT: 16px" name=login></TD> <TD style="PADDING-RIGHT: 0px; PADDING-LEFT: 0px; PADDING-BOTTOM: 0px; PADDING-TOP: 57px" vAlign=top width=120><INPUT id=terpass style="BORDER-RIGHT: #ffbbbb 1px solid; BORDER-TOP: #ffbbbb 1px solid; FONT-WEIGHT: bold; FONT-SIZE: 10px; BACKGROUND: #900000; BORDER-LEFT: #ffbbbb 1px solid; WIDTH: 100px; COLOR: #ffbbbb; BORDER-BOTTOM: #ffbbbb 1px solid; HEIGHT: 16px" type=password value="" name=pwd></TD> <TD style="PADDING-RIGHT: 0px; PADDING-LEFT: 0px; PADDING-BOTTOM: 0px; PADDING-TOP: 56px" vAlign=top width=56><INPUT onfocus=this.blur() type=image height=20 alt="" width=37 src="images/ok.gif" border=0> <BR></TD></TR></FORM>

логин и пасс ввожу таким кодом:

Код: Выделить всё: WebBrowser1.Document.All("login").Value = Labellog.Caption WebBrowser1.Document.All("pwd").Value = Textpass.Text

а вот Click или Submit не могу найти ......
ну короче, не могу отправить эти данные, подскажите как правильно отправить данные из этой формы

**Хакер** » 09.01.2008 (Ср) 19:20

forms[0].submit() ?

**novichok_07** » 09.01.2008 (Ср) 20:40

при WebBrowser1.Document.forms[0].submit() - выдаёт "External name not defined"

**BION** » 09.01.2008 (Ср) 21:28

novichok_07 писал(а):при WebBrowser1.Document.forms[0].submit() - выдаёт "External name not defined"

а так WebBrowser1.document.Forms(0).submit

**novichok_07** » 09.01.2008 (Ср) 21:36

Хакер , BION спасибо ! извините если отнял у вас время.

**novichok_07** » 11.01.2008 (Пт) 2:40

если есть время или желание может кто подскажет и ещё парочку решений на подобную тему . Сам не смог разобраться , да и доступную для моего понимания информацию в поиске не смог найти ...

в WebBrowser загружаю страничку , там куча фреймов, все фреймы с одного хоста , далее:
1.

Код: Выделить всё: RichTextBox2 = WebBrowser1.Document.documentElement.outerHTML

в коде вижу такую структуру (JavaScript):

Код: Выделить всё: var menu = 0;

могу я как то получить это значение в переменную не прибегая к Function GetText , а как нибудь быстрее ,что-нибудь вроде strmenu=WebBrowser1.Document.All("menu") ? или изменить это значение ?

2. (JavaScript):

Код: Выделить всё: top.frames['main_area'].frames['main'].location.href = url;

как можно допустим нажать кнопочку во фрейме main ?
WebBrowser1.Document.top.frames("main_area").frames("main").All("id_кнопочки").Click не получается

Конференция VBStreets

Автозаполнение форм

Кто сейчас на конференции