Açılan web sayfasında butona tıklama

[burcin_end_muh]

Merhaba,

elimdeki kodla web sayfasını açmaktayım bundan sonra bir dosya indirme linkine tıklamam gerek.
bunun altı kere tab a basıp sonra enter bas diyerek yapamadım.
adresi kapı sayfasındaki S1 hücresinden alıyor.

Yardımlarınız için şimdiden teşekkür ederim

Yardımcı olacaksa indirme için tıklamam gereken nesneyi incele dediğim zaman çıkan şudur:

<a href="#" style="margin:5px;" onclick="mojarra.jsfcljs(document.getElementById('_CountBarGraphPortlet_WAR_Counttrackportlet_INSTANCE_tsGK8NuQwGGt_:exportForm'),{'_CountBarGraphPortlet_WAR_Counttrackportlet_INSTANCE_tsGK8NuQwGGt_:exportForm:j_idt20':'_CountBarGraphPortlet_WAR_Counttrackportlet_INSTANCE_tsGK8NuQwGGt_:exportForm:j_idt20'},'');return false" class="export-excel-link"><img id="_CountBarGraphPortlet_WAR_Counttrackportlet_INSTANCE_tsGK8NuQwGGt_:exportForm:j_idt21" src="/Counttrack-portlet/images/excel.png?pfdrid_c=true" alt=""></a>


Dim chr As String


chr = "C:\Program Files (x86)\Google\Chrome\Application\chrome.exe"


For i = 1 To Sheets("Kapı").Cells(Rows.Count, "S").End(xlUp).Row
Shell (chr & " -url " & Sheets("Kapı").Cells(i, "S"))
Next i
Application.Wait Now + TimeValue("00:00:05")

SendKeys "{TAB}"
SendKeys "{TAB}"
SendKeys "{TAB}"
SendKeys "{TAB}"
SendKeys "{TAB}"
SendKeys "{TAB}"
SendKeys "{enter}"

 

[askm]

İlgili sayfa linkini verirseniz yardımcı olmaya çalışalım.

 

[burcin_end_muh]

İlgili sayfa linkini verirseniz yardımcı olmaya çalışalım.

şirketin kullandığı bir uygulamanın web sitesi

 

[Asri]

AUTOIT script programını araştırınız. Farklı programlara tuş gönderme konusunda başarılı sonuçlar alırsınız.
İlk öğrenme süreci biraz zaman alır ancak sonrasında çok işinize yarar.