NAVEGAR PÁGINAS - WEBBROWSER

Question

BOA NOITE PESSOAL,

ESTOU PRECISANDO FAZER O SEGUINTE :

TENHO UM WEBBROWSER QUE ME MOSTRA UMA PÁGINA INICIAL E NESTA PÁGINA (NO RODAPÉ), TENHO POR EXEMPLO:

1-2-3-4-5-6-7 QUE SÃO LINKS PARA PRÓXIMAS PÁGINAS.

EU PRECISO :

CLICAR NA PÁGINA 1, COLETAR OS DADOS DESSA PÁGINA

CLICAR NA PÁGINA 2, COLETAR OS DADOS DESSA PÁGINA

CLICAR NA PÁGINA 3, COLETAR OS DADOS DESSA PÁGINA

E ASSIM POR DIANTE, POR TODAS AS PÁGINAS

ESTOU COM DIFICULDADE PARA COLETAR ESTAS INFORMAÇÕES, POIS PRECISO AGUARDAR A PÁGINA CARREGAR PARA SÓ DEPOIS COLETAR...TENTEI COLOCAR UM THREAD SLEEP MAS SÓ COPIA A PRIMEIRA PÁGINA. AS DEMAIS PÁGINAS O CÓDIGO REPETE COM OS DADOS DA PRIMEIRA, OU SEJA, OS DADOS FICAM REPETIDOS.

PRECISO DA AJUDA DOS AMIGOS PARA CONCLUIR O QUE PRECISO E, DESDE JÁ AGRADEÇO.

Answer 1

Geraldo, você pode lê o html da página principal e catar os links da página seguinte:

WebBrowser1.Navigate("Endereço da página principal")

E no evento WebBrowser1_DocumentCompleted, você lê o html da página principal dessa forma:

My.Computer.FileSystem.WriteAllText("C:\teste.htm", WebBrowser1.DocumentText, True)

E via Regex pode-se catar os link pela estrutura, tipo:

Dim Link As String = ""

Dim reLink As New Regex("<var id=""urlflv"" class=""dNone"">(.*?)%3FAWS", RegexOptions.Singleline)

Link = reLink.Match(html).Groups(1).Value

Answer 2

Olá Marques,

Obrigado pela atenção..

Você tem algum material para que eu possa compreender melhor o REGEX ?Eu ainda não tinha ouvido falar sobre o mesmo..

Antes de tentar solucionar meu problema baseado na sua dica preciso aprender sobre o REGEX..

Obrigado..

Answer 3

O problema é que se a pagina contiver vários frames o DocumentCompleted ira disparar varias vezes e acabara obtendo valores que não condizem com o esperado, infelizmente até hoje não achei nada que realmente verificasse se a pagina esta carregada a não ser usando javascript

Answer 4

Procure por HtmlAgilityPack, veja esse tutorial pois é muito pratico:

http://stackoverflow.com/questions/846994/how-to-use-html-agility-pack

Answer 5

Caso tenha conseguido a solução finalize sua Thread marcando a resposta

---

A vantagem de ser inteligente é que podemos fingir que somos imbecis enquanto ao contrario é completamente impossivel