VBNET 2nci defa butona basışımda hata veriyor.

[Orion1]

Merhaba.
Aşağıdaki kodlarda ilk butona bastığımda çalışıyor.
2nci defa basınca hata veriyor.
Nasıl yapmalıyım?
Hata veren satırı kırmızı ile boyadım.

Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim IE As Object, t As Object, j As Byte
        IE = CreateObject("InternetExplorer.Application")
        For j = 0 To 2
            DataGridView1.Item(j, 0).Value = ""
        Next
        'IE.visible = True
        IE.Navigate("https://www.haremaltin.com/")
        Do While Not IE.readyState = 4
            My.Application.DoEvents()
        Loop
        Do While IE.busy : My.Application.DoEvents() : Loop
        t = IE.Document.GetElementbyId("table1").all(0)
        For j = 0 To t.Rows(1).Cells.Length - 1
            DataGridView1.Item(j, 0).Value = t.Rows(1).Cells(j).innertext
        Next
        t = Nothing
        IE.Quit
        IE = Nothing
        MsgBox("bitti")
    End Sub
End Class

 

[Zeki Gürsoy]

Pek emin değilim ama, IE nesnesinin Release edilmemesinden olabilir. WebBrowser kullanmayı deneseniz...?

 

[Orion1]

Pek emin değilim ama, IE nesnesinin Release edilmemesinden olabilir. WebBrowser kullanmayı deneseniz...?

Teşekkür ederim,hocam.
Web browser kullanırsam verileri oradan datagridviewe verileri alabilirmiyim?

 

[Zeki Gürsoy]

Sayfa düzgün yükleniyorsa elbette...

 

[Orion1]

Teşekkür ederim hocam.
Örnek kod verebilirmisin?