[VB.NET] Verificar conexión a internet

  • 3 Respuestas
  • 4543 Vistas

0 Usuarios y 1 Visitante están viendo este tema.

Desconectado Bloc

  • *
  • Underc0der
  • Mensajes: 19
  • Actividad:
    0%
  • Reputación 0
  • Skype: Bloc-Hack
    • Ver Perfil

[VB.NET] Verificar conexión a internet

  • en: Agosto 13, 2013, 08:08:04 pm
Código: vb.net
  1.     Function Verificar_conexion_a_internet()
  2.  
  3.         'Nombre: Verificar conexión a internet
  4.         'Autor: Bloc
  5.         'Fecha Publicada: 13/08/2013
  6.  
  7.         If My.Computer.Network.IsAvailable = True Then
  8.             Try
  9.                 If My.Computer.Network.Ping("www.google.com", 10) Then
  10.                     You are not allowed to view links. Register or Login("Si hay conexión a internet", MsgBoxStyle.Information)
  11.                 End If
  12.             Catch ex As Exception
  13.                 You are not allowed to view links. Register or Login("No hay conexión a internet", MsgBoxStyle.Critical)
  14.             End Try
  15.         End If
  16.     End Function

Saludos!.
« Última modificación: Mayo 27, 2014, 09:56:51 pm por Expermicid »
Skype: Bloc-Hack

Desconectado [L]ord [R]NA

  • *
  • Underc0der
  • Mensajes: 89
  • Actividad:
    0%
  • Reputación 0
  • H-Sec
  • Skype: lordrna
  • Twitter: lordrna
    • Ver Perfil

Re:[VB.NET] Verificar conexión a internet

  • en: Agosto 20, 2013, 11:54:07 pm
El codigo no funciona... inhabilite el DNS de mi red y al ejecutar me dice que no hay conexion de internet. pero hago ping a 8.8.4.4 y veo que si tengo conexion a internet.

Desconectado CrazyKade

  • *
  • Underc0der
  • Mensajes: 184
  • Actividad:
    0%
  • Reputación 0
  • Я только знаю что ничего не знаю!
    • Ver Perfil

Re:[VB.NET] Verificar conexión a internet

  • en: Agosto 21, 2013, 11:15:42 am
You are not allowed to view links. Register or Login
El codigo no funciona... inhabilite el DNS de mi red y al ejecutar me dice que no hay conexion de internet. pero hago ping a 8.8.4.4 y veo que si tengo conexion a internet.

Jojojoo, muy buen detalle el aportado por [L]ord [R]NA, ademas tiene esa sutileza que me encanta!

Querido Bloc, es cierto que si no tienes DNS que resuelva un domino tu programa fallará. Por tanto reemplaza esta linea:

Código: vb.net
  1. If My.Computer.Network.Ping("www.google.com", 10) Then

Por esta otra:

Código: vb.net
  1. If My.Computer.Network.Ping("8.8.8.8", 10) Then

Saludos!

Desconectado [L]ord [R]NA

  • *
  • Underc0der
  • Mensajes: 89
  • Actividad:
    0%
  • Reputación 0
  • H-Sec
  • Skype: lordrna
  • Twitter: lordrna
    • Ver Perfil

Re:[VB.NET] Verificar conexión a internet

  • en: Agosto 21, 2013, 11:19:48 pm
Código: C
  1. private void Test_Connection()
  2. {
  3.     System.Net.NetworkInformation.Ping ping = new System.Net.NetworkInformation.Ping();
  4.     System.Net.NetworkInformation.PingReply reply = ping.Send("1.1.1.1");
  5.     MessageBox.Show(reply.Status.ToString()!="Success"?
  6.                     "No se tiene conexion a Internet":
  7.                     "Se tiene conexion a Internet");            
  8.         }
« Última modificación: Agosto 21, 2013, 11:24:46 pm por [L]ord [R]NA »

 

[C#] Creacion de un Troyano de conexion inversa

Iniciado por BigBear

Respuestas: 1
Vistas: 4827
Último mensaje Abril 08, 2015, 08:32:24 pm
por Jhonny00xs