ENDERECO NO INTERNET EXPLORER
Tem como eu jogar numa variavel o endereço que for exibido no Internet Explorer????????
POSTADO por RAFAEL_FP no VBMANIA
'Adaptado de um projeto em http://gaminghelp.pics-world.net/mystic/kochelp.html por rafabugre@hotmail.com
'ATENÇÓ¡O: Referenciar Microsoft Internet Controls
Lista todas as janelas abertas pelo internet explorer
(Inclui windows explorer, já que são a mesma coisa)
'collection of all open explorer windows
Dim SWs As New SHDocVw.ShellWindows
'pointer to one explorer window
Dim IE As SHDocVw.InternetExplorer
'Listar janelas
For Each IE In SWs
MsgBox IE.LocationURL
Next
'Adaptado de um projeto em http://gaminghelp.pics-world.net/mystic/kochelp.html por rafabugre@hotmail.com
'ATENÇÓ¡O: Referenciar Microsoft Internet Controls
Lista todas as janelas abertas pelo internet explorer
(Inclui windows explorer, já que são a mesma coisa)
'collection of all open explorer windows
Dim SWs As New SHDocVw.ShellWindows
'pointer to one explorer window
Dim IE As SHDocVw.InternetExplorer
'Listar janelas
For Each IE In SWs
MsgBox IE.LocationURL
Next
Tópico encerrado , respostas não são mais permitidas