Total Commander Forum Index Total Commander
Форум поддержки пользователей Total Commander
Сайты: Все о Total Commander | Totalcmd.net | Ghisler.com | RU.TCKB
 
 RulesRules   SearchSearch   FAQFAQ   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Single Post  Topic: Автоматическое создание каталога с именем - текущая дата? 
Author Message
Batya



PostPosted: Thu Jul 14, 2005 17:35    Post subject: Reply with quote

Блин, ступил, когда скрипт правил, чтоб на FTP работал. Вот нормальный вариант (входные параметры уже не нужны):
Code:
'=======================================
' Создание папки с именем системной даты
'=======================================

Dim WS
Set WS = WScript.CreateObject("WScript.Shell")

Dim NewFold
NewFold = Date
Wscript.Sleep 500
WS.SendKeys "{F7}" & NewFold & "{Enter}"
Set WS=Nothing
Wscript.Quit

Также убрал проверку на наличие каталога - не знаю, как на FTP проверять.
View user's profile Send private message


Powered by phpBB © 2001, 2005 phpBB Group