Cuestión : Visual Basic 6 -- ¿Cómo comprobar si puerto “se establece” con el Winsock o una alternativa?

Tengo básicamente un programa que necesite comprobar si su un puerto se establece a un IP/server. Está utilizando la vieja codificación VB6 ahora. Tan esperanzadamente hay una manera de hacer it.

Similar a hacer un netstat /a por ejemplo, usted conseguiría algo como el
TCP 83.188.245.170: 53954 c-24-98-162-231: 2544 ESTABLISHED


So que usted sabe que está conectado realmente con un servidor. Puedo comprobar el puerto de servidor para ver si su haber conectado, sino yo no está conectada a veces realmente con el servidor pero el servidor está PARA ARRIBA. ¿Básicamente, necesito comprobar si estoy conectado para determinar reanudar mi uso o not.

Is esto posible? ¿Si es así cómo? ¡Gracias! Toda lo que necesito es incluso una manera simple de comprobar si su abierto/cerrado/etc. Sé hay Winsock, pero no estoy seguro cómo puedo utilizarlo para comprobar un LOCALPORT si es su conectado/la cosa de established.

The, YO SÉ que usted puede comprobar usar un winsock.listen en el puerto 53954. Pero el puerto cambia cuando usted vuelve a conectar puesto que su un básico “acaba de establecer” el puerto. Necesitaría tan conseguir el IP actual sus encendido o algo similar. class= del

Respuesta : Visual Basic 6 -- ¿Cómo comprobar si puerto “se establece” con el Winsock o una alternativa?

qué haría está llamando el netstat del código vb6 usar Shell y registrar la salida a algún archivo del resultado, después para analizarlo y para conseguir la información que necesito sobre los puertos:

por ejemplo, para el puerto 443:

RetVal dévil
RetVal = Shell (“netstat - | hallazgo”: 443 " > c:\temp\netstat.log ", 1)

el archivo de salida debe mirar algo similar:

  TCP 0.0.0.0: 443 0.0.0.0: 0 ESCUCHANDO
  TCP 172.20.1.78: 37623 216.166.12.33: 443 ESTABLECIDO
  TCP 172.20.1.78: 37625 216.166.12.33: 443 ESTABLECIDO
  TCP 172.20.1.78: 37629 216.166.12.33: 443 ESTABLECIDO
  TCP 172.20.1.78: 37630 216.166.12.33: 443 ESTABLECIDO
  TCP 172.20.1.78: 37648 216.166.12.33: 443 ESTABLECIDO
  TCP 172.20.1.78: 37649 216.166.12.33: 443 ESTABLECIDO
  TCP [::]: 443 [::]: 0 ESCUCHANDO