VBScript es un lenguaje de programación ligero desarrollado por Microsoft . Es muy útil saber cómo programar en VBScript , ya que sus intérpretes para el lenguaje están integrados en todos los sistemas operativos de Microsoft . No se necesitan herramientas especiales de programación son necesarios para ejecutar o escribir código en VBScript. Este lenguaje se puede utilizar en el cliente o se añade a las páginas Web . Instrucciones
1
Haga clic derecho en el Explorador de Windows , seleccione " Nuevo" del menú desplegable y luego haga clic en el " Documento de texto " en el menú para crear un archivo de texto .
< Br > 2
Abra el archivo recién creado para la edición. Este será el contenedor de todo el código VBScript que escribes. En cada paso adelante, verá varias líneas de código con una descripción simple Inglés de lo que hacen . Al poner todas estas líneas de código entre sí, se termina con una secuencia de comandos para crear un archivo de texto .
3
Crear una variable para el objeto del sistema de archivos y crear instancias de ella (en posición a una nueva instancia del objeto) . En VBScript crear variables por " dimensionar " con el comando " Dim " . Las variables complejas ( los que no son cadenas, enteros o booleanos ) tienen que ser instanciado antes de poder utilizarlos
Copia el siguiente código en el archivo de texto: . ObjFSO Dim ' Como FileSystemObjectSet objFSO = CreateObject ( " Scripting . FileSystemObject ")
4
Agregar una variable de cadena de la ruta del directorio en el que desea colocar el archivo y ponerlo en la posición deseada .
Copia el siguiente código en su texto archivo : strDirectory Dim ' Como StringstrDirectory = "C : \\ newdirectory "
5
Asegúrese de que la carpeta del directorio. Si el directorio no existe , créelo con el objeto del sistema de archivos
Copia el siguiente código en el archivo de texto: . ObjDirectory Dim ' Como objFSO.FolderExists Objectif ( strDirectory ) ThenSet objDirectory = objFSO.GetFolder ( strDirectory ) ElseSet objDirectory = objFSO.CreateFolder ( strDirectory ) End If
6
Hacer una variable de cadena para el nombre de archivo y la puso en un valor adecuado .
Copia el siguiente código en tu archivo de texto: strFile Dim ' Como StringstrFile = " NewFile.txt "
7
Crear una variable para el archivo de texto y crear instancias de ella. El método CreateTextFile tiene un parámetro opcional para sobrescribir el archivo que ya existe
Copia el siguiente código en el archivo de texto : . ObjTextFile Dim ' Como ObjectDim blnOverwrite ' Como BooleanblnOverwrite = TrueSet objTextFile = objFSO.CreateTextFile ( strDirectory y " \\ " & strFile , blnOverwrite )
8
Escribir datos en el archivo recién creado con el código de abajo . Hay dos métodos para escribir en archivos , "escribir" y " WriteLine ". Este último método incluye automáticamente un carácter de nueva línea para usted , mientras que el primero sólo añade los datos a lo que ya está presente
Copia el siguiente código en el archivo de texto: . ObjTextFile.Write ("Esto es ") objTextFile . WriteLine ( " un nuevo archivo de texto ") " Esto se traduce en la cadena" Este es un nuevo archivo de texto "
9
Cierre el archivo con código y liberar adecuadamente todos los objetos.
copie el código siguiente en el archivo de texto : objTextFile.CloseSet objTextFile = NothingSet objDirectory = NothingSet objFSO = Nothing
10
Guardar todo el código que ha creado en los pasos anteriores en el archivo de texto al principio y al a continuación, cierre el archivo. Cambie el nombre del archivo con " . Vbs " en lugar de " . Txt" haciendo clic derecho sobre el archivo y seleccionando la opción " Cambiar nombre " en el menú emergente. Haga doble clic en el archivo para ejecutar el código.