AccessTr.neT
Web te Borç Sorgulama - 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ığı: Web te Borç Sorgulama (/konu-web-te-borc-sorgulama.html)



Web te Borç Sorgulama - av.fatihberber - 04/04/2013

Türk Telekom Online Hizmet Merkezinden Tc No ve Telefon numarası ile yasal takipteki borçları sorgulama için bir hizmet başlattı.

Ben de bu hizmetten Access te hazırladığım dosya takip sisteminin içinde faydalanmak istiyorum.

Özetle: Ekte sunduğum örnekten de anlaşılacağı üzere, sorgulama için gerekli olan web sitesini Access te açıp, yine sorgulama için gerekli olan TC no ve Telefon numarası bilgilerini kendi veritabanımdan oraya aktarılmasını sağlamak istiyorum. Böylelikle her seferinde kopyala yapıştır derdinden kurtulmak istiyorum. Web sitesini açma işini hallediyorum ama verilerin aktarımını yapamadım.

Yardımlarınızı bekliyorum....


Cvp: Web te Borç Sorgulama - av.fatihberber - 04/04/2013

çözüm önerisi bekliyorum arkadaşlar


Cvp: Web te Borç Sorgulama - ozanakkaya - 04/04/2013

sorgulama işlemi için buton ekledim.


Cvp: Web te Borç Sorgulama - av.fatihberber - 05/04/2013

böyle bir uyarı alıyorum. ?


Cvp: Web te Borç Sorgulama - ozanakkaya - 06/04/2013

kodu aşağıdaki ile değiştir.

Private Sub Komut708_Click()

Dim btn As Object
WebBrowser0.Document.getElementById("prmHizmetNo").Value = Me.Metin705
WebBrowser0.Document.getElementById("tcKimlikNo").Value = Me.tcno
For Each btn In WebBrowser0.Document.all.tags("Input")
If btn.Value = "SORGULA" Then
btn.Click
End If
Next btn

End Sub


Ayrıca kod sayfasındaki hataları düzeltmelisin.

Option Compare Database kodunun en üstte olması lazım, siz altta biryerlere yazmışsınız, kodlarda hatalar var.


Cvp: Web te Borç Sorgulama - av.fatihberber - 06/04/2013

çok teşekkür ederim. kodları düzelttim ama web browser performansı düşük olduğu için yine en iyisi kopyala yapıştır olacak.