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.
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
Colección Drives | Propiedad Files | Propiedad SubFolders
Se aplica a: Objeto FileSystemObject
Ayuda de Javascript y Vbscript para Javascripts.astalaweb.com. |