View previous topic :: View next topic |
Author |
Message |
Wenzz

Joined: 21 Jan 2006 Posts: 28 Location: Belarus, Gomel
|
(Separately) Posted: Sat Jan 21, 2006 20:53 Post subject: Как оставить оригинальную дату после изменения файла? |
|
|
Что нужно сделать (мож в настройках .ini файла?), чтобы дата оставалась такой, какой она была изначально при создании файла? Т.к. мне иногда часто приходится изменять файлы, а я хочу принципиально старую дату файла (иногда бывает и такое), так чтобы не лазить всё время с системные часы!!! - напрягает
А лучше былобы забиндить на какое-нить сочетание клавиш - 1 раз нажимаеш - вкл такая функция, а 2 - выкл!!!
Если кто знает подскажите, плис! |
|
Back to top |
|
 |
Вахмурка

Joined: 27 Dec 2004 Posts: 2586 Location: Большая деревня Москва
|
|
Back to top |
|
 |
Моторокер

Joined: 06 May 2005 Posts: 1517 Location: г. Пермь (читается Перьмь)
|
(Separately) Posted: Mon Jan 23, 2006 10:28 Post subject: |
|
|
1) Открыть файл
2) Запустить диалог Файл | Изменить атрибуты
3) Сохранить файл
4) Сохранить атрибуты
Если использовать редко, то нормально. Если часто, то можно замучаться. |
|
Back to top |
|
 |
Batya

Joined: 15 Dec 2004 Posts: 2224 Location: Москва, Россия
|
(Separately) Posted: Mon Jan 23, 2006 12:03 Post subject: |
|
|
Есть интересная утилитка shdate. Скачать можно, например, отсюда - http://vanopage.chat.ru/soft.html. В свойства файлов (по Alt+Enter) добавляется закладочка "Date / Time", на которой, в частности, можно установить дату "Modified" как "Created". |
|
Back to top |
|
 |
Wenzz

Joined: 21 Jan 2006 Posts: 28 Location: Belarus, Gomel
|
(Separately) Posted: Mon Jan 23, 2006 14:31 Post subject: |
|
|
Я нифига не понял куда нужно запихивать ети скрипты и польза их для меня пока сомнительна. И пока что для меня представляет реальную пользу пограмка shdate! Thanks Batya!
Но мне всё ж хотелось бы, я так понял, что в main.ini такого нет, а мож есть?, когда идёт пакетная обработка, по одному файлу тЯжАло изменять дату, а копировать кучу .mp3 файлов, используя скрипты - место не позволяет |
|
Back to top |
|
 |
Wenzz

Joined: 21 Jan 2006 Posts: 28 Location: Belarus, Gomel
|
(Separately) Posted: Mon Jan 23, 2006 14:42 Post subject: |
|
|
А в свободное время покопаюсь в скриптах. Межет реальная штука...  |
|
Back to top |
|
 |
Batya

Joined: 15 Dec 2004 Posts: 2224 Location: Москва, Россия
|
(Separately) Posted: Mon Jan 23, 2006 17:06 Post subject: |
|
|
Wenzz
Если уж тебе нравится копаться в скриптах, вот тебе скрипт:
Code: | '=====================================================================
' Установка у отмеченных файлов и файлов в отмеченных папках
' даты изменения = даты создания этих файлов
' В параметрах вызова из TC должно быть прописано:
' %L
'=====================================================================
Dim FSO, TCS, StreamFile
Set FSO = CreateObject("Scripting.FileSystemObject")
Set TCS = CreateObject("TCScript.Helper")
Set StreamFile = FSO.OpenTextFile(WScript.Arguments(0), 1)
Dim Selected, CurrFile
Do While Not StreamFile.AtEndOfStream
Selected = StreamFile.ReadLine
If FSO.FileExists(Selected) Then
Set CurrFile = FSO.GetFile(Selected)
TCS.SetFileDateAtr CurrFile,,CurrFile.DateCreated
End If
If FSO.FolderExists(Selected) Then
FolderProcess(FSO.GetFolder(Selected))
End If
Loop
MsgBox("Выполнено!")
Set FSO = Nothing
Set TCS = Nothing
Set StreamFile = Nothing
Set CurrFile = Nothing
Wscript.Quit()
Function FolderProcess(CurrFolder)
Dim sf, f
For Each sf in CurrFolder.SubFolders
FolderProcess(sf)
Next
For Each f in CurrFolder.Files
TCS.SetFileDateAtr f,,f.DateCreated
Next
End Function |
Сохрани в файл *.vbs и повесь этот файл на кнопку (или команду меню "Запуск" и горячую клавишу). В параметрах вызова скрипта должно быть %L.
ЗЫ. В скрипте используется Script Helper, установи его.
Last edited by Batya on Mon Jan 23, 2006 17:11; edited 1 time in total |
|
Back to top |
|
 |
Batya

Joined: 15 Dec 2004 Posts: 2224 Location: Москва, Россия
|
(Separately) Posted: Mon Jan 23, 2006 17:09 Post subject: |
|
|
В догонку...
Пока писал скрипт, оказалось, что shdate весьма глючная штука - у меня на Win2k TotalCmd вылетал по Access Violation после нескольких вызовов свойств файлов по Alt+Enter. |
|
Back to top |
|
 |
