#include <IE.au3>
#include <Array.au3>
$fp=@ScriptDir&'\бурение скважин.htm' ; по запросу = бурение скважин =
$oIE=_IECreate( $fp)
$oLinks=_IETagNameGetCollection($oIE, 'a')
$iCount = 0
Dim $aLink[@extended][3]
For $oLink In $oLinks
If $oLink.className = 'className: b-adv__title' Then
$iCount += 1
$aLink[$iCount][0] = $oLink.innertext
$aLink[$iCount][1] = $oLink.href
$aLink[$iCount][2] = $oLink
EndIf
Next
If $iCount Then
ReDim $aLink[$iCount + 1][3]
$aLink[0][0] = $iCount
_ArrayDisplay($aLink)
$iRand = Random(9, 11, 1) ;<-- искомые ссылки 9,10,11.
ConsoleWrite(-$iRand&' <-- индекс '&$aLink[$iRand][0] & @LF & @TAB & $aLink[$iRand][1] & @CRLF )
EndIf