Hackproof
Junior Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Есть окно с объектом IE, в нём ссылка. Как при нажатии на ссылку можно получить в $input текст ссылки? Не адрес, а именно текст, то есть "Почта".
Код: #include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
Opt("GUIOnEventMode", 1)
$Form1 = GUICreate("Form1", 320, 285, 193, 115)
GUISetOnEvent($GUI_EVENT_CLOSE, "Form1Close")
$Input1 = GUICtrlCreateInput("", 16, 248, 249, 21)
GUISetState(@SW_SHOW)
$oIE = _IECreateEmbedded()
$OutputEdit = GUICtrlCreateObj($oIE, 10,10, 300, 200)
$sHTML= '<style type="text/css"><!-- body { margin: 4px; line-height: 16px; overflow-x: hidden } --></style>'
$sHTML&='<a href="http://mail.ru">Почта</a>'
_IENavigate($oIE, "about:blank")
_IEDocWriteHTML($oIE, $sHTML)
While 1
Sleep(100)
WEnd
Func Form1Close()
Exit
EndFunc |
|
