AccessTr.neT
Access Webbroser Üzerinden Tablo İçerisindeki Bilgiyi Almak - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Access Webbroser Üzerinden Tablo İçerisindeki Bilgiyi Almak (/konu-access-webbroser-uzerinden-tablo-icerisindeki-bilgiyi-almak.html)

Sayfalar: 1 2 3 4

Cvp: Access Webbroser Üzerinden Tablo İçerisindeki Bilgiyi Almak - ozanakkaya - 18/02/2020 

Nz(WebBrowser.Document.getElementById("dgListe").Rows(1).cells(2).innertext,0)

kodu 0 değeri döndürür mü bilmiyorum. Özürlü durumu olmayan öğrenci sayfasında dgliste id'li tablo var mı?

Cvp: Access Webbroser Üzerinden Tablo İçerisindeki Bilgiyi Almak - xoseng - 18/02/2020

(18/02/2020, 16:06)ozanakkaya yazdı: 
Nz(WebBrowser.Document.getElementById("dgListe").Rows(1).cells(2).innertext,0)

kodu 0 değeri döndürür mü bilmiyorum. Özürlü durumu olmayan öğrenci sayfasında dgliste id'li tablo var mı?
tüm öğrenci sayfalarında "dgListe" tablo var, Sadece özrü olmayan için  Özürlü Durumu olmayan için değer dönmüyor.

[Resim: do.php?img=9668]

Cvp: Access Webbroser Üzerinden Tablo İçerisindeki Bilgiyi Almak - ozanakkaya - 18/02/2020 

Nz(WebBrowser.Document.getElementById("dgListe").Rows(1).cells(2).innertext,0)

kodu 0 değerini vermiyor mu?

Cvp: Access Webbroser Üzerinden Tablo İçerisindeki Bilgiyi Almak - xoseng - 18/02/2020

(18/02/2020, 17:23)ozanakkaya yazdı: 
Nz(WebBrowser.Document.getElementById("dgListe").Rows(1).cells(2).innertext,0)

kodu 0 değerini vermiyor mu?
hocam, özür durumu olmayan öğrenci için kod hata veriyor.
Run-Time '424':
object required

Cvp: Access Webbroser Üzerinden Tablo İçerisindeki Bilgiyi Almak - xoseng - 19/02/2020

İki durum oluştu.


'özür durumu olan öğrenci için çalışan kod

            Ozurdurumu = WebBrowser.Document.getElementById("lblListeSonuc").Rows(1).cells(2).innertext



'özür durumu olmayan öğrenci için çalışan kod

            Ozurdurumu = WebBrowser.Document.getElementById("lblListeSonuc").innertext

bu iki kodun birlikte çalışması için If Else koşulu veya başka bir koşulu nasıl ekleyebilirim.

Cvp: Access Webbroser Üzerinden Tablo İçerisindeki Bilgiyi Almak - ozanakkaya - 19/02/2020

Doğru mu yazdınız bilmiyorum ama "lblListeSonuc" kodu ile veri almanız mümkün değil. Önceki mesajımda da belirttiğim gibi "dgListe" olmalı.

Me.Ozur_durumu = WebBrowser.Document.getElementById("dgListe").Rows(1).cells(2).innertext

kodu yerine

For Each tbl In WebBrowser.Document.getElementsByTagName("table")

    If tbl.ID = "dgListe" Then

        If tbl.Rows.length > 1 Then

            Me.Ozur_durumu = tbl.cells(5).innertext

        End If

    End If

Next
kodunu deneyiniz.