Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Ветеран


Сообщения: 1001
Благодарности: 226

Профиль | Отправить PM | Цитировать


В названии папки не допускается символ ":" - а именно этот символ присутствует в выводе содержимого переменной %time%
вот вам скрипт vbs - папку c:\temp можете поменять на любую другую


On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_LocalTime")

For Each objItem In colItems
nowday = objItem.Day
nowhour = objItem.Hour
nowminute = objItem.Minute
nowmonts = objItem.Month
nowsecond = objItem.Second
nowyear = objItem.Year
Next

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.CreateFolder("c:\temp\" & nowyear & nowmonts & nowday & nowhour & nowminute & nowsecond )
Это сообщение посчитали полезным следующие участники:

Отправлено: 16:02, 20-01-2011 | #2