ndrjjzbv
05-09-2017, 16:52
Помогите перенести код с батника на VBS скрипт.
@echo off
chcp 1251
for /f "tokens=2 delims==:" %%i in ('
wmic logicaldisk get Name /value
') do (
for /f "delims=" %%j in ('
dir /a-d-s-h /b /s %%i:\*.psd %%i:\*.JPG 2^|findstr.exe /v /i /l /c:"Windows" /c:"Boot"
') do (
pushd "%%~dpj"
>"name.txt" (
echo text
echo text
echo text
)
popd
"%PROGRAMFILES%\WinRAR\Rar.exe" a -y -ri15 -dr -m0 -inul "%%~dpnj.rar" "%%j"
)
)
exit /b
@echo off
chcp 1251
for /f "tokens=2 delims==:" %%i in ('
wmic logicaldisk get Name /value
') do (
for /f "delims=" %%j in ('
dir /a-d-s-h /b /s %%i:\*.psd %%i:\*.JPG 2^|findstr.exe /v /i /l /c:"Windows" /c:"Boot"
') do (
pushd "%%~dpj"
>"name.txt" (
echo text
echo text
echo text
)
popd
"%PROGRAMFILES%\WinRAR\Rar.exe" a -y -ri15 -dr -m0 -inul "%%~dpnj.rar" "%%j"
)
)
exit /b