VBA Automação IE desafio rede local [RESOLVIDO]

[deivity]

Pessoal, estou tentando o código abaixo, contudo no site http://www.scgas.com.br ou mesmo algum html que está na minha máquina, ele dá erro já no "Set Doc = ie.Document" .

O site http://www.scgas.com.br está sendo acessado de dentro da rede da empresa, ou seja, ele carrega direto do ip do servidor (ip 10.0.xxx.xx) pois estamos na mesma rede.

Testei com outros sites fora da rede da empresa e funciona.

Ao depurar notei que o Objeto IE não carrega as variáveis do IE, por isso não faz o set, já para todos outros sites fora que testei funcionou o carregamento das variáveis.

Pesquisei muito em site nacional e gringo mas nada ainda.
Amanhã tentarei rodar o código através do ip externo (fora da empresa) e postarei se obterei sucesso.

Contudo gostaria de saber se a automação do VBA - IE não funciona para html´s locais? Seria só para sites com ip externo?

Sub ok()
Dim ie As Object
Dim Doc As IHTMLDocument4
Dim elements As IHTMLElementCollection
Dim Element As IHTMLElement

Set ie = CreateObject("InternetExplorer.Application")

ie.Visible = True

ie.Navigate "http://www.scgas.com.br"
Do While ie.Busy
Application.Wait DateAdd("s", 1, Now)
Loop

Set Doc = ie.Document

Set elements = Doc.getElementsByTagName("input")

For Each Element In elements
Debug.Print Element.Name



Next

Set elements = Nothing

End Sub

[deivity]

Pessoal, acabei de testar fora da rede da empresa e funcionou, alguém sabe a razão ou como contornar isto? A única diferença neste caso é que acessando pelo IP externo do site funciona e de dentro da rede da empresa (que não pega ip externo, acessa o site direto no servidor) não funciona...

[Edcronos]

não entendo nada de aplicações desse tipo, mas se a pagina está na rede local teria que ter um gerenciador host local certo?

ie.Navigate "http://www.scgas.com.br"
"http://"
nesse ponto o ie está buscando um endereço externo " a não ser que ele esteja em modo offline"

não sei bem como funciona uma hospedagem de pagina local
mas será que ago como

ie.Navigate " F://www.scgas.com.br "
ou
ie.Navigate " http://200.1.1.10/info/demonstracoesfin ... s/idse/298 "

com o ip do servido da pagina na rede local não funcionaria?

já que a pagina está na rede local e o ip interno e externo se chocam

mas como falei pode ser apenas baboseira oq estou dizendo já que nem entendo do assunto

[webmaster]

Colega,

As versões do excel e do ie que testou dentro e fora da empresa são iguais? Tenho visto muitos problemas na automação com o ie na versão 11.

Att

[deivity]

Bom dia a todos,

Acabei de achar a resposta e FUNCIONOU!!!
Apenas desativei o modo protegido dentro das opções de segurança do IE, para quem não quer fazer isso tem outras soluções no link abaixo.

http://stackoverflow.com/questions/1296 ... l-intranet

Obrigado a todos!