Вот этой командой можно получить текст ссылки: _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
