- Windows Script Host - VBScript - Sistema de archivos - Determinar el tipo de unidad -

En dependencia del tipo de unidad, pueden aplicarse determinadas actividades. Asi las cosas, no es posible formatear un disquete en NTFS. Para determinar el tipo de unidad, puede utilizarse el siguiente script.
Tras la declaración de las variables, se creará una referencia a "FileSystemObject" y se guardará en la variable "FSO". A continuación se creará una referencia a las unidades con el metodo "GetDrive( )" y se guardará en la variable "unidad". Con un "Select Case" de determinará el valor del atributo "DriveType". A continuación de mostrarán los resultados en la pantalla y se cerrará el script.

' tipounidad.vbs
' ================================================
Option Explicit
' declaracion de variables
Dim FSO, unidad, utipo
' definicion de constante
Const unombre="C:"
' crear objeto FSO
Set FSO = CreateObject("Scripting.FileSystemObject")
' determinar referencia a unidad
Set unidad=FSO.GetDrive(unombre)
' diferenciar tipos de unidad
Select Case unidad.Drivetype
Case 0: utipo = "desconocido"
Case 1: utipo = "unidad de medio intercambiable"
Case 2: utipo = "unidad de medio local"
Case 3: utipo = "unidad de red"
Case 4: utipo = "unidad de CD-ROM"
Case 5: utipo = "unidad virtual"
End Select
' mostrar los resultados
WScript.Echo unombre & " " & utipo

previo
Imprimir..
Ultima actualisación: Tue, 24 ▪ May ▪ 2011
próximo