-
AutoIt
(
http://forum.oszone.net/forumdisplay.php?f=103)
Каким свойством _IEPropertyGet() получить имя ссылки?
Сабж. Написал я небольшой скрипт. Не могу разобраться, какое свойство нужно указать в качестве аргумента функции в подсвеченной строке. AutoIt UDFs Help посмотрел, там вроде ничего не подходит. Либо я плохо смотрел, либо проблема решается иначе.
Код:
#include <IE.au3>
CheckLinks("http://vkontakte.ru/profile.php")
Func CheckLinks($Page,$attach=0)
local $IEObj,$string=""
if $attach=0 then
$IEObj = _IECreate($Page)
else
$IEObj= _IEAttach($page,"URL")
endif
winsetstate($IEObj,"",@sw_maximize)
$oLink = _IELinkGetCollection ($IEObj)
for $el in $oLink
msgbox(0,0,_IEPropertyGet($el,"Что тут писать?")
next
EndFunc
|
Вот этой командой можно получить текст ссылки: _IEPropertyGet($oLink, "innerText"), как вариант.
Примеры из справки:
Просто текст ссылок находящихся на страничке:
Код:
#include <IE.au3>
$oIE = _IE_Example ("basic")
$oLinks = _IELinkGetCollection ($oIE)
$iNumLinks = @extended
MsgBox(0, "Link Info", $iNumLinks & " links found")
For $oLink In $oLinks
MsgBox(0, "Link Info", $oLink.innertext)
Next
или идентично первому, но еще переходит по необходимой ссылке:
Код:
#include <IE.au3>
CheckLinks("http://vkontakte.ru/profile.php")
Func CheckLinks($Page,$attach=0)
local $IEObj,$string=""
if $attach=0 then
$IEObj = _IECreate($Page)
else
$IEObj= _IEAttach($page,"URL")
endif
winsetstate($IEObj,"",@sw_maximize)
$sMyString = "Мои Аудиозаписи"
$oLinks = _IELinkGetCollection($IEObj)
For $oLink in $oLinks
$sLinkText = _IEPropertyGet($oLink, "innerText")
MsgBox(0,"Текст ссылки",$sLinkText)
If StringInStr($sLinkText, $sMyString) Then
_IEAction($oLink, "click")
ExitLoop
EndIf
Next
EndFunc
|
Время: 01:47.
© OSzone.net 2001-