obtener todas las unidades de red mapeadas en la lista desplegable

Question

¿Usando VB.Net es posible enumerar todos los directorios/unidades de red mapeados en una lista desplegable?

He goggled, pero no puedo encontrar nada útil ..

Answer 1

para agregarlo a un DropDownList:

Private Sub TestCase1() 
     Dim drive As System.IO.DriveInfo 

    For Each drive In System.IO.DriveInfo.GetDrives() 
     If drive.DriveType = IO.DriveType.Network Then 
      DropDownList1.Items.Add(drive.Name) 
     End If 
    Next 
End Sub 

Ésta es la forma en que lo haría en C#:

private void TestCase1() 
    { 

     //Recurse through the drives on this system and add them to the new DropDownList DropDownList1 if they are a network drive. 
     foreach(System.IO.DriveInfo drive in System.IO.DriveInfo.GetDrives()) 
     { 
      //This check ensures that drive is a network drive. 
      if (drive.DriveType == System.IO.DriveType.Network) 
      { 
       //If the drive is a network drive we add it here to a combobox. 
       DropDownList1.Items.Add(drive); 
      } 
     } 
    } 

Answer 2

Mike tiene una gran respuesta, a la que agregaré algo para evitar que crezca cada vez que se haga clic en abrir. Bueno para decir ... Cajas combinadas en VB.

Dim drive As System.IO.DriveInfo 

If DropDownList1.Count < 1 

    For Each drive In System.IO.DriveInfo.GetDrives() 

     If drive.DriveType = IO.DriveType.Network Then 

      DropDownList1.Items.Add(drive.Name) 

     End If 
    Next 
End If