使用批处理文件打开用户输入的文件夹

Question

我第一次创建批处理文件，并且没有太多的语言暴露，所以请裸露在我身边。

我必须从文件夹中提取文件的名称并将它们粘贴到文本文档（Word文档将是理想的，但我发现了一种链接方式并自动用文本文件的内容更新文字文件）。

我在想的是打开一个对话框来询问用户文件夹的路径。然后我会使用dir函数并将这些值粘贴到文本文件中。

我可以获取名称，但批处理文件必须位于同一文件夹中。我想要对话框，有没有办法做到这一点？我并不真的希望用户在cmd提示符下键入整个文件夹路径。

欣赏响应 PARTH

Answer 1

这就是你需要的代码来浏览文件夹并选择它：

Browse4Folder.bat从该批处理文件中使用Local_Batch_Engine.bat

@echo off 
Title Browse4Folder 
Color 0A 
Call :Browse4Folder "Choose source folder to scan" "c:\scripts" 
echo You have chosen this location "%Location%" 
pause & exit 
::*************************************************************************** 
:Browse4Folder 
set Location= 
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= 
(
    echo set shell=WScript.CreateObject("Shell.Application"^) 
    echo set f=shell.BrowseForFolder(0,"%~1",0,"%~2"^) 
    echo if typename(f^)="Nothing" Then 
    echo wscript.echo "set Location=Dialog Cancelled" 
    echo WScript.Quit(1^) 
    echo end if 
    echo set fs=f.Items(^):set fi=fs.Item(^) 
    echo p=fi.Path:wscript.echo "set Location=" ^& p 
)>%vbs% 
cscript //nologo %vbs% > %cmd% 
for /f "delims=" %%a in (%cmd%) do %%a 
for %%f in (%vbs% %cmd%) do if exist %%f del /f /q %%f 
for %%g in ("vbs cmd") do if defined %%g set %%g= 
goto :eof 
::***************************************************************************