Автоматическое создание каталога с именем - текущая дата?

Обсуждение Total Commander. Установка, использование, настройка, решение проблем, скрытые функции. Обсуждение новых версий.

Модераторы: d-view, Моторокер, Avada, CaptainFlint, Nik

Toni
Сообщения: 26
Зарегистрирован: Ср июл 13, 2005 15:55

Сообщение Toni »

LocKtaR-o-DarK писал(а):Господа это можно сделать и без скриптов.
И довольно просто.

Для этого создаем новую кнопку

В строке "Команда" пишем В строке "Параметры" пишем

Код: Выделить всё

for /f "tokens=1,2,3,4 delims=. " %%a in ('date /t') do md "%%d%%c-%%b-%%a"
Значок на свое усмотрение, конечно же.

Формат отображения тоже.

Удачи.

Слушай, здорово! Твой способ понравился мне больше остальных, спасибо!

Теперь есть несколько вопросиков:

1) Как поменять формат даты на "Американский", т.е. YYYY.MM.DD

2) как зделать так, то бы перед датой было еще одно слово, с пробелом. Т.е. что бы в итоге название каталога выглядело так:

"FeedBack 2005.09.01 ???

Заранее - очень благода
Аватара пользователя
Rulchik
Сообщения: 36
Зарегистрирован: Ср июн 29, 2005 16:10
Откуда: Санкт-Петербург
Контактная информация:

Сообщение Rulchik »

Toni
1) Как поменять формат даты на "Американский", т.е. YYYY.MM.DD
Хм... Оно и так всё, вроде, в "американском"
2) как зделать так, то бы перед датой было еще одно слово, с пробелом. Т.е. что бы в итоге название каталога выглядело так:

"FeedBack 2005.09.01 ???

Код: Выделить всё

for /f "tokens=1,2,3,4 delims=. " %%a in ('date /t') do md "FeedBack %%d%%c-%%b-%%a"
Аватара пользователя
Rulchik
Сообщения: 36
Зарегистрирован: Ср июн 29, 2005 16:10
Откуда: Санкт-Петербург
Контактная информация:

Сообщение Rulchik »

Toni
Если нужны точки, то, соответственно, так:

Код: Выделить всё

for /f "tokens=1,2,3,4 delims=. " %%a in ('date /t') do md "FeedBack %%d%%c.%%b.%%a"
P.S. Мог бы и сам догадаться :).
Аватара пользователя
LocKtaR-o-DarK
Сообщения: 349
Зарегистрирован: Пт авг 12, 2005 04:20
Откуда: Москва
Контактная информация:

Сообщение LocKtaR-o-DarK »

Toni
Спасибо за подсказку с каталогом (текущая дата. Круто!) Твой способ понравился мне больше всех других описаных.

Но, есть пара вопросов:

1) Как изменить формат создаваемой даты на "американский" - т.е. YYYY.MM.DD

2) как перед датой ввести какое-то другое слово, т.е., что бы каталог получался, например, с таким названием: - "FeedBack 2005.09.01"?
Хороший вопрос.

Ну что же, подскажу.

Попросту скопируй это:

Код: Выделить всё

TOTALCMD#BAR#DATA
%comspec% /c
for /f "tokens=1,2,3,4 delims=. " %%a in ('date /t') do md "FeedBack %%d%%c-%%b-%%a"
shell32.dll,213
Создать каталог, название - текущая дата


-1
и вставь на панель кнопок
Изображение    Изображение    Изображение
Toni
Сообщения: 26
Зарегистрирован: Ср июл 13, 2005 15:55

Сообщение Toni »

Ок. Всем огромный Сэнкс!

То Rulchik

P.S. Мог бы и сам догадаться


Да, пожалуй, ты прав. Теперь я вижу, что мог бы и сам! :lol:
Toni
Сообщения: 26
Зарегистрирован: Ср июл 13, 2005 15:55

Сообщение Toni »

To Rulchik

Ooops! У твоего Варианта обнаружился один, очень существенный (для меня!!!) недостаток - он на ФТП не работает! :(
Toni
Сообщения: 26
Зарегистрирован: Ср июл 13, 2005 15:55

Сообщение Toni »

мне раньше "Batya" (см. начало топика) скриптик Давал, вот этот вот:

WScript.CreateObject("WScript.Shell").SendKeys "{F7}" & Date & "{Enter}"

А, нельзя ли в нем как-то формат даты задать, не зависимо от системных установок винды? На FTP только этот скрипт работает :(
Аватара пользователя
Volniy
Сообщения: 585
Зарегистрирован: Ср дек 15, 2004 00:17
Откуда: Местный

Сообщение Volniy »

Toni писал(а):А, нельзя ли в нем как-то формат даты задать, не зависимо от системных установок винды? (
Замени в том скрипте строку

Код: Выделить всё

MyDate = Date
на свой вариант, например

Код: Выделить всё

MyDate = Day(Date) & "." & Month(Date) & "." & Year(Date) 
короче тут уже разделены день, год и месяц, и можно их комбинировать как угодно.
Аватара пользователя
Rulchik
Сообщения: 36
Зарегистрирован: Ср июн 29, 2005 16:10
Откуда: Санкт-Петербург
Контактная информация:

Сообщение Rulchik »

Toni
И не забудь про FeedBack! :D

Код: Выделить всё

MyDate = "FeedBack " & Year(Date) & "." & Month(Date) & "." & Day(Date)
Toni
Сообщения: 26
Зарегистрирован: Ср июл 13, 2005 15:55

Сообщение Toni »

Rulchik писал(а):Toni
И не забудь про FeedBack! :D

Код: Выделить всё

MyDate = "FeedBack " & Year(Date) & "." & Month(Date) & "." & Day(Date)
Сэнск. Помогло. Правда, формат изначальный не совсем устраивал, нужны были "0" в месяцах и днях (т.е что бы дата выглядела вот так 2005.09.12)
В общем, в итоге решил так (самым премитивным способом!):


if (Month(Date)<10) then mMonth="0" & Month(Date) else mMonth=Month(Date)
if (Day(Date)<10) then mDay="0" & Day(Date) else mDay=Day(Date)
MyDate = Year(Date) & "." & mMonth & "." & mDay
WScript.CreateObject("WScript.Shell").SendKeys "{F7}" & MyDate & "{Enter}"

Если есть варианты по проще добиться того же результата - буду весьма благода, а, то у меня, как-то с этим не очень!!! :lol:
Аватара пользователя
Volniy
Сообщения: 585
Зарегистрирован: Ср дек 15, 2004 00:17
Откуда: Местный

Сообщение Volniy »

Toni писал(а):Если есть варианты по проще добиться того же результата - буду весьма благода, а, то у меня, как-то с этим не очень!!! :lol:

Код: Выделить всё

mydate = "FeedBack " & Year(date) & "." & Right("0" & Month(date), 2) & "." & Right("0" & Day(date), 2)
Toni
Сообщения: 26
Зарегистрирован: Ср июл 13, 2005 15:55

Сообщение Toni »

Volniy писал(а):
Toni писал(а):Если есть варианты по проще добиться того же результата - буду весьма благода, а, то у меня, как-то с этим не очень!!! :lol:

Код: Выделить всё

mydate = "FeedBack " & Year(date) & "." & Right("0" & Month(date), 2) & "." & Right("0" & Day(date), 2)
О! Круто! Коротко и понятно! :lol:

Большой, большой СЭНКС!!! Все работает!!!
S.F.W.
Сообщения: 19
Зарегистрирован: Пт апр 22, 2005 10:30

Сообщение S.F.W. »

[off]
LocKtaR-o-DarK Batya Rulchik
Пацаны вы действительно асы , гранд респект.
[/off]
Аватара пользователя
mf-zl
Сообщения: 71
Зарегистрирован: Вс авг 21, 2005 03:30
Откуда: BLR
Контактная информация:

Сообщение mf-zl »

Код: Выделить всё

TOTALCMD#BAR#DATA
cmd /c
for /f "tokens=1,2,3,4 delims=. " %%a in ('date /t') do md "%%d%%a.%%b.%%c"
shell32.dll,3
DateFolder

1
-1

скопуруйте код и на панели управления нажмите вставить
Аватара пользователя
Volniy
Сообщения: 585
Зарегистрирован: Ср дек 15, 2004 00:17
Откуда: Местный

Сообщение Volniy »

mf-zl писал(а):скопуруйте код и на панели управления нажмите вставить
А нельзя быть чуть более внимательным? Этот вариант уже рассматривался и он не работает c FTP.
Закрыто