Biblioteca de tiempo de ejecución de Scripting  

Propiedad Drives

Devuelve una colección Drives que contiene todos los objetos Drive disponibles en la máquina local.

objeto.Drives 

objeto siempre es un objeto FileSystemObject.

Comentarios

Las unidades de disco removibles deben tener el disco insertado para que aparezcan en la colección Drives.

[JScript]

Puede iterar los miembros de la colección Drives utilizando el objeto Enumerator y la instrucción for:

[JScript]
function MostrarListaDeUnidades()
{
   var fso, s, n, e, x;
   fso = new ActiveXObject("Scripting.FileSystemObject");
   e = new Enumerator(fso.Drives);
   s = "";
   for (; !e.atEnd(); e.moveNext())
   {
      x = e.item();
      s = s + x.DriveLetter;
      s += " - ";
      if (x.DriveType == 3)
         n = x.ShareName;
      else if (x.IsReady)
         n = x.VolumeName;
      else
         n = "[La unidad no está lista]";
      s +=  n + "<br>";
   }
   return(s);
}

[VBScript]

Puede iterar los miembros de la colección Drives mediante una construcción For Each...Next como se muestra en el siguiente código:

[VBScript]
Function MostrarListaUnidades
   Dim fso, d, dc, s, n
   Set fso = CreateObject("Scripting.FileSystemObject")
   Set dc = fso.Drives
   For Each d in dc
      n = ""
      s = s & d.DriveLetter & " - " 
      If d.DriveType = 3 Then
         n = d.ShareName
      ElseIf d.IsReady Then
         n = d.VolumeName
      End If
      s = s & n & "<BR>"
   Next
   MostrarListaUnidades = s
End Function

Consulte también

Colección Drives | Propiedad Files | Propiedad SubFolders

Se aplica a: Objeto FileSystemObject

Ayuda de Javascript y Vbscript para Javascripts.astalaweb.com.