中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-08-07 15:26
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » [求助]以下的码有什么问题 查看 625 回复 0
楼 主 [求助]以下的码有什么问题 发表于 2008-02-26 00:12 ·  中国 香港 环球全域电讯
初级用户
★★
积分 125
发帖 56
注册 2008-02-20 14:01
18年会员
UID 111054
性别 男
状态 离线
请看看为何以下的只读到一个档案就停了?..

fdate /Fsub /N0 /At /Occyymmdd >_.d1
for /F %%i in (_.d1) do set folder=%%i

Fdate /Fsub /N0 /Oddmmyy /P >_.d3
for /F %%i in (_.d3) do set file=%%i

echo %file%
pause
@echo on

cd..\data
for /f "delims=" %%i in ('dir /a/b "%File%*"') do set tempFile=%%i&&goto Sub
goto :eof

:Sub
rem seperate file name: 2502082F2.abc.zip
set file_p1=%tempFile:~0,6%
set file_p2=%tempFile:~6,3%
set file_p3=%tempFile:~10,3%
pause
cd..

rem Create Folder & copy file

set "NewPath=%folder%.%file_p3%"
md "computer\%NewPath%"
dir/w
pause
copy "data\%File%*" "computer\%NewPath%"
if not %errorlevel%==0 echo %~1 拷贝失败!

:quit
set NewPath=
set CurDir=
goto :eof

我已试了整天了

[ Last edited by xmi on 2008-2-26 at 10:46 PM ]
论坛跳转: