| |
|
|
| |
-
Windows Script Host - VBScript - Sistema de archivos - Comprobar el disco duro
-
Microsoft pone a disposición de sus usuarios el programa de consola "ChkDisk" para comprobar el disco duro. La clase
"Win32_LogicalDisk" de WMI, dispone de un metodo con el mismo nombre. El ejemplo a continuación, muestra como proceder con este
comando.
Una ves declaradas la variables y constantes, se creará una referencia a "cimv2-namspace" con "GetObject( )" y se
guardará en la constante "computer". El resultado de esta operación es un objeto del tipo "SWbemService", cuya
referencia será guardada en la variable "WMIService". A continuación, se hará referencia a una unidad del conjunto
de instancias de la clase "Win32_LogicalDisk" con el metodo "Get( )" y se guardará en la variable "discos".
El acceso a la unidad se realizará sobre "DeviceID". La llamada del metodo "ChkDsk( )" con la constante "FIX_ERRORS = False"
cierra el script.
Este script funciona solo a partir de Windows XP, ya que el metodo "ChkDisk( )" está implementado en WMI a partir de su versión 1,5.
' cheqdisc.vbs
' ================================================
Option Explicit
' declaracion de variables
Dim WMIService, discos
' declarar constantes
Const FIX_ERRORS = False
Const unidad="C:"
Const computer="pc25"
' crear objeto
Set WMIService = GetObject("WinMgmts:" & _
"{impersonationLevel=impersonate}!\\" & computer & "\root\cimv2")
' crear un objeto de unidad
Set discos = WMIService.Get("Win32_LogicalDisk.DeviceID='" & _
unidad & "'")
' llamada de ChkDsk y exposicion de resultados
WScript.Echo discos.ChkDsk(FIX_ERRORS)
 |
|
Ultima actualisación: Tue, 24 ▪ May ▪ 2011
|
|
|
|
