LER STRING DE BARRA DE TITULO IE

VAUGHYMAN 16/08/2007 08:19:16
#231129
Prezados Colaboreadores,

Gostaria de uma funcao para retornar a string da barra de titulo do Internet Explorer ou outro formulario qualquer.

Obrigado
USUARIO.EXCLUIDOS 16/08/2007 08:28:52
#231132
Para o Ie vc pode usar o Microsoft Internet Control como referencia e buscar da seguinte forma.

Dim IE As InternetExplorer
Dim WIN As New ShellWindows

Private Sub Command1_Click()

For Each IE In WIN

MsgBox Ie.LocationName

Next

End Sub



ele vai dar a msg das janelas do Ie e do Windows explorer
VAUGHYMAN 17/08/2007 12:45:30
#231376
Não funcionou. Erro no For Each IE In WIN

USUARIO.EXCLUIDOS 19/08/2007 14:43:40
#231573
[txt-color=#ff0000]Codigo dentro do form.[/txt-color][txt-color=#3333ff]Dim IE As InternetExplorer
Dim WIN As New ShellWindows
Private Sub Form_Load()
For Each IE In WIN

MsgBox IE.LocationName

Next
End Sub
[/txt-color]

Antes de testar o codigo faça o seguinte no menu:

[txt-color=#3333ff]Project > References > [/txt-color]

[txt-color=#3333ff]Agora basta axar na lista a referencia 'Microsoft Internet Controls' e pronto.[/txt-color]

[txt-color=#ff0000]Se for so isso incerre o topico t+.[/txt-color]
Tópico encerrado , respostas não são mais permitidas