LER STRING DE BARRA DE TITULO IE
Prezados Colaboreadores,
Gostaria de uma funcao para retornar a string da barra de titulo do Internet Explorer ou outro formulario qualquer.
Obrigado
Gostaria de uma funcao para retornar a string da barra de titulo do Internet Explorer ou outro formulario qualquer.
Obrigado
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
ele vai dar a msg das janelas do Ie e do Windows explorer
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
Não funcionou. Erro no For Each IE In WIN
[txt-color=#ff0000]Codigo dentro do form.[/txt-color][txt-color=#3333ff]Dim IE As InternetExplorer
Dim WIN As New ShellWindows
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]
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