Oavsett om du skapar dem själv , eller någon skickar dem till dig , kan filer med tomma rader skapar problem . Om du behöver ta bort tomma rader , kan du tillbringa värdefull tid att trycka på " Delete " -tangenten upprepade gånger . Windows levereras med fri programvara som kan automatisera denna uppgift . Den " Windows Script Host " verktyget kan du skapa kommandoskript som interagerar med Windows och utföra nyttiga uppgifter . Till exempel , genom att skapa en enkel VBScript skript , kan du använda den för att ta bort tomma rader från en textfil . Instruktioner
1
Öppna Utforskaren och navigera till den mapp som innehåller en fil med tomma rader . Anteckna filens namn och dess mapp . Till exempel, om sökvägen är " C : \\ myFiles \\ test1.txt " , kom ihåg att sökvägen
2
Öppna Anteckningar och klistra in följande text i ett nytt dokument : .
' Linjer 1-3 : Definiera systemets objekt
KONST ForReading = 1
KONST ForWriting = 2 Review
Dim objFSObject , strLineBuffer
" Lines 4 -5 : Tilldela indatafil till variabel
Dim strInputFile , strCurrentFile
strInputFile = " FILE_WITH_BLANK_LINES "
' Linjer 6-7 : Ställ in File System objektet och läs indatafil
Set objFSOObject = CreateObject ( " Scripting.FileSystemObject " ) katalog
Set objCurrentFile = objFSOObject.OpenTextFile ( strInputFile , ForReading ) katalog
" Processing Loop - Store icke - tomma rader i temporärbuffert
göra tills objCurrentFile.AtEndOfStream
tempLine = objCurrentFile.Readline
tempLine = Trim ( tempLIne ) katalog p Om Len ( tempLine ) > 0 sedan
strLineBuffer = strLineBuffer & tempLine & " " & vbCrLf
End If
Loop
' Skriv buffert för indatafil
objCurrentFile.Close
Set objCurrentFile = objFSOObject.OpenTextFile ( strInputFile , ForWriting ) katalog
objCurrentFile.Write strLineBuffer
Ersätt " FILE_WITH_BLANK_LINES " med fullständiga sökvägen till filen som har blankrader .
3
klicka på "File " och välj " Spara . " "Spara som " öppnas . Typ " Remove_Blank_Lines.vbs " i " Name " textrutan och klicka på " Spara ".
4
Öppna Utforskaren och navigera till filen . Dubbelklicka på den . Manuset kommer att utfärda kommandon för att ta bort tomma rader från filen . Öppna filen för att kontrollera att inga tomma rader finns .
