none
IE (Internet Explorer) Automation RRS feed

  • Pergunta

  • Preciso coletar informações de diversos sites e estou tendo problema, quando o site altera seu conteúdo os métodos param de funcionar. No código abaixo esta um exemplo, eu consigo navegar até pagina de google e coletar todos objetos inputs, quando navego para pagina do yahoo ocorre um erro. estou utilizando microsoft visual Studio Community 2013 linguagem visual basic.

    Module Module1
    
        Sub Main()
            Dim IE As Object
            Dim objCollectionGoogle As Object
            Dim objCollectionYahoo As Object
    
            IE = CreateObject("InternetExplorer.Application")
            IE.Visible = True
            IE.Navigate("www.google.com")
            Do While IE.Busy
            Loop
            objCollectionGoogle = IE.Document.getElementsByTagName("input")
            IE.Navigate("www.yahoo.com")
            Do While IE.Busy
            Loop
            objCollectionYahoo = IE.Document.getElementsByTagName("input")
    
        End Sub
    
    End Module

    quarta-feira, 8 de abril de 2015 18:53

Respostas