Witam.
W jaki sposób mogę pobrać link tego elementu:
Chodzi o to że ten hash jest zmienny, nie jest zawsze taki sam....
do tej pory odwoływałem się do elementów wg. ich id lub name...a tu nawet nie wiem jak się odwołać do tego elementu =/
Dim element As HtmlElement = WebBrowser1.Document.GetElementById("jakies_id")
Ech naprawdę masz ciekawe problemy...
Dim Table As HtmlElement = WebBrowser1.Document.GetElementById("znane_id_najblizszego_nadrzednego_elementu_moze_table_ma")
If Not IsNothing(Table) Then
Dim LinksList As HtmlElementCollection = Table.GetElementsByTagName("a")
For Each Link As HtmlElement In LinksList
If Link.OuterText.IndexOf("Wyloguj") = 0 Then
MsgBox(Link.GetAttribute("href"))
Exit For
End If
Next
End If
kurcze no naprawdę nie potrafię sie dostać do tego elementu ;/
próbowałem z użyciem kodu który podałeś, ale wędruje on mi po innych tabelach i wyciąga linki z innych tabel...
@kAzek
w ogóle to chciałbym nauczyć się samodzielnie obsługiwać takie "pobieranie danych z WebBrowsera", gdzie mogę poczytać coś o tym, by nauczyć się prawidłowo to robić ? ;/
Nie wiesz co to nadrzędny element czy co? Jakie id podstawiałeś w GetElementById? Ja tam widzę że chyba mogło by być vbwrapper3 Chyba że jest inny link który zaczyna się na Wyloguj?
ok juz poradzilem, coś takiego załatwiło sprawę:
Dim Table As HtmlElement = WebBrowser1.Document.GetElementById("vbwrapper3")
If Not IsNothing(Table) Then
Dim LinksList As HtmlElementCollection = Table.GetElementsByTagName("a")
For Each Link As HtmlElement In LinksList
If Link.GetAttribute("href").Contains("login.php?do=logout") Then
MsgBox(Link.GetAttribute("href"))
End If
Next
End If
dziękuję bardzo !