Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » [решено] Переименовать файл

Ответить
Настройки темы
[решено] Переименовать файл

Новый участник


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

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


Изменения
Автор: cra5h_
Дата: 05-01-2010
Помогите пожалуйста как реализовать такое переименовывание файла.
выбраный файл переименовывается и задаётся по следующему формату: текущая дата+не повторяемый за день цифра или буква (1-0, a-z), пример файлы 1209h, 0110k, 0110f, 01109.

Отправлено: 14:00, 05-01-2010

 

Новый участник


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

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


выбирается файл который переименовывается в зависимости от текущей даты. Имя файла формируется из следующих данных день, месяц, год + один произвольный неповтояющийся символ (из строки 0123465789аbcdefghijklmnopqrstuvwxyz) чтобы названия файлов были разные. За определённую дату можно переименовать только ограниченное число файлов (это ограничивается количеством символов из строки 0123465789аbcdefghijklmnopqrstuvwxyz), тоесть после смене даты можно снова переименовывать файлы.
После переименования через некоторое время файл будет удалён.

Последний раз редактировалось cra5h_, 05-01-2010 в 18:01.


Отправлено: 17:47, 05-01-2010 | #11



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.


Аватара для Creat0R

Must AutoIt


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

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


Код: Выделить весь код
$sReg_Path = "HKCU\Software\" & @ScriptName
$sKey_Name = "Folder Sufix"
$sDate_Sufix = @MDAY & @MON & @YEAR
$sChars = "0123465789аbcdefghijklmnopqrstuvwxyz_" & $sDate_Sufix

$sRead_Chars = RegRead($sReg_Path, $sKey_Name)
$iError = @error

If $sRead_Chars == "_" & $sDate_Sufix Then Exit
If $iError <> 0 Or Not StringRegExp($sRead_Chars, "[0-9a-z]+_\Q" & $sDate_Sufix & "\E$") Then $sRead_Chars = $sChars

$sSufix_Char = StringLeft($sRead_Chars, 1)

$sFile = FileOpenDialog("Select fie", "", "All files (*.*)")
If @error Then Exit

$sNew_File = StringRegExpReplace($sFile, "\\[^\\]*$", "") & "\" & $sDate_Sufix & $sSufix_Char

FileMove($sFile, $sNew_File)
RegWrite($sReg_Path, $sKey_Name, "REG_SZ", StringTrimLeft($sRead_Chars, 1))

-------
“Сделай так просто, как возможно, но не проще этого.”... “Ты никогда не решишь проблему, если будешь думать так же, как те, кто её создал.”

Альберт Эйнштейн

P.S «Не оказываю техподдержку через ПМ/ICQ, и по email - для этого есть форум. ©»

http://creator-lab.ucoz.ru/Images/Icons/autoit_icon.png Русское сообщество AutoIt | http://creator-lab.ucoz.ru/Images/Ic...eator_icon.png CreatoR's Lab | http://creator-lab.ucoz.ru/Images/Icons/oac_icon.png Opera AC Community

Это сообщение посчитали полезным следующие участники:

Отправлено: 23:02, 05-01-2010 | #12


Новый участник


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

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


самое оно. Убрал только привязку к реестру, сделал на ini файле. Спасибо

Отправлено: 16:58, 11-01-2010 | #13



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » [решено] Переименовать файл

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
HDD - [решено] Переименовать диск в ХР ab Microsoft Windows 2000/XP 28 28-04-2017 10:45
Vista / 2008 - [решено] Как переименовать встроенную запись Администратора haker-kirik Автоматическая установка Windows 11 / 10 / 8 / 7 / Vista 4 11-06-2010 02:08
Разное - [решено] Как переименовать учетную запись? maxrain Microsoft Windows Vista 13 09-01-2010 21:30
[решено] Переименовать шару в сети tehnik_srs AutoIt 2 07-01-2010 14:19
[решено] Как переименовать файл в AutoIt? evg64 AutoIt 4 21-12-2009 08:09




 
Переход