中国DOS联盟

To delete blank lines without using sed, you can use the following method in Python. Here is a simple example:

```python
with open('file', 'r') as f:
lines =
with open('file', 'w') as f:
f.write('\n'.join(lines))
```

This code reads the file, strips whitespace from each line, and only keeps lines that are not empty after stripping, thus removing both empty lines and lines consisting of only spaces. You can adjust the file name as needed.

@echo off
set runtimes=0
FOR /F "delims=" %%i in (myfile.txt) do (
call :func1 "%%i"
)
pause
pause
pause
:func1
set /a runtimes=%runtimes%+1
set EL=1
set T1=%1
set T1=%T1: =%
if NOT %T1%=="" set EL=0
if %EL%==0 (
if NOT %runtimes%==1 echo+>>done.txt
set /p null=%1<nul>>done.txt
)
goto :EOF

There is "If so, there will be less things..."

Using sed can delete. Regular expressions should be used well

findstr . file1>file2

woshenmodoumeishuocolor]

Last edited by ccwan on 2007-8-27 at 06:42 PM ]

Hmm. But it's all confusing to look at. It should be quite convenient, though.

Originally posted by knoppix7 at 2007-8-27 02:14 PM:
@echo off
set runtimes=0
FOR /F "delims=" %%i in (myfile.txt) do (
call :func1 "%%i"
)
pause
pause
pause
:func1
set /a runtimes=%runtimes%+1
set EL=1
set T1=%1
set T ...

Thanks, knoppix7 is really amazing
If there is "then how could there be less things? Can it be improved?
By the way, what does echo+ mean? Other places are almost看不懂, please help explain it.

Last edited by wert123 on 2007-8-28 at 06:36 PM ]

Originally posted by wudixin96 at 2007-8-27 02:33 PM:
Using sed can delete. Regular expressions need to be used well

Brother wudixin96, can you also help me? I'm typing something,
There's no sed in the print room, I also want to use it, need to download, the printer operator
is afraid that sed is a virus, and there are many echo printed out. The same thing, wasting study money ah.

Last edited by wert123 on 2007-8-28 at 06:35 PM ]

If p doesn't work, who can help write a VBS one as well?

Replace something with something else (required not to have appeared in the article) and then replace it back after the conversion.

Diners who are knowledgeable about Knoppix 7, can you explain this P? I can hardly understand func1

Dim objFSO,objFile
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile("Test.txt",1)
Dim StrLine,OutStr
Do Until objFile.AtEndOfStream
StrLine = objFile.ReadLine
If Replace(StrLine," ","") <> "" Then OutStr = OutStr & StrLine & vbCrLf
Loop
objFile.Close
Set objFile = objFSO.OpenTextFile("Out.txt",2,1)
objFile.Write OutStr
objFile.Close
Set objFile = Nothing
Set objFSO = Nothing

PS: There will be a carriage return at the end of the text, I didn't handle it... Just remove it yourself

I don't think there's much to talk about. It's a very simple BAT...

Originally posted by knoppix7 at 2007-8-27 02:14 PM:
@echo off
set runtimes=0
FOR /F "delims=" %%i in (myfile.txt) do (
call :func1 "%%i"
)
pause
pause
pause
:func1
set /a runtimes=%runtimes%+1
set EL=1
set T1=%1
set T ...

Can you improve it, sir. I removed the spaces in front of non - empty lines in the txt when I used it yesterday.