批处理之家 - Powered by Discuz! Board

@echo off &setlocal enabledelayedexpansion
set time1=
set /p time1=起始时间(20090721)
set time2=
set /p time2=结束时间(20090723)
md "C:\Documents and Settings\Administrator\桌面\p\%time2%"
for /r \\192.168.1.3\p\123 %%a in (*.*) do (
set var=%%~ta
set var=!var:~0,4!!var:~5,2!!var:~8,2!
echo dir /ta
IF !VAR! GEQ !TIME1! IF !VAR! LEQ !TIME2! (
xcopy "%%a" "C:\Documents and Settings\Administrator\桌面\p\%time2%")
)
if %errorlevel% == 0 echo OK
if %errorlevel% == 1 echo NG
pause

复制代码

第一个问题：
以上回显的返回值是否是FOR命令的返回值，我在运行过程中，复制成功还是失败都回显OK,例如：假设123文件内不存在时间段内的文件，运行命令回显OK。
但是把md创建文件夹的程序去掉，复制成功就显示OK，失败显示NG。例如：假设123文件内不存在时间段内的文件，运行命令回显NG。
希望看下有什么解决的方法。

复制代码

第二个问题：
还有就是运行过程中，速度特别慢。。是否是因为命令运行检索123文件夹内所有文件，来一一比对他们的日期是否在时间段内，在进行复制。
123文件夹内大约有10000个300K左右的文件，是否是造成运行过慢的原因。
是否还有其他复制时间段的方法，来解决复制时间过慢的问题。。
一个300K的文件用上面的批处理大约复制12秒，复制10000个大约33个小时，真的太慢啦。。。。希望高手帮忙看看。

复制代码

@echo off &setlocal enabledelayedexpansion
set time1=
set /p time1=起始时间(20090721)
set time2=
set /p time2=结束时间(20090723)
md "C:\Documents and Settings\Administrator\桌面\p\%time2%"
(for /r \\192.168.1.3\p\123 %%a in (*.*) do (
set var=%%~ta
set var=!var:~0,4!!var:~5,2!!var:~8,2!
IF !VAR! GEQ !TIME1! IF !VAR! LEQ !TIME2! (echo %%a)
))>%temp%\%~n0.tmp
rem 读取符合条件的文件
for /f "tokens=*" %%a in (type "%temp%\%~n0.tmp") do (
echo dir /ta
xcopy "%%a" "C:\Documents and Settings\Administrator\桌面\p\%time2%"
rem 复制，并显示状态，注意errorlevel 的%改成了!
if !errorlevel! equ 0 (echo OK) else ( echo NG)
)
pause

复制代码

@echo off
set t=%time%
:line
set line=
set /p line=请输入线别(01~10)：
if not "%line%" == "01" if not "%line%" == "02" if not "%line%" == "03" if not "%line%" == "04" if not "%line%" == "05" if not "%line%" == "06" if not "%line%" == "07" goto a
if "%line%" == "Q" exit cmd
echo 线别Y%line%
:pcnum
set pcnum=
set /p pcnum=请输入电脑编号(1~6)：
if not "%pcnum%" == "1" if not "%pcnum%" == "2" if not "%pcnum%" == "3" if not "%pcnum%" == "4" if not "%pcnum%" == "5" if not "%pcnum%" == "6" goto b
if "%pcnum%" == "Q" exit cmd
echo 电脑编号%pcnum%
set aa=
set /a aa=2*%pcnum%-1
set bb=
set /a bb=2*%pcnum%
rem 一个电脑编号对应两个设备编号
:data
set data=
set /p data=请输入拷贝文件的月份(200907)：
echo 拷贝文件月份%data%
:disk
set disk=
set /p disk=请输入复制后文件的盘符(C~E):
if not "%disk%" == "C" if not "%disk%" == "d" if not "%disk%" == "e" goto c
echo 盘符 %disk%
title Y %line% L %pcnum%
md %disk%:\WORK%data%\work%aa%
md %disk%:\WORK%data%\work%bb%
setlocal enabledelayedexpansion
echo *********************%aa%*************************
for /r \\Y%line%L%pcnum%\WORK%aa% %%a in (*.*) do (
set var=%%~ta
set var=!var:~0,4!!var:~5,2!
IF !VAR! equ !data! xcopy "%%a" %disk%:\WORK%data%\work%aa%)
if !errorlevel! equ 0 (echo OK) else (echo NG)
echo ********************%bb%***********************
for /r \\Y%line%L%pcnum%\WORK%bb% %%a in (*.*) do (
set var=%%~ta
set var=!var:~0,4!!var:~5,2！
IF !VAR! equ !data! xcopy "%%a" %disk%:\WORK%data%\work%bb%)
if !errorlevel! equ 0 (echo OK) else (echo NG)
call :time0 "%t%" "%time%" "ok"
echo.&echo 耗时: %ok%
pause&exit
:time0 以下为封装部分。
:: code 随风 @bbs.bathone.cn 2008-08-15
setlocal&set /a n=0
for /f "tokens=1-8 delims=.: " %%a in ("%~1:%~2") do (
set /a n+=10%%a%%100*360000+10%%b%%100*6000+10%%c%%100*100+10%%d%%100
set /a n-=10%%e%%100*360000+10%%f%%100*6000+10%%g%%100*100+10%%h%%100
)
set "n=%n:-=%"
set /a s=n/360000,n=n%%360000,f=n/6000,n=n%%6000,m=n/100,n=n%%100
set "ok=%s% 小时 %f% 分钟 %m% 秒 %n% 毫秒"
endlocal&set "%~3=%ok%"&goto :eof
pause
:a
echo 输入错误 & goto line
:b
echo 输入错误 & goto pcnum
:c
echo 输入错误 & goto disk

复制代码