Página 1 de 1

Java - VBA - Internet explorer controls - excel

Enviado: 11 Abr 2020 às 00:39
por gpporto
Pessoal, boa noite!

Estou precisando de ajuda com o codigo abaixo:

Eu disse que meu "ie" é a pagina "X" abaixo, dentro dessa pagina tem vários links em javascript que quando clicados não alteram a url da pagina, porém, a pagina muda. Quando eu uso o getelementsbytagname para trazer uma célula de uma tabela, ele me traz a célula que estão na pagina padrão quando se acessa a pagina a primeira vez, ou seja, ele não traz a informação da pagina que entra quando eu executo o link do java no vba.

Alguem sabe como resolver isso?


"
ie.navigate "http://www.xxxx.com.br/Listagem.aspx"

Do While ie.Busy And ie.readyState <> "REDYSTATE_COMPLETE"
DoEvents
Loop

ie.document.parentWindow.execScript "__doPostBack('ctl00_ContentPlaceHolder_pagMedicao','Change$" & Planilha1.Range("A3").Value & "')"

Do While ie.Busy And ie.readyState <> "REDYSTATE_COMPLETE"
DoEvents
Loop

Cells(4, 1) = ie.document.getElementsByTagName("td")(2).innerText
"

Re: Java - VBA - Internet explorer controls - excel

Enviado: 13 Abr 2020 às 09:07
por gpporto
UP!! pessoal, acredito que isso não seja possível, mas vê se algum profissa ai em VB, internet controls pode me ajudar.
Tenho as 3 linhas abaixo num código, qual eh o meu problema: O item (1) entra no site asp abaixo, a linha (2) executa um java que da acesso a outra pagina, porém a URL não muda, assim sendo, quando eu executo a linha (3) do código, ele me retorna o "ElementbyID da pagina (1) inicial, porém não é o ID da pagina que eu acessei quando executei o scritp da linha (2).


Pelo que procurei na internet isso não é possível , porque a url fica oculta para que acessa de fora do servidor, mas teriam solução com sendykeys, poreém eu acho essas soluções meio forçadas.

Alguem me ajuda pelo amor?

"
1) IE.navigate "http://xxxx.com.br/Listagem.aspx"

2) IE.document.parentWindow.execScript "__doPostBack('ctl00_ContentPlaceHolder_pagMedicao','Change$5')"

3) Cells(4, 1) = IE.document.getElementById("ctl00_ContentPlaceHolder_gvListagemRVEAdm_ctl02_Label2").innerHTML
"