CONEXAO COM A INTERNET
Pessoal alguém sabe me dizer porque esta função para verificar o PC esta com internet ativa ou não, funciona no VB.NET estou usando no Visual Studio 2012
If My.Computer.Network.IsAvailable = True Then
MsgBox([Ô]Sistema com Internet.[Ô])
Else
MsgBox([Ô]Sistema sem Internet[Ô])
End If
If My.Computer.Network.IsAvailable = True Then
MsgBox([Ô]Sistema com Internet.[Ô])
Else
MsgBox([Ô]Sistema sem Internet[Ô])
End If
Se nao me engano se a internet nao estiver conectado tipo, se vc estiver somente e rede ele aparece como true...
TENTA DESTA FORMA...
Public Function ChecarInternet() As Boolean
Try
Return My.Computer.Network.Ping([Ô]www.google.com[Ô])
Catch
Return False
End Try
End Function
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Label1.Text = ChecarInternet()
End Sub
Public Function ChecarInternet() As Boolean
Try
Return My.Computer.Network.Ping([Ô]www.google.com[Ô])
Catch
Return False
End Try
End Function
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Label1.Text = ChecarInternet()
End Sub
desta forma eu já fiz e funciona, mais para mim não serve pois a função tem que ficar num timer, e quando esta função for chamado o sistema trava.
Citação::
desta forma eu já fiz e funciona, mais para mim não serve pois a função tem que ficar num timer, e quando esta função for chamado o sistema trava.
Ja ouviu falar de BackgroundWork? pesquise e aprenda sobre que nunca mais suas aplicacoes vai travar. Acabei de fazer usando esse mesmo codigo e o backgroundwork e a aplicacao nao esta travando...
E ai amigo o que resolveu?
Tópico encerrado , respostas não são mais permitidas