
附件 1:EDI_856_wisSOP_FlatFile_201005311500.rar (2010-6-2 15:38, 291 bytes,下载次数: 6)
CODE: [Copy to clipboard]@echo off
set "FILE=EDI_856_wisSOP_FlatFile_201005311500.txt"
set /p line1=<%FILE%
setlocal enabledelayedexpansion
set /a i=0
for /f "usebackq skip=1 delims=" %%s in ("%FILE%") do (
set /a i+=1
set NEW_FILE="%FILE:~0,-4%!i!.txt"
> !NEW_FILE! echo %line1%
>>!NEW_FILE! echo %%s
)
echo 完成。
pause>nul
CODE: [Copy to clipboard]之前备份@echo off
rem Created by MakeBat.bat
setlocal enabledelayedexpansion
set /a i=0
set "file=EDI_856_wisSOP_FlatFile_201005311500.txt"
set name=!file:~0,-4!
for /f "delims=" %%a in (!file!) do (
if "!i!"=="0" (
set header=%%a
set /a i+=1
) else (
>>!name!!i!.txt echo !header!
>>!name!!i!.txt echo %%a
set /a i+=1
)
)
| Quote: | |
|
| 欢迎光临 中国DOS联盟论坛 (http://cndos.fam.cx/forum/) | Powered by Discuz! 2.5 |