for next çok hızlı geldi :)

Katılım
9 Ekim 2010
Mesajlar
23
Excel Vers. ve Dili
2003
dg ten hücredeki değeri alıp web sayfasındaki inputa girişini yaptırıyorum fakat aşağıdaki kodlarla sadece en son kayıtı sorgulatıyor
for dongusu hızlı geliyor acemiyim yardımlarınızı bekliyorum.





Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
On Error Resume Next
For i = 0 To DataGridView1.Rows.Count - 1
WebBrowser1.Document.GetElementById("idisim").SetAttribute("value", DataGridView1.Rows(i).Cells(1).Value)
WebBrowser1.Document.GetElementById("idisim").Focus()
Sleep(300)
SendKeys.Send("{ENTER}")
DataGridView1.Rows(i).Cells(2).Value = WebBrowser1.Document.All("idisim").InnerText
Next
End Sub
 

Ömer

Moderatör
Yönetici
Katılım
18 Ağustos 2007
Mesajlar
22,184
Excel Vers. ve Dili
Microsoft 365 Tr
Ofis 2016 Tr
Merhaba,

Döngüdeki işlem sonunda (next satırından önce) zamanlayıcı koyarak deneyiniz.

Kod:
Application.Wait Now + TimeValue("00:00:01")
Gibi.

.
 
Üst