.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