Wenzz

Joined: 21 Jan 2006 Posts: 28 Location: Belarus, Gomel
|
(Separately) Posted: Mon Jan 23, 2006 23:46 Post subject: |
|
|
Прикинь, Batya, та же бодяга с Access Violation, пока читал, но у меня winXP (видимо это из-за того, что програмулина старая. Интересно а поновее версия есть?). Не совсем понял, что за файл *.vbs и что такое %L. Попробую пока разобраться.
Да, слушай, Batya может ты между делом и знаешь где достать супа-кряцкер, тобы вверху твоё имя писалось? У меня TC 6.53 XP 3.3.1. Был бы весьма признателен! А-то весь нет перерыл - кроме ихних имён нифигааааа. Толи дело был TC 6.03 XP... |
|
Back to top |
|
 |
Wenzz

Joined: 21 Jan 2006 Posts: 28 Location: Belarus, Gomel
|
(Separately) Posted: Tue Jan 24, 2006 00:13 Post subject: |
|
|
С *.vbs я уже разобрался (так всегда: только написал, посмотрел куда надо, разобрался)... |
|
Back to top |
|
 |
alex1973
Joined: 24 Jan 2006 Posts: 2
|
(Separately) Posted: Tue Jan 24, 2006 11:01 Post subject: |
|
|
Total cmd не запускается
После переустановки работает какое-то время, а потом не запускантся, просто ярлык перещелкнется и все.Что делать подскажите. |
|
Back to top |
|
 |
Batya

Joined: 15 Dec 2004 Posts: 2224 Location: Москва, Россия
|
(Separately) Posted: Tue Jan 24, 2006 11:03 Post subject: |
|
|
Wenzz
На этом форуме кряки к TC не обсуждаются!
Хотя ты и разобрался, на всякий случай (может еще кто не знает)...
vbs - это файл, написанный с использованием технологии Windows Host Script на языке Visual Basic Script. Такие файлы можно запускать, как обычные exe-файлы.
%L - это надо написать в поле "Параметры" в свойствах кнопки в TC. TC вместо %L подставит имя временного файла, содержащего список выделенных файлов и папок. |
|
Back to top |
|
 |
Вахмурка

Joined: 27 Dec 2004 Posts: 2586 Location: Большая деревня Москва
|
|
Back to top |
|
 |
Batya

Joined: 15 Dec 2004 Posts: 2224 Location: Москва, Россия
|
(Separately) Posted: Wed Jan 25, 2006 11:49 Post subject: |
|
|
Вахмурка
На мой взгляд, проще новичку дать скрипт WHS, который можно СРАЗУ использовать, чем заставлять разбираться с PowerPro.
И ты отошел от первоначального ТЗ:
Quote: | чтобы дата оставалась такой, какой она была изначально при создании файла |
Т.е., как я понимаю, надо сделать дату изменения равной дате создания файла.
К тому же, при использовании указанного тобой скрипта необходимо иметь копии одноименных файлов, что противоречит:
Quote: | а копировать кучу .mp3 файлов, используя скрипты - место не позволяет |
И может ли твой скрипт обрабатывать вложенные папки?
Quote: | И никаких тебе Access Violation |
Если посомтреть внимательно, то видно, что я писал, что Access Violation возникает, если использовать утилитку shdate. Это один из предложенных мной вариантов и к приведенному мной скрипту он отношения не имеет. |
|
Back to top |
|
 |
Вахмурка

Joined: 27 Dec 2004 Posts: 2586 Location: Большая деревня Москва
|
(Separately) Posted: Wed Jan 25, 2006 17:36 Post subject: |
|
|
2Batya
Batya wrote: |
На мой взгляд, проще новичку дать скрипт WHS, который можно СРАЗУ использовать, чем заставлять разбираться с PowerPro. |
Да, за исключением случая, если PowerPro уже установлен и запущен и клиент достаточно подготовлен, чтобы в нем "разобраться". В ТЗ об этом ничего не сказано
Quote: | Т.е., как я понимаю, надо сделать дату изменения равной дате создания файла. |
Здесь вина вопрошающего - нечетко поставлена задача.
Quote: | К тому же, при использовании указанного тобой скрипта необходимо иметь копии одноименных файлов, что противоречит ...
И может ли твой скрипт обрабатывать вложенные папки? |
Если их (папок) не сотня, то минус на минус дает плюс - обработали одну - очистили место - обработали другую - и т. д.
Quote: | Если посомтреть внимательно, то видно, что я писал, что Access Violation возникает, если использовать утилитку shdate. Это один из предложенных мной вариантов и к приведенному мной скрипту он отношения не имеет. |
А я и не имею ничего против скриптов, тем более твоих.
Вывод - я предложил вариант, который я бы стал использовать, встань передо мной такая задача. А чьему совету следовать - это выбор клиента. _________________ Сайт PowerPro+Total Commander
Скрипты PowerPro для Total Commander
* * *
«Не усматривайте злого умысла в том, что вполне объяснимо глупостью» (Р. Хэнлон) |
|
Back to top |
|
 |
|
|
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum
|
Powered by phpBB © 2001, 2005 phpBB Group
|