Skip to main content

AccessTr.neT


Accesste Web Tarayıcısından Devamsızlık Toplamı Almak

Accesste Web Tarayıcısından Devamsızlık Toplamı Almak

#5
Access te kod çalışmıyor sanırım, ama Excel de kod bu şekilde çalışıyor;
Kod:
If ozurluId = "tblOzurluDevamsizlikToplam" Then
   Set satırlar = doc.getElementById(ozurluId).getElementsByTagName("tr")
   Dim yazı As String               
   For Each satır In satırlar
      yazı = satır.getElementsByTagName("td")(1).innertext
   If Trim(yazı) = "Özürlü Devamsızlık Toplamı" Then
      Me.UzurluD = Split(Trim(satır.getElementsByTagName("td")(3).innertext))(0)
   End If
Next satır
End If
........ excel

Bu kodun benzerini access için yazmama yardımcı olabilir misiniz.
İyilik yap!
                  İyilik bul!
Son Düzenleme: 27/02/2020, 18:11, Düzenleyen: xoseng. (Sebep: Kod bölümünü düzenledim.)
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Cvp: Accesste Web Tarayıcısından Devamsızlık Toplamı Almak - Yazar: xoseng - 23/02/2020, 21:55