| |
|
|
| |
-
Windows Script Host - VBScript - Sistema de archivos - Crear una carpeta
-
Para crear un carpeta, la clase "FileSystemObject" dispone del metodo "CreateFolder( )".
El ejemplo siguiente, con "CreateObject( )" se crea una referencia a ina instancia de "FileSystemObject", la cual será
guardada en la variable FSO. La comprobación de la existencia de la carpeta se realizará con "FolderExists( )", lo que será
negado con el operador "NOT". Solo cuando la carpeta no exista, se creará la misma, con el metodo "CreateFolder( )". En el
caso contrario devolverá un mensaje, el cual indica que la carpeta existe.
' creardirectorio.vbs
' ================================================
Option Explicit
' declaracion de variables
Dim FSO, carpeta
' definicion de constantes
Const nombrecarpeta="text"
' crear objeto
Set FSO = CreateObject("Scripting.FileSystemObject")
' comprobar que si el directorio existe
If Not FSO.FolderExists(nombrecarpeta) Then
' crear directorio
FSO.CreateFolder(nombrecarpeta)
Else
' salida de un mensaje de error
WScript.Echo "La carpeta " & nombrecarpeta & " existe ya."
End If
 |
|
Ultima actualisación: Tue, 24 ▪ May ▪ 2011
|
|
|
|
