| |
|
|
| |
-
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
 |
|
Ultima actualisación: Tue, 24 ▪ May ▪ 2011
|
|
|
|