Ai olha depende do que você quer fazer, por exemplo:
Se você quer que quando a sua HOME PAGE seja acessada no seu FORM pelo Webbrowser e que possa dar um BEEP e ainda por cima criar um arquivo de LOG faça o seguinte abaixo:
Insira no seu form o Microsoft Internet Control e um TIMER
' e faça isto no seu FORM
Private Sub Form_Load()
Timer1.Interval = 1
End Sub
beep
Dim MyIndex, FileNumber
FileNumber = FreeFile
Open "URL.log" For Output As #FileNumber
Write #FileNumber, "
http://www.google.com.br/"
Close #FileNumber
Else
End If
End Sub
'Quando alguem ou você acessar a sua HOME PAGE através do VB ele irá criar um 'Arquivo de LOG na UNIDADE C.
Agora se você quiser fazer isto pelo Internet Explorer é mais facil ainda
Veja o código abaixo:
'Referencie o Microsoft Internet Control e insira um TIMER em seu Projeto
Dim SWS As New SHDocVw.ShellWindows
Dim IE As SHDocVw.InternetExplorer
Private Sub Form_Load()
Timer1.Interval = 1
End Sub
beep
Dim MyIndex, FileNumber
FileNumber = FreeFile
Open "URL.log" For Output As #FileNumber ' Create filename.
Write #FileNumber, "
http://www.google.com.br/" ' Output text.
Close #FileNumber
Else
End If
Next
End Sub
Com este exemplo acima ele cria um arquivo de LOG toda vez que alguem acessar o Internet Explorer e acessar a sua Home PAGE
Espero que a ajudar que eu estou te enviando possa te ajudar ao bastante.
Atenciosamente,
Marcus Vinícius
Em caso de problemas com a dica, envie um e-mail para
Msmarcus@hotmail.comQue logo em seguida estarei entrando em contato contigo.