Questione : Visual Basic 6 -- Come controllare se orificio “è stabilito„ con il Winsock o un'alternativa?

Ho basicamente un programma che deve controllare se relativo un orificio è stabilito ad un IP/server. Sta usando la vecchia codificazione VB6 ora. Così eventualmente ci è un senso fare it.

Similar a fare un netstat /a per esempio, voi otterrebbe qualcosa come
TCP 83.188.245.170: 53954 c-24-98-162-231: 2544 ESTABLISHED


So conoscete che realmente è collegato ad un assistente. Posso controllare l'orificio di assistente che per vedere se relativo collegato, ma a volte io realmente non sono collegato all'assistente ma l'assistente è IN SU. Basicamente, devo controllare se sono collegato per determinare ripartire la mia applicazione o not.

Is questo possibile? In caso affermativo, come? Grazie! Tutto che abbia bisogno di è persino un senso semplice controllare se il relativo aperto/chiuso/ecc. So ci è Winsock, ma non sono sicuro come posso usarlo per controllare un LOCALPORT se il relativo collegato/cosa di established.

The è, IO SO che potete controllare using un winsock.listen su orificio 53954. Ma l'orificio cambia quando ricollegate poiché relativo un di base “ha stabilito appena„ l'orificio. Così dovrei ottenere il IP corrente relativi sopra o qualcosa di simile. class= del

Risposta : Visual Basic 6 -- Come controllare se orificio “è stabilito„ con il Winsock o un'alternativa?

che cosa farei sta denominando il netstat dal codice vb6 using Shell ed annotare l'uscita ad una certa lima di risultato, quindi per analizzarla ed ottenere le informazioni che ho bisogno di circa gli orificii:

per esempio, per orificio 443:

RetVal fioco
RetVal = Shell (“netstat - | ritrovamento„: 443 " > c:\temp\netstat.log ", 1)

l'archivio di uscita dovrebbe osservare qualcosa di simile:

  TCP 0.0.0.0: 443 0.0.0.0: 0 ASCOLTANDO
  TCP 172.20.1.78: 37623 216.166.12.33: 443 STABILITO
  TCP 172.20.1.78: 37625 216.166.12.33: 443 STABILITO
  TCP 172.20.1.78: 37629 216.166.12.33: 443 STABILITO
  TCP 172.20.1.78: 37630 216.166.12.33: 443 STABILITO
  TCP 172.20.1.78: 37648 216.166.12.33: 443 STABILITO
  TCP 172.20.1.78: 37649 216.166.12.33: 443 STABILITO
  TCP [::]: 443 [::]: 0 ASCOLTANDO