elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Tutorial básico de Quickjs


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP)
| | | |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo)
| | | | |-+  detectar conexion de internet
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: detectar conexion de internet  (Leído 1,066 veces)
Zeroql


Desconectado Desconectado

Mensajes: 957


Todo lo k sucede sucede por una razon


Ver Perfil WWW
detectar conexion de internet
« en: 9 Julio 2007, 22:56 pm »

buenas como estan todos....
mi pregunta es como hago para detectar una conexion a internet por MODEM, ADSL Y RED, alguien sabe como?
tengo un codigo pero solo es para ver la conexion en MODEM


En línea

Dime y lo olvido, enseñame y lo recuerdo, involucrame y lo aprendo.
/.-ZEROQL.-\   -----  #937675#

Hendrix
In The Kernel Land
Colaborador
***
Desconectado Desconectado

Mensajes: 2.276



Ver Perfil WWW
Re: detectar conexion de internet
« Respuesta #1 en: 9 Julio 2007, 23:08 pm »

Look the ApiGuide my Friend!! :)

Código
  1. Const NETWORK_ALIVE_AOL = &H4
  2. Const NETWORK_ALIVE_LAN = &H1
  3. Const NETWORK_ALIVE_WAN = &H2
  4. Private Declare Function IsNetworkAlive Lib "SENSAPI.DLL" (ByRef lpdwFlags As Long) As Long
  5. Private Sub Form_Load()
  6.    'KPD-Team 2001
  7.    'URL: http://www.allapi.net/
  8.    'E-Mail: KPDTeam@Allapi.net
  9.    Dim Ret As Long
  10.    If IsNetworkAlive(Ret) = 0 Then
  11.        MsgBox "The local system is not connected to a network!"
  12.    Else
  13.        MsgBox "The local system is connected to a " + IIf(Ret = NETWORK_ALIVE_AOL, "AOL", IIf(Ret = NETWORK_ALIVE_LAN, "LAN", "WAN")) + " network!"
  14.    End If
  15. End Sub

Espero que sea esto que buscas.

Un Saludo.  ;)



En línea

"Todos los días perdemos una docena de genios en el anonimato. Y se van. Y nadie sabe de ellos, de su historia, de su peripecia, de lo que han hecho, de sus angustias, de sus alegrías. Pero al menos una docena de genios se van todos los días sin que sepamos de ellos". - Juan Antonio Cebrián
Zeroql


Desconectado Desconectado

Mensajes: 957


Todo lo k sucede sucede por una razon


Ver Perfil WWW
Re: detectar conexion de internet
« Respuesta #2 en: 9 Julio 2007, 23:19 pm »

Muchas gracias Hendrix. es algo parecido, pero ya me las ingenio yo, gracias, por cierto felicidades por ser el nuevo moderador.
En línea

Dime y lo olvido, enseñame y lo recuerdo, involucrame y lo aprendo.
/.-ZEROQL.-\   -----  #937675#

Hendrix
In The Kernel Land
Colaborador
***
Desconectado Desconectado

Mensajes: 2.276



Ver Perfil WWW
Re: detectar conexion de internet
« Respuesta #3 en: 9 Julio 2007, 23:36 pm »

Este te avisa si estas en una red o no.

Gracias.  ;)

Un Saludo
En línea

"Todos los días perdemos una docena de genios en el anonimato. Y se van. Y nadie sabe de ellos, de su historia, de su peripecia, de lo que han hecho, de sus angustias, de sus alegrías. Pero al menos una docena de genios se van todos los días sin que sepamos de ellos". - Juan Antonio Cebrián
Zeroql


Desconectado Desconectado

Mensajes: 957


Todo lo k sucede sucede por una razon


Ver Perfil WWW
Re: detectar conexion de internet
« Respuesta #4 en: 9 Julio 2007, 23:40 pm »

si, me avisa el tipo de red que es, lan wan
En línea

Dime y lo olvido, enseñame y lo recuerdo, involucrame y lo aprendo.
/.-ZEROQL.-\   -----  #937675#

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
detectar ordenador con sobrecarga de internet
Redes
OssoH 6 5,374 Último mensaje 20 Octubre 2011, 11:30 am
por T0rete
Detectar si podemos hacer conexion ext. al MySQL
Hacking
alienmaster 2 1,563 Último mensaje 14 Octubre 2014, 19:28 pm
por el-brujo
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines