标题: 请教高手，关于文本内容的提取 [打印本页]
作者: xyfx 时间: 2008-9-18 13:39 标题: 请教高手，关于文本内容的提取
Hello World
@1234567890
"8"=23523,\
3253525,\
3cdefg5,\
fdfd
"4"=efije,\
fdjii,\
jifdo,\
fdfd
有这样一段文本，我想从“4”这开始下面的内容全部去掉。也就是让它变成
Hello World
@1234567890
"8"=23523,\
3253525,\
3cdefg5,\
fdfd
我想了很多方式都不行、希望高手们能够给予解答，谢谢了
作者: HAT 时间: 2008-9-18 14:00
@echo off
setlocal enabledelayedexpansion
>b.txt type nul
set count=0
for /f "delims=" %%a in (a.txt) do (
set /a count+=1
if !count! lss 7 (
>>b.txt echo %%a
)
)
move /y b.txt a.txt
setlocal enabledelayedexpansion
>b.txt type nul
set count=0
for /f "delims=" %%a in (a.txt) do (
set /a count+=1
if !count! lss 7 (
>>b.txt echo %%a
)
)
move /y b.txt a.txt
作者: moniuming 时间: 2008-9-18 14:01
试试?
@echo off
setlocal enabledelayedexpansion
for /f "delims=" %%a in (1.txt) do (
set "var=%%a"
if not "!var:~,3!"==""4"" (echo !var!) else (goto :out)
)
:out
pause
setlocal enabledelayedexpansion
for /f "delims=" %%a in (1.txt) do (
set "var=%%a"
if not "!var:~,3!"==""4"" (echo !var!) else (goto :out)
)
:out
pause
作者: HAT 时间: 2008-9-18 14:09
@echo off
more +6 a.txt>b.txt
findstr /b /e /v /g:b.txt a.txt>c.txt
move /y c.txt a.txt
del /q b.txt
more +6 a.txt>b.txt
findstr /b /e /v /g:b.txt a.txt>c.txt
move /y c.txt a.txt
del /q b.txt
作者: xyfx 时间: 2008-9-18 14:16
我已经试过了，几位的代码都可以。我真的看到自己的距离。还要好好学习才行啊。谢谢了几位