[решено] Каким свойством _IEPropertyGet() получить имя ссылки?

Внимание, важное сообщение: Дорогие Друзья!
В ноябре далекого 2001 года мы решили создать сайт и форум, которые смогут помочь как начинающим, так и продвинутым пользователям разобраться в операционных системах. В 2004-2006г наш проект был одним из самых крупных ИТ ресурсов в рунете, на пике нас посещало более 300 000 человек в день! Наша документация по службам Windows и автоматической установке помогла огромному количеству пользователей и сисадминов. Мы с уверенностью можем сказать, что внесли большой вклад в развитие ИТ сообщества рунета.

Но... время меняются, приоритеты тоже. И, к сожалению, пришло время сказать До встречи! После долгих дискуссий было принято решение закрыть наш проект. 1 августа форум переводится в режим Только чтение, а в начале сентября мы переведем рубильник в положение Выключен

Огромное спасибо за эти 24 года, это было незабываемое приключение. Сказать спасибо и поделиться своей историей можно в данной теме.

С уважением, ваш призрачный админ, BigMac...

[решено] Каким свойством _IEPropertyGet() получить имя ссылки?

evg64

Старожил

Сообщения: 186
Благодарности: 4

Профиль | Отправить PM | Цитировать

Сабж. Написал я небольшой скрипт. Не могу разобраться, какое свойство нужно указать в качестве аргумента функции в подсвеченной строке. 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

Отправлено: 12:04, 06-09-2009

HORRIBLE

Пользователь

Сообщения: 143
Благодарности: 24

Профиль | Отправить PM | Цитировать

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

Это сообщение посчитали полезным следующие участники:

evg64

Отправлено: 21:38, 06-09-2009 | #2