Se você criá-los , ou alguém envia para você , arquivos com linhas em branco pode causar problemas . Se você precisa remover as linhas em branco , você pode gastar um tempo valioso de pressionar a tecla "Delete" repetidamente. O Windows vem com um software gratuito que pode automatizar essa tarefa. A ferramenta " Windows Script Host " permite que você crie scripts de comando que interagem com o Windows e executam tarefas úteis. Por exemplo, através da criação de um script VBScript simples, você pode usá-lo para remover linhas em branco a partir de um arquivo de texto. Instruções
1
Abra o Windows Explorer e navegue até a pasta que contém um arquivo com linhas em branco. Anote o nome do arquivo e sua pasta. Por exemplo, se o caminho do arquivo é "C: \\ MyFiles \\ test1.txt " , lembre-se de que o caminho do arquivo
2
Abra o bloco de notas e cole o seguinte texto em um novo documento : .
' Linhas 1-3 : Definir objetos do sistema
CONST ForReading = 1
CONST ForWriting = 2
Dim objFSObject , strLineBuffer
' Linhas 4 -5 : Atribuir arquivo de entrada para variável
Dim strInputFile , strCurrentFile
strInputFile = " FILE_WITH_BLANK_LINES "
' Linhas 6-7 : Configurar objeto Sistema de arquivos e ler arquivo de entrada
Set objFSOObject = CreateObject (" Scripting.FileSystemObject " )
Set objCurrentFile = objFSOObject.OpenTextFile ( strInputFile , ForReading )
' loop de processamento - Armazene as linhas não- branco em buffer temporário
Do Until objCurrentFile.AtEndOfStream
templine = objCurrentFile.Readline
templine = Trim ( templine )
Se Len ( templine )> 0 Então
strLineBuffer = strLineBuffer & templine & "" & vbCrLf
End If
loop
' Write buffer para arquivo de entrada
objCurrentFile.Close
Set objCurrentFile = objFSOObject.OpenTextFile ( strInputFile , ForWriting )
objCurrentFile.Write strLineBuffer
Substituir " FILE_WITH_BLANK_LINES " com o nome completo do caminho do arquivo que tem linhas em branco .
3
Clique em "Arquivo " e selecione " Salvar". A janela "Salvar como" se abrirá. Digite " Remove_Blank_Lines.vbs " na caixa de texto "Nome" e clique em " Salvar".
4
Abra o Windows Explorer e navegue até o arquivo. Clique duas vezes nele . O script irá emitir os comandos para remover as linhas em branco a partir do arquivo . Abra o arquivo para verificar se não existem linhas em branco.