» Задачи на bat-файлах 4

Спасибо...

Первое что сразу хотелось бы уточнить это локаль...
что делает _setlocal_ и можна ли после этого утверждать что
set d=%date:~0,2%
set m=%date:~3,2%
set y=%date:~6,4%
отработает корректно вне зависимосссти от формата системной даты?

getname
Setlocal для возможности использования скрипта несколько раз в одной сессии. Эта команда ограничивает область действия переменных.
Cкрипт будет работать неправильно если формат даты будет отличаться от шаблона

Код:
дд*мм*гггг

Есть ли способ установить шрифт из командной строки?
Нашёл такой вот, но он требует перезагрузки

Код: copy akbar.ttf %systemroot%\fonts

[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Fonts]
"Akbar Plain (TrueType)"="akbar.ttf"

cluster
http://www.scriptorium.se/freeyourdesktop/viewtopic.php?pid=195
http://forum.oszone.net/thread-92136.html
http://www.msfn.org/board/index.php?s=&showtopic=36508&view=findpost&p=265420

Здесь на форуме нашел код батничка, который сканирует папки и делает плэйлист к мп3 файлам. Я немного переделал для создания списка фильмов в папке, из которой запускается батник, и всех подпапках... Но очень хотелось бы некоторые папки не учитывать. В данном примере не учитывается папка HIDDEN_FOLDER - идентифицируется по названию.
Собственно вопрос - как бы переделать код, чтоб не учитывались скрытые папки (атрибут папки - скрытый) т.е. чтоб фильмы из скрытой папки не попадали в общий список, а например сохранялись бы в другой файл (например HIDDEN_%flname%)

Код: @echo off
mode con codepage select=1251 > nul
REM set flname=""
REM if "%flname%"=="" set /p flname=Enter file name:
REM if "%flname%"=="" set flname=_List_"%DATE%".txt
@set flname=_List_"%DATE%".txt
@echo Please wait...
@if exist %flname% del %flname%
@set ind=0
:next
@set /a ind+=1
@set tmp=
@for /f "delims=\ tokens=%ind%" %%a in ("%~dp0") do set tmp=%%a
@if not "%tmp%"=="" goto next
@set /a ind-=1
for /f "delims=\ tokens=%ind%*" %%a in ('dir /s') do (
if "%%b"=="" (
echo ##### Корневая папка: %%a >> %flname%
dir "*.avi" "*.wmv" /b >> %flname%
echo. >> %flname%
) else if not "%%b"=="HIDDEN_FOLDER" (
echo ##### Содержимое папки: %%b >> %flname%
dir "%%b\*.avi" "%%b\*.wmv"/b >> %flname%
echo. >> %flname%
)
)
@mode con codepage select=866 > nul
@if exist %flname% start %flname%

AS2007

Код: @echo off
mode con codepage select=1251 > nul
REM set flname=""
REM if "%flname%"=="" set /p flname=Enter file name:
REM if "%flname%"=="" set flname=_List_"%DATE%".txt
@set flname=_List_"%DATE%".txt
@echo Please wait...
@if exist %flname% del %flname%
@set ind=0
:next
@set /a ind+=1
@set tmp=
@for /f "delims=\ tokens=%ind%" %%a in ("%~dp0") do set tmp=%%a
@if not "%tmp%"=="" goto next
@set /a ind-=1
for /f "delims=\ tokens=%ind%*" %%a in ('dir /s') do if not "%%b"=="" echo %%b>> 1.txt

king_stiven

Цитата:

Что выдаёт в 1.txt, список папок?

Да, вот примерно так:

HIDDEN_FOLDER - Эта папка имеет скрытый атрибут
FOLDER1
FOLDER2
FOLDER2\SUBFOLDER1
FOLDER2\SUBFOLDER2
FOLDER3

Вопрос был не в том как вывести список папок, а как "разделить" файлы из скрытых и не скрытых каталогов и вывести их в разные файлы....

AS2007
Понимаешь у меня сейчас нет времени разобраться в твоём и написать сразу на 100% работающий батник, поэтому двигаемся поэтапно. Я так понял, что мой вариант выдаёт полный список папок, которые остаётся только отсортировать по скрытности. Это так?

Товарищи подскажите пож-та как получить номер дня недели в батнике?

qrock
Оо, я бился над этой проблемой в январе. Читай пару страниц.
http://forum.ru-board.com/topic.cgi?forum=62&topic=11825&start=1320#19

Добавлено:
igor_andreev
Благодарю

qrock
Поищи в Версии для печати по ключевым словам. Обсуждалось много раз.

AS2007

Код: @echo off
mode con codepage select=1251 > nul
REM set flname=""
REM if "%flname%"=="" set /p flname=Enter file name:
REM if "%flname%"=="" set flname=_List_"%DATE%".txt
@set flname=_List_"%DATE%".txt
@echo Please wait...
@if exist %flname% del %flname%
@set ind=0
:next
@set /a ind+=1
@set tmp=
@for /f "delims=\ tokens=%ind%" %%a in ("%~dp0") do set tmp=%%a
@if not "%tmp%"=="" goto next
@set /a ind-=1
for /f "delims=\ tokens=%ind%*" %%a in ('dir /s') do (
if "%%b"=="" (
echo ##### Корневая папка: %%a >> %flname%
dir "*.avi" "*.wmv" /b >> %flname%
echo. >> %flname%
) else (
for /f "tokens=1,2" %%c in ('attrib "%%b"') do (
if "%%c"=="H" set HIDDEN=yes
if "%%d"=="H" set HIDDEN=yes
if "%%c"=="HR" set HIDDEN=yes
if "%%d"=="HR" set HIDDEN=yes
)
if not defined HIDDEN (
echo ##### Содержимое папки: %%b >> %flname%
dir "%%b\*.avi" "%%b\*.wmv"/b >> %flname%
echo. >> %flname%
) else (
ну а сюда пиши , что хочешь сделать с скрытыми папками, выраженными через переменную %%b
set HIDDEN=
)
)
)
@mode con codepage select=866 > nul
@if exist %flname% start %flname%

king_stiven

Цитата:

Я так понял, что мой вариант выдаёт полный список папок, которые остаётся только отсортировать по скрытности. Это так?

Да, абсолютно так.
king_stiven
Спасибо, сейчас попробую... разобраться.

Цитата:

Вариант, что скрытая папка является и системной не рассмотрен

Ну по идеи он и не нужен.... достаточно H

Добавлено:
king_stiven
Еще раз большое спасибо... Немного подправил и все супер, работает как нужно.

Здравствуйте. Сталкнулся с такой проблемой. Имеется переменная окружения, содержащая полный путь к некоторой папке. Необходимо в батнике проверить следущее, если значение переменной заканчивается слэшом, то удалить этот слэш. Может кто подскажет как это можно реализовать или как получить доступ к отдельному символу строки. Заранее благодарю.

При включении setlocal enabledelayedexpansion
как-либо экранировать символ восклицательного знака не получается. Можно ли это как-то обойти?

Добавлено:
MaCeL
Что-то типа того:

Код: IF "%PATH:~-1%"=="\" SET PATH=%PATH:~0,-1%

Joolz
Приведи пример. Проблема решается, но в констексте конкретного кода.
Из общих рекомендаций, мое мнение - лучше избегать setlocal enabledelayedexpansion если код связан с выводом текста.

01MDM

Код:
@ECHO OFF
REM Этот BAT'ничек лезет в ветку реестра и составляет список установленных программ и кладет его в файл на шару.
Title Вывод списка установленных программ
setlocal enabledelayedexpansion
ECHO Составляю список установленного ПО. Ждите...
ECHO ╤яшёюъ ╧╬ эр ъюья№■ЄхЁх %computername%:>\\COMP\Share\%computername%UN2.txt
SET UNISTALL=HKLM\Software\Microsoft\Windows\CurrentVersion\Uninstall
FOR /f "tokens=7 delims=\" %%a IN ('reg query "%UNISTALL%"') DO (
    SET prog=%%a
    FOR /f "tokens=1,2,*" %%b IN ('reg query "%UNISTALL%\%%a"') DO (
    if "%%b"=="DisplayName" SET prog1=%%d)
    FOR /f "tokens=1,2,*" %%x IN ('reg query "%UNISTALL%\%%a"') DO (
    if "%%x"=="UninstallString" SET ustr=%%z)
IF NOT "!ustr!"=="" ECHO !prog1!    !prog!    !ustr!>>\\COMP\Share\%computername%UN2.txt
set prog=
set prog1=
set ustr=
)
ECHO Спасибо

Joolz
Вот что получилось, у меня вроде выводит все значения "DisplayName" и "UninstallString" если они есть.

Код:
@echo off
setlocal
chcp 1251 1>nul

set rpath=HKLM\Software\Microsoft\Windows\CurrentVersion\Uninstall
for /f "tokens=*" %%a in ('reg query %rpath% ^| findstr "HKEY"') do (
for /f "tokens=3*" %%b in ('reg query "%%a" ^| findstr "\<DisplayName\>"') do (
set "program=%%b %%c")
for /f "tokens=3*" %%b in ('reg query "%%a" ^| findstr "\<UninstallString\>"') do (
set "uninstall=%%b %%c")
call:write "%%a"
)
chcp 866 1>nul
goto:eof
:write
set uninstall=%uninstall:"=%
echo RegPath: %~1 1>>uninst.txt
echo Program: %program% 1>>uninst.txt
echo Uninstall: %uninstall% 1>>uninst.txt
echo --------------------------------------------------------------------------- 1>>uninst.txt
set program=
set uninstall=

01MDM
сидел разбирал программу ну так ничего и не понял;( добавь пожалуйста комменты...

getname
Извини, но получится на целую страницу.. Главное что бы работала.

хорошо, где можно почитать про батники(если я до этого ни интерпретаторами ни бейсика подобными языками не пользовался)?

getname
Вся информация в основном из справки %WINDIR%\Help\ntcmds.chm и от сюда.

01MDM
cпасибо, буду читать...

Возможно ли реализовать батником такую задачу.
1) Копировать по два файла из 4х расшареных сетевых папок.
2) Архивировать их в общий RAR архив
3) отправить архив по FTP

01MDM
TanX!
Можно уточнить? Возможно вопрос ламерский, но до сих пор не сталкивался...
В случае echo RegPath: %~1 1>>uninst.txt выводится фактически переменная %%a?
И зачем 1 перед >>.

Joolz

Цитата:

В случае echo RegPath: %~1 1>>uninst.txt выводится фактически переменная %%a?

Да, переменная %%a - название ключа реестра.

Цитата:

И зачем 1 перед >>

В общем необязательно. Это скорее для себя. Мне так удобней.

Помогите перенаправить результат команды в переменную. Как это сделать?

Помогите сделать следующую вещь:
есть файл с расширением mp3, так вот нужно запустить его через bat-файл, причем чтобы он запустился не в программе по умолчанию (Winamp), а через другую (которую укажу я)...
Можно ли вообще сделать такое?

returt

Код:
FOR /F ["options"] %variable IN (`command`) DO command [command-parameters]

sergdf
1 вариант назначить эту программу по умолчанию для воспроизведения mp3

2 вариант если у программы есть поддержка командной линии, запустить с соответствующими ключами