.bat Windows 7的批处理文件命令

Question

我有一个.bat脚本。 &在该脚本“设置目标文件夹”&“set sourcefolder”命令在那里。 我想删除这两个命令&想要在脚本执行后给这些命令。意味着它应该问问目标文件夹和sourceflder路径。

因为，我有任务的n个不同& & Targefolder路径sourcefolder但是脚本做同样的功能&对于那些所有的任务，我将不得不创造scripts..so，我想而不是要做到这一点，我可以保持批处理文件中的内容相同，并且只能放置目标文件夹源文件夹路径。

总之，脚本应该问问目标文件夹& sourcefolder，在给出那些路径后应该是完整的脚本。

那么，有没有人可以建议我该怎么做？请

脚本有以下containt：

@echo off 
setlocal 
set DateFolder=04.2013 
set TargetFolder=F:\Financial\Data\%DateFolder%\Final Reports 

:: copy the newest file from AccruntPnLMTD and rename it to PNL.csv 
call :copyAndRename "F:\Financial\Data\Reports\AccruntPnLMTD" "%TargetFolder%\PNL.csv" 

:: copy the newest file from AccountPnlMTD and rename it to AC.csv 
call :copyAndRename "F:\Financial\Data\Reports\AccountPnlMTD" "%TargetFolder%\AC.csv" 

:: copy the newest file from ExpensesMTD and rename it to EXPMTD.csv 
call :copyAndRename "F:\Financial\Data\Reports\ExpensesMTD" "%TargetFolder%\EXPMTD.csv" 

:: copy the newest file from ExpensesYTD and rename it to EXPYTD.csv 
call :copyAndRename "F:\Financial\Data\Reports\ExpensesYTD" "%TargetFolder%\EXPYTD.csv" 

:: copy the newest file from AccrualPnLYTD and rename it to PNLYTD.csv 
call :copyAndRename "F:\Financial\Data\Reports\AccrualPnLYTD" "%TargetFolder%\PNLYTD.csv" 

:: copy the newest file from AccountYTD and rename it to ACYTD.csv 
call :copyAndRename "F:\Financial\Data\Reports\AccountYTD" "%TargetFolder%\ACYTD.csv" 

:: copy the newest file from BalanceMTD and rename it to BSMTD.csv 
call :copyAndRename "F:\Financial\Data\Reports\BalanceMTD" "%TargetFolder%\BSMTD.csv" 

:: copy the newest file from BalanceYTD and rename it to BSYTD.csv 
call :copyAndRename "F:\Financial\Data\Reports\BalanceYTD" "%TargetFolder%\BSYTD.csv" 

:: copy the newest file from FinancialStmtMTD and rename it to FSMTD.csv 
call :copyAndRename "F:\Financial\Data\Reports\FinancialStmtMTD" "%TargetFolder%\FSMTD.csv" 

:: copy the newest file from FinancialStmtYTD and rename it to FSYTD.csv 
call :copyAndRename "F:\Financial\Data\Reports\FinancialStmtYTD" "%TargetFolder%\FSYTD.csv" 


:: Done 
goto :eof 

:copyAndRename 
set SourceFolder=%~1 
set TargetFile=%~2 

:: Find the newest file in the source folder 
for /f "tokens=*" %%F in ('dir /b /od /a-d "%SourceFolder%"') do set "NewestFile=%%F" 

:: copy and rename it to the target 
copy "%SourceFolder%\%NewestFile%" "%TargetFile%" 


:: Done with this subroutine 
goto :eof 

Answer 1

也许它更容易在批处理文件中使用％1％2，如

set Targetfolder = %1 
set sourcefolder = %2 

然后调用这样的文件：

file.bat path1 path2 

然后，您可以创建一个快捷方式，其中正确的值（或几个快捷方式为您的dif不同的需求）。

当然，在上面没有检查，可能想补充一点。

Answer 2

那么，你可以使用SET /P，并且每次都必须手动键入源文件夹和目标文件夹，或者可以使用我的BrowseFolder例程并从对话框中选择它。试试这个。

@echo off 
setlocal 

Call :BrowseFolder "Choose Target folder" "F:\Financial\Data\" 
Set TargetFolder=%Result% 

Call :BrowseFolder "Choose Source folder" "F:\Financial\Data\Reports\" 
Set SourceFolder=%Result% 


:: copy the newest file from AccruntPnLMTD and rename it to PNL.csv 
call :copyAndRename %SourceFolder% "%TargetFolder%\PNL.csv" 

:: copy the newest file from AccrualPnLMTD and rename it to AC.csv 
call :copyAndRename "%SourceFolder%" "%TargetFolder%\AC.csv" 

:: Done 
goto :eof 

:copyAndRename 
set SourceFolder=%~1 
set TargetFile=%~2 

:: Find the newest file in the source folder 
for /f "tokens=*" %%F in ('dir /b /od /a-d "%SourceFolder%"') do set "NewestFile=%%F" 

:: copy and rename it to the target 
copy "%SourceFolder%\%NewestFile%" "%TargetFile%" 

:: Done with this subroutine 
goto :eof 


:BrowseFolder 
set Result= 
set vbs="%temp%\_.vbs" 
set cmd="%temp%\_.cmd" 
for %%f in (%vbs% %cmd%) do if exist %%f del %%f 
for %%g in ("vbs cmd") do if defined %%g set %%g= 
>%vbs% echo set WshShell=WScript.CreateObject("WScript.Shell") 
>>%vbs% echo set shell=WScript.CreateObject("Shell.Application") 
>>%vbs% echo set f=shell.BrowseForFolder(0,%1,0,%2) 
>>%vbs% echo if typename(f)="Nothing" Then 
>>%vbs% echo wscript.echo "set Result=Dialog Cancelled" 
>>%vbs% echo WScript.Quit(1) 
>>%vbs% echo end if 
>>%vbs% echo set fs=f.Items():set fi=fs.Item() 
>>%vbs% echo p=fi.Path:wscript.echo "set Result=" ^& p 
cscript //nologo %vbs% > %cmd% 
for /f "delims=" %%a in (%cmd%) do %%a 
for %%f in (%vbs% %cmd%) do if exist %%f del %%f 
for %%g in ("vbs cmd") do if defined %%g set %%g= 
goto :eof