Tedaş borç sorgulamasını excel sayfasından yapabilmek için bir macro yazdım. Macro aşağıdaki gibidir (detayları atlıyorum)
Dim IE As Object
myURL = "http://hizmetler.tedas.gov.tr/TedasInternetIslemleri/BorcSorgulama/AboneBorcu.aspx"
Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = False
IE.navigate myURL
............HTML tablolarından bilgi almak için kodlar
IE.Quit
Set IE = Nothing
Bu macro sorunsuz çalışıyor. Ancak 5 sorgudan sonra herdefasıda aşağıdaki yanıtı alıyorum:
"Bu bağlantı üzerinden yapabileceğiniz işlem sayısı dolmuştur.Lütfen başka bir bağlantı ile tekrar deneyiniz..."
ip veya cooky problemi değil, ie'yi kendim açıp sorgulama yapabiliyorum, ancak macro ile sorgu yapamıyorum.
VBA ile yaratılan ie ile normal yoldan açılan ie arasında bir fark olmalı ama ben bulamadı. Yardım ederseniz sevinirim.
Dim IE As Object
myURL = "http://hizmetler.tedas.gov.tr/TedasInternetIslemleri/BorcSorgulama/AboneBorcu.aspx"
Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = False
IE.navigate myURL
............HTML tablolarından bilgi almak için kodlar
IE.Quit
Set IE = Nothing
Bu macro sorunsuz çalışıyor. Ancak 5 sorgudan sonra herdefasıda aşağıdaki yanıtı alıyorum:
"Bu bağlantı üzerinden yapabileceğiniz işlem sayısı dolmuştur.Lütfen başka bir bağlantı ile tekrar deneyiniz..."
ip veya cooky problemi değil, ie'yi kendim açıp sorgulama yapabiliyorum, ancak macro ile sorgu yapamıyorum.
VBA ile yaratılan ie ile normal yoldan açılan ie arasında bir fark olmalı ama ben bulamadı. Yardım ederseniz sevinirim.