Sección de códigos , trucos y ejemplos para visual basic


136 - Averiguar si un puerto está en uso

<Volver> - Anterior - Siguiente



 

 

Esta rutina averigua y devuelve un valor de tipo boolean si un puerto determinado está siendo usado utilizando una referencia al objeto Winsock

Para el ejemplo no se necesita agregar un control WinSock ya que se crea mediante Automatización con CreateObject, es decir de esta forma:

 

Set Objeto WinSock = CreateObject("MSWinsock.Winsock.1")

 

Controles: Colocar un Command1 , un Text1 y especificar en el TextBox el número de puerto que se quiere consultar

 

Código en un formulario

 


Recursos vb6 - Enlaces relacionados



Buscar en Recursos vb