Что нового

Нажать на кнопку “Спуститься в туннель”

B1ad3

Новичок
Сообщения
34
Репутация
0
<table id="content-no-rat"><tr>
<td style="width:50%; padding:0 5px 0 0;">
<div class="block-bordered">
<ins class="t l"><ins></ins></ins><ins class="t r"><ins></ins></ins><div class="center clear">
<h3>Новая ветка</h3>
<div class="metro-branch">
<p>Строительство новой ветки — это добровольный адский труд без малейшей оплаты. Однако, только здесь вы сможете найти руду, которая стала ценна после кризиса.</p>
<div class="button" onclick="metroWork();"><span class="f"><i class="rl"></i><i class="bl"></i><i class="brc"></i><div class="c">Спуститься в туннель</div></span></div>

Как мне нажать на кнопку "Спуститься в туннель"????
 

Garrett

Модератор
Локальный модератор
Сообщения
3,999
Репутация
964
Re: Нажать на кнопку

Попробуйте так:
Код:
;~ ...
_IETagClassClick($oIE, 'div', 'button')

Func _IETagClassClick($Obj, $sTagName, $sClassName)
	Local $oTags
	$oTags = _IETagNameGetCollection($Obj, $sTagName)
	For $oTag In $oTags
		If $oTag.className = $sClassName Then
			_IEAction($oTag, 'click')
			ExitLoop
		EndIf
	Next
	_IELoadWait($Obj)
EndFunc
;~ ...
 
Автор
B

B1ad3

Новичок
Сообщения
34
Репутация
0
Re: Нажать на кнопку

Не работает ни первый пример, ни второй. Странно то, что когда запускаю первый пример - даже ошибка не выскакивает, но кнопка так и не нажимается:(
 

Garrett

Модератор
Локальный модератор
Сообщения
3,999
Репутация
964
Re: Нажать на кнопку

B1ad3 [?]
Странно то, что когда запускаю первый пример - даже ошибка не выскакивает
Ничего странного, потому как всё работает. :smile:

но кнопка так и не нажимается:(
Тут желательно иметь полный код страницы, вы же дали самый минимум!

Вот пример, как проверить!
Создайте документ - test.html
Код:
<html>
<head>
<title>Test</title>
</head>
	<body>
		<div class="button" onclick='alert("Вы нажали на ссылку \"Спуститься в туннель\"");'>
			<span class="f">
				<div class="c">Спуститься в туннель</div>
			</span>
		</div>
	</body>
</html>

Далее создайте скрипт с кодом:
Код:
#include <IE.au3>

WinActivate('Test - Microsoft Internet Explorer')

$oIE = _IEAttach('Test', 'Title')

_IETagClassClick($oIE, 'div', 'button')

Func _IETagClassClick($Obj, $sTagName, $sClassName)
    Local $oTags
    $oTags = _IETagNameGetCollection($Obj, $sTagName)
    For $oTag In $oTags
        If $oTag.className = $sClassName Then
            _IEAction($oTag, 'click')
            ExitLoop
        EndIf
    Next
    _IELoadWait($Obj)
EndFunc


Запустите IE, откройте в нём test.html. Если IE запретит выполнять JavaScript, разрешите! Перейдите в SciTE и нажмите F5 для выполнения кода.
Работает? :smile:
 
Верх