Ya sea que las crea usted mismo, o alguien les envía a usted, los archivos con líneas en blanco pueden plantear problemas. Si es necesario eliminar las líneas vacías, puede pasar un tiempo valioso con la tecla "Borrar" en repetidas ocasiones. Windows viene con el software libre que puede automatizar esta tarea. La herramienta "Windows Script Host" le permite crear archivos de comandos que interactúan con Windows y realizar tareas útiles. Por ejemplo, mediante la creación de un simple script VBScript, se puede utilizar para eliminar líneas en blanco de un archivo de texto.
Instrucciones
1 Abra el Explorador de Windows y navegue a la carpeta que contiene un archivo con líneas en blanco. Anote el nombre del archivo y su carpeta. Por ejemplo, si la ruta del archivo es "C: \ myFiles \ test1.txt", recuerda que la ruta del archivo.
2 Bloc de notas abierto y pegar el siguiente texto en un nuevo documento:
'Líneas 1-3: definir los objetos del sistema
CONST ForReading = 1
CONST ForWriting = 2
Dim objFSObject, strLineBuffer
'Líneas 4-5: Asignar archivo de entrada a la variable
Dim strInputFile, strCurrentFile
strInputFile = "FILE_WITH_BLANK_LINES"
'Líneas 6-7: instalar el archivo objeto del sistema y leer archivo de entrada
Establecer objFSOObject = CreateObject ( "Scripting.FileSystemObject")
Establecer objCurrentFile = objFSOObject.OpenTextFile (strInputFile, ForReading)
«tratamiento Loop - Tienda líneas no están en blanco en búfer temporal
Hacer hasta objCurrentFile.AtEndOfStream
tempLine = objCurrentFile.Readline
tempLine = Trim (tempLIne)
Si Len (tempLine)> 0 Then
strLineBuffer = strLineBuffer y tempLine & "" & vbCrLf
Terminara si
Lazo
'Escribir para amortiguar archivo de entrada
objCurrentFile.Close
Establecer objCurrentFile = objFSOObject.OpenTextFile (strInputFile, ForWriting)
objCurrentFile.Write strLineBuffer
Reemplazar "FILE_WITH_BLANK_LINES" con el nombre de vía completo del archivo que tiene líneas en blanco.
3 Haga clic en "Archivo" y seleccione "Guardar". La ventana "Guardar como" se abrirá. Tipo de "Remove_Blank_Lines.vbs" en el cuadro de texto "Nombre" y haga clic en "Guardar".
4 Abra el Explorador de Windows y navegue a ese archivo. Haga doble clic en él. La secuencia de comandos ejecutar los comandos para eliminar las líneas en blanco del archivo. Abrir el archivo para comprobar que no existen líneas en blanco.
Consejos y advertencias
- Compruebe que el archivo de entrada no está abierto en el Bloc de notas u otra aplicación antes de ejecutar la secuencia de comandos.