Cómo buscar datos en un archivo con VB Script

Aprender a buscar datos en un archivo con VB Script puede hacer que la aplicación de scripting más dinámico. VB Script es muy similar a Visual Basic por lo tanto, si usted tiene alguna experiencia en VB no tendrá un problema de trabajo con VB Script. En VB Script se puede manipular archivos similares a otros lenguajes de programación como crear, agregar, eliminar datos y lectura de archivos . Para leer y buscar datos en un archivo, puede utilizar el " Scripting.FileSystemObject . " Una vez que lea los datos a continuación, puede buscar cualquier cosa con los datos en la memoria . Instrucciones
1

Bloc de notas de lanzamiento y el tipo " estos son los datos de mi archivo" y presionar " Enter". Escriba " 1 " y presionar " Enter". Tipo " 2 " y presionar " Enter". Tipo " 3 " y presionar " Enter". Escriba " 4 " y presionar " Enter". Escriba " 5 " y presionar " Enter". Presione " Ctrl" y " S " para guardar el archivo. Guárdelo en "C: \\ Temp" como " . ReadFile.txt " Cierra el archivo
2

lanzamiento Bloc de notas y escriba lo siguiente para definir la variable " FileSystemObject " y abra el archivo que creó en el paso . una para la lectura :

Set fsoObj = CreateObject ( " Scripting.FileSystemObject ") Set rdFile = fsoObj.OpenTextFile ("C: \\ temp \\ readFile.txt " , ForReading )

3

Crear las variables que va a utilizar para buscar el archivo :

Const ForReading = 1Dim lineNumDim myLineArray ()
4

bucle a través de los datos de archivo y llenar la matriz con sus datos :

i = 0Do Hasta rdFile.AtEndOfStreamRedim Preserve myLineArray ( i ) myLineArray ( i) = rdFile.ReadLinei = i + 1LooprdFile.Close
5

Añada el siguiente " para ... Loop " para buscar los datos de la matriz de número" 4 " y mostrar un mensaje cuando se constata :

linenum = 0For Cada strLine en myLineArrayIf ( strLine =" 4 ") thenWScript.Echo " Usted ha encontrado " y strLine y " en línea " y linenum &". "End iflineNum = linenum + 1Siguiente
6

Pulse" Ctrl " y" S " para poner en marcha la opción "Guardar como" ventana de diálogo. Tipo " vbScriptFile.vbs " al lado de " . Nombre del archivo " Guardar en "C: \\ Temp" y cierre el archivo . Vaya a " C: \\ Temp ." Y haga doble clic en " vbScriptFile.vbs " para ejecutar el programa de descarga