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


305 - Enumerar unidades de red con Windows Script Host

<Volver> - Anterior - Siguiente



 

 

 

Contenido

 

 

 

 


Enumerar unidades de red con Windows Script Host

Ejemplo que utiliza Wsh para enumerar y listar las unidades de red del sistema utilizando el método EnumNetworkDrives de la clase WshNetwork.

Para el ejemplo agregar la referencia windows Script Host Object Model para poder acceder a Windows Script Host

Nota: si se desea crear la referencia mediante automatización con CreateObject , utilizar la siguiente línea:

Set obj = WScript.CreateObject("WScript.Network")

 

Luego los pasos para enumerar las unidades de red es exactamente igual

Nota: En el momento de enumerar las uniades, dentro del bucle, el primer índice corresponde a la letra de la unidad, el indice siguiente será el Path o ruta de la unidad de red actual

Si solo se desea el path se puede indicar en el bucle los saltos, por ejemplo

For i = 1 To obj.EnumNetworkDrives.Count - 1 Step 2

 

Si solo se desea obtener las letras

For i = 0 To obj.EnumNetworkDrives.Count - 1 Step 2

 

Código fuente en el formulario

 


Ejemplo para listar las unidades de red pero con el Api

Este otro código fuente , enumera las unidades de red usando la función del api WNetGetConnection

Formulario de ejemplo

vista del formulario para enumerar y listar las unidades de red del sistema

 

Colocar en el formulario un CommandButton, un control ListBox

Código fuente en el formulario

 


Recursos vb 6.0 - Enlaces relacionados



Buscar en Recursos vb