Cómo quitar líneas en blanco de un archivo de texto con los comandos de Windows

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.