Войти

Показать полную графическую версию : онклик по ссылке


gangsterovich
25-10-2011, 19:51
простой клик получается сделать


For Each wabpageelement As HtmlElement In allelements
If wabpageelement.GetAttribute("value") = " Войти " Then
wabpageelement.InvokeMember("click")
End If
Next



вот так.тоесть когда у кнопки есть value или id проблем не возникает


но когда дебаггер выдает только вот это

<A class=menutop onclick="this.blur(); jumptopath('/main.pl?edit='); return false;" href="#">Инвентарь</A>


как организовать клик?


мне тут сказали что сделать перебор ссылок.и дали некое подобие.

Dim hrefs As String
Dim href As Object
I = 0
For Each href In brwWebBrowser.Document.frames(8).Document.links
hrefs = hrefs + href.href + " " + href.innertext + vbNewLine
If I Mod 1 = 0 And I <> 0 Then
MsgBox hrefs
hrefs = ""
End If
I = I + 1
Next


как подобное реализовать?выручите пожалста.

кстати ссылки все время генерируются новые на "инвентарь"




© OSzone.net 2001-2012