Recorrido por la colección de unidades en ASP

  • Por
Recorrido por todas las unidades que forman parte del sistema de archivos de un servidor ASP, mostrando sus principales propiedades.
En el capítulo en el que hablamos del File System Object (FSO) comentamos la existencia de una propiedad que contiene un array con todas las unidades disponibles en la máquina servidor. Cada uno de los elementos del array era un objeto unidad, de los que vimos en el capítulo anterior.

En este ejemplo vamos a hacer un recorrido a la colección de unidades para mostrar algunas de las propiedades de cada una de las unidades del array.

El código es el siguiente.

<%
'Conecto con el sistema de archivos
set FSO = server.createObject("Scripting.FileSystemObject")
'obtengo la coleccion de unidades
set Unidades = FSO.Drives

'para cada unidad
for each unidad in unidades
    'imprimo su letra
    response.write "Unidad " & unidad.driveLetter

    'si la unidad esta disponible
    if unidad.isReady then
       'imprimo el espacio que tiene libre para nuestro uso
       response.write ", espacio disponible: " & unidad.availableSpace
       'imprimo el espacio total
       response.write ", espacio Total: " & unidad.totalSize
    else
       'informo que la unidad no esta disponible
       response.write ", no disponible en este momento"
    end if
    response.write "<br>"
next
%>


El ejemplo está comentado ligeramente en el propio código, aunque veremos alguna explicación adicional.

La primera instrucción se hace para crear el objeto FSO, luego extraemos la colección de unidades de la propiedad Drives de dicho objeto.

Luego se realiza un recorrido del array con una estructura FOR EACH, que se encargará de iterar con cada una de las unidades del array, desde el principio al fin.

Para cada unidad se imprime su letra y se comprueba si está preparada o no mediante la propiedad IsReady. Si estaba preparada se imprimen los espacios disponibles y totales de la unidad. Si no estaba preparada, se imprime un mensaje que lo indica.

Autor

Miguel Angel Alvarez

Miguel es fundador de DesarrolloWeb.com y la plataforma de formación online EscuelaIT. Comenzó en el mundo del desarrollo web en el año 1997, transformando su hobby en su trabajo.

Compartir

Comentarios

Victor Hugo

29/8/2004
El codigo esta muy bueno para poder ver el espacio en los discos, pero como puedo hacer para que pueda ver el espacio de los discos duros de otras maquinas ya que este codigoo solo me muestra el espacio de disco del servidor.