Как и следует из названия, я хочу создать пакетный файл или файл сценария VBS, который начнет воспроизводить музыку из моей музыкальной папки. Я не могу создать плейлист, потому что я очень часто обновляю эту папку, и я не хочу постоянно обновлять плейлист.
Я знаю, что я могу просто сделать ярлык для этой папки и нажать ctrl+a и enter , но я ленивый. Так есть ли возможность сделать это?
О, и это:for %%i in (*.mp3) do start %%i он работает неправильно.
Как открыть несколько файлов MP3 с помощью пакета или VBS, как Ctrl+A Enter
(Ниже приведены два решения с использованием сценариев (batch и VB script), позволяющие открывать все файлы MP3 в одной папке с помощью Windows Media Player который будет воспроизводить одну песню за другой, без необходимости выполнять вручную из WMP после завершения каждой песни или создания списка воспроизведения. .)
(Это эмулирует переход в папку, где находятся ТОЛЬКО файлы MP3 , выполнение Ctrl+A и затем нажатие клавиши « Ввод» или выбор « Open котором проигрыватель Windows Media Player открывает эти выбранные файлы MP3 и воспроизводит их один за другим.)
(В этом случае в папке файлов MP3(Music) часто добавлялись дополнительные файлы MP3 , и было так же легко нажать Ctrl+A, а затем нажать Enter, чтобы WMP открывался и воспроизводился один за другим.)
По сути, это способы воспроизведения всех файлов MP3 в папке без создания и списка воспроизведения и без необходимости нажатия Ctrl+A, а затем нажмите Enter вручную.
Строка, которая является WshShell.Run "D:\Test\TestMP3Only" , чтобы указать местоположение папки, где вы нажимаете Ctrl+A, а затем нажимаете клавишу « Ввод», когда делаете это вручную.
Здесь ожидается, что в этой папке будут находиться только файлы MP3. В противном случае другие файлы также будут открыты в этой папке.
Сохраните его в текстовом файле с именем <something>.vbs а затем щелкните его, чтобы запустить. Я проверил, и это работает, и следующая песня воспроизводится после того, как песня заканчивается с помощью Windows Media Player на Windows.
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "D:\Test\TestMP3Only"
Wscript.Sleep 500
WshShell.SendKeys "^a"
Wscript.Sleep 500
WshShell.SendKeys "{ENTER}"
Строка, которая имеет значение SET MP3Folder=D:\Test\TestMP3Only , должна быть обновлена, чтобы указывать на местоположение папки, где вы нажимаете Ctrl+A, а затем нажимаете Enter, когда вы делаете это вручную.
Здесь ожидается, что в этой папке будут находиться только файлы MP3. В противном случае другие файлы также будут открыты в этой папке.
Сохраните его в текстовом файле с именем <something>.cmd а затем щелкните его, чтобы запустить. Я проверил, и это работает, и следующая песня воспроизводится после того, как песня заканчивается с помощью Windows Media Player на Windows.
@ECHO OFF
SET MP3Folder=D:\Test\TestMP3Only
SET TempVBSFile=%tmp%\~tmpMP3Temp.vbs
:VBSDynamicBuild
IF EXIST "%TempVBSFile%" DEL /F /Q "%TempVBSFile%"
ECHO Set WshShell = WScript.CreateObject("WScript.Shell") >>"%TempVBSFile%"
ECHO WshShell.Run "%MP3Folder%" >>"%TempVBSFile%"
ECHO Wscript.Sleep 500 >>"%TempVBSFile%"
ECHO WshShell.SendKeys "^a" >>"%TempVBSFile%"
ECHO Wscript.Sleep 500 >>"%TempVBSFile%"
ECHO WshShell.SendKeys "{ENTER}" >>"%TempVBSFile%"
CSCRIPT //nologo "%TempVBSFile%"
GOTO EOF