|
|
|
|
|
|
|
|
Dicas
|
|
|
Visual Basic (Internet)
|
|
 |
Título da Dica: Detecta uma conexão com internet usando o controle Winsock
|
 |
|
|
|
Postada em 19/9/2000 por Webmaster
webmaster@vbweb.com.br
Private Function OnTheNet() As Boolean
Winsock1.Close
Winsock1.Bind
If Winsock1.LocalIP = "" Then
OnTheNet = False
Else
OnTheNet = True
End If
End Function
|
|
|
|
|
