ReSQL.ru
     
powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Макрос, удаление файла Word после определенной даты!
25 сообщений из 32, страница 1 из 2
  1  все
Макрос, удаление файла Word после определенной даты!
    #36665171
trexmernii
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
trexmernii
Гость
Вообщем суть такая:
Написать макрос в VBA Word-а таким образром что-бы при открытии данного файла он проверял системное время и в случае если оно больше определенной даты он закрывал этот файл и удалял его с компьютера. Ну либо удалял из него всю информацию и пересохранялся пустым.
Сделать это реально???
...
Рейтинг: 0 / 0
02.06.2010, 20:41
| Ответить | Цитировать | Написать  
Макрос, удаление файла Word после определенной даты!
    #36665175
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
trexmerniiВообщем суть такая:
Написать макрос в VBA Word-а таким образром что-бы при открытии данного файла он проверял системное время и в случае если оно больше определенной даты он закрывал этот файл и удалял его с компьютера. Ну либо удалял из него всю информацию и пересохранялся пустым.
Сделать это реально???

Реально. Второе проще.
...
Рейтинг: 0 / 0
02.06.2010, 20:43
| Ответить | Цитировать | Написать  
Макрос, удаление файла Word после определенной даты!
    #36665176
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Shocker.ProРеально. Второе проще.

Только если пользователь ответит положительно на вопрос "Отключить макросы", то не выйдет :)
...
Рейтинг: 0 / 0
02.06.2010, 20:43
| Ответить | Цитировать | Написать  
Макрос, удаление файла Word после определенной даты!
    #36665178
trexmernii
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
trexmernii
Гость
Извиняюсь за неправильно заданный вопрос: Как это сделать???
...
Рейтинг: 0 / 0
02.06.2010, 20:44
| Ответить | Цитировать | Написать  
Макрос, удаление файла Word после определенной даты!
    #36665193
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
trexmerniiИзвиняюсь за неправильно заданный вопрос: Как это сделать???
Расположить свой макрос в Sub Document_Open
...
Рейтинг: 0 / 0
02.06.2010, 20:54
| Ответить | Цитировать | Написать  
Макрос, удаление файла Word после определенной даты!
    #36665252
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
trexmernii, кстати я не проверял никогда ВБА по команде файл точно мимо корзины пошлёт, Вы проверяли?? Решили вопрос, подскажите как?
...
Рейтинг: 0 / 0
02.06.2010, 21:42
| Ответить | Цитировать | Написать  
Макрос, удаление файла Word после определенной даты!
    #36665258
trexmernii
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
trexmernii
Гость
Нет, пока не решил, ждал ответа, но так его и не получил!
...
Рейтинг: 0 / 0
02.06.2010, 21:49
| Ответить | Цитировать | Написать  
Макрос, удаление файла Word после определенной даты!
    #36665260
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
trexmernii,

Вопрос был абстрактный, ответ был абстрактный.
Будет вопрос конкретный (к примеру, как узнать текущую дату), будет конкретный ответ.

А фразы "Сделайте все за меня" не звучало.
...
Рейтинг: 0 / 0
02.06.2010, 21:52
| Ответить | Цитировать | Написать  
Макрос, удаление файла Word после определенной даты!
    #36665273
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
Shocker.Pro, то есть проблема в этом, сказать "Сделайте все за меня", а если серьёзно меня в этом интерисует только тот факт, что если это всё также, таже задача, но изначально был не документ а шаблон, с него сделали документ и как в него перекочует этот макрос
Sub Document_Open. А сказать "Сделайте все за меня", я не могу не мой вопрос, владелец вопроса стесняется?
...
Рейтинг: 0 / 0
02.06.2010, 22:12
| Ответить | Цитировать | Написать  
Макрос, удаление файла Word после определенной даты!
    #36665281
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
Что то начал делать по существу вопроса
Это намётки:

Код: plaintext
1.
2.
3.
Set Объект = CreateObject("Scripting.FileSystemObject") 'cоздать объект (сценарий - Scripting)
Set Файл = Объект.GetFile(ActiveDocument.FullName) Время_первого_сохранения_файла_на_этом_компьютере = Файл.DateCreated
Текущая_дата_и_время = Now
И столкнулся с тем что наведя на переменные их значение не подсвечивается, это оключается где то или куда всё пропало??
...
Рейтинг: 0 / 0
02.06.2010, 22:22
| Ответить | Цитировать | Написать  
Макрос, удаление файла Word после определенной даты!
    #36665286
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
Эта строка у меня кончно на двух разных строках, так скопировалось
Код: plaintext
1.
Set Файл = Объект.GetFile(ActiveDocument.FullName) Время_первого_сохранения_файла_на_этом_компьютере = Файл.DateCreated
...
Рейтинг: 0 / 0
02.06.2010, 22:24
| Ответить | Цитировать | Написать  
Макрос, удаление файла Word после определенной даты!
    #36665289
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Ципихович Эндрюизначально был не документ а шаблон, с него сделали документ и как в него перекочует этот макрос
Честно, говоря, ответа не знаю.
Создавать макросы в документе с помощью другого макроса в принципе можно. Но вот как поймать событие в шаблоне, когда на основе него создается новый документ и есть ли вообще такой момент...

Подождем Костю или vlth-а, может они чего умное скажут.
...
Рейтинг: 0 / 0
02.06.2010, 22:25
| Ответить | Цитировать | Написать  
Макрос, удаление файла Word после определенной даты!
    #36665293
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Ципихович ЭндрюИ столкнулся с тем что наведя на переменные их значение не подсвечивается, это оключается где то или куда всё пропало??

Оно подсвечивается, если при отладке данная переменная в области видимости текущего контекста.

Можете еще поиграться с окном Watch
...
Рейтинг: 0 / 0
02.06.2010, 22:27
| Ответить | Цитировать | Написать  
Макрос, удаление файла Word после определенной даты!
    #36665455
trexmernii
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
trexmernii
Гость
Я не силен в VBA, и поэтому не знаком операторами данного языка, потому и хотел получить сразу готовый ответ - думал что это очень просто для таких профи как на этом форуме, думал даже что по такому легкому вопросу сразу отправят читать FAQ! Но так понимаю что вопрос не легкий так как никто не ответил должным образом!
А мне просто нужно что бы в макросе была указана конкретная дата которую макрос бы сравнивал с системным временем и производил действия по удалению, либо обнулению данного файла!

Хотелось бы сразу конкретный ответ, а еще лучше готовый файл!

После этого сообщения следом будет следовать порядка 3-5 сообщений которые ничего путного как: "да ты парень совсем хочешь что бы все на блюдечке было". наверняка не последует, так что прошу писать только дельные сообщения!

Еще раз всем большое спасибо за помощь и взаимопонимание!
...
Рейтинг: 0 / 0
02.06.2010, 23:43
| Ответить | Цитировать | Написать  
Макрос, удаление файла Word после определенной даты!
    #36665475
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
trexmernii,

уговорили
...
Рейтинг: 0 / 0
02.06.2010, 23:53
| Ответить | Цитировать | Написать  
Макрос, удаление файла Word после определенной даты!
    #36665565
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Игорь Горбонос
Участник
Shocker.Pro,

А что должно быть???
Нет, я конечно понимаю, что документ должен был очистится и перезаписатся, но как ни странно у меня для ворда стоит высокая безопасность и ничего не сработало

trexmernii, Ципихович Эндрю
не изобретайте велик. Для макросов нормальной защиты нет.
...
Рейтинг: 0 / 0
03.06.2010, 01:04
| Ответить | Цитировать | Написать  
Макрос, удаление файла Word после определенной даты!
    #36665581
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Игорь ГорбоносА что должно быть???
Нет, я конечно понимаю, что документ должен был очистится и перезаписатся, но как ни странно у меня для ворда стоит высокая безопасность и ничего не сработало

Я автору сказал это еще в третьем посте.
Если поставить хотя бы среднюю безопасность и разрешить макросы, тогда сработает.
...
Рейтинг: 0 / 0
03.06.2010, 01:25
| Ответить | Цитировать | Написать  
Макрос, удаление файла Word после определенной даты!
    #36665632
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
Я с Вами не согласен, Вы мысленно представьте эту задачу для себя, ещё к мыслям добавьте цену вопроса. Смысл вот в чём защитить можно но тогда это не понравиться пользователям, а все и Микрософт надеются на то что купивших будет больше чем тех кто пользуется некупивши. Что проблема отследить у кого из вышедших в сеть операционка или программа не лецензионная и заблокировать их до тех пока не устранят, да легко, только этого не делают? Вопрос почему, опять же в надежде на ....
...
Рейтинг: 0 / 0
03.06.2010, 07:39
| Ответить | Цитировать | Написать  
Макрос, удаление файла Word после определенной даты!
    #36665636
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
Shocker.Pro, что то видимо время Х вышло и файл открывается и делает Ваш скрипт, одним словом не посмотреть, выложите что ли скрипт
...
Рейтинг: 0 / 0
03.06.2010, 07:46
| Ответить | Цитировать | Написать  
Макрос, удаление файла Word после определенной даты!
    #36665653
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Игорь Горбонос
Участник
Ципихович Эндрю,

а в макросах нельзя посмотреть код самому?
...
Рейтинг: 0 / 0
03.06.2010, 08:40
| Ответить | Цитировать | Написать  
Макрос, удаление файла Word после определенной даты!
    #36666274
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
Игорь Горбонос, как можно посмотреть если файл не открывается?
...
Рейтинг: 0 / 0
03.06.2010, 12:29
| Ответить | Цитировать | Написать  
Макрос, удаление файла Word после определенной даты!
    #36666307
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Игорь Горбонос
Участник
> Автор: Ципихович Эндрю
> Игорь Горбонос, как можно посмотреть если файл не открывается?

что значит не открывается?

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
03.06.2010, 12:36
| Ответить | Цитировать | Написать  
Макрос, удаление файла Word после определенной даты!
    #36667325
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
Игорь Горбонос, в паке А у меня есть скачанный файл, его имя 1, его я выделяю, появляется контекстное меню, его верхняя строчка открыть, нажимаю её, он открывается на долю секунды и тут же закрывается, после чего остаётся только стандартная заставка Микрософт Ворд, вроде всё описал
...
Рейтинг: 0 / 0
03.06.2010, 16:52
| Ответить | Цитировать | Написать  
Макрос, удаление файла Word после определенной даты!
    #36667339
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Игорь Горбонос
Участник
> Автор: Ципихович Эндрю

:)
Понятно, включи хотя-бы средний уровень безопасности и перезапусти ворд, после чего открывай файл.

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
03.06.2010, 16:55
| Ответить | Цитировать | Написать  
Макрос, удаление файла Word после определенной даты!
    #36667343
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Ципихович ЭндрюИгорь Горбонос, в паке А у меня есть скачанный файл, его имя 1, его я выделяю, появляется контекстное меню, его верхняя строчка открыть, нажимаю её, он открывается на долю секунды и тут же закрывается, после чего остаётся только стандартная заставка Микрософт Ворд, вроде всё описал

Ну правильно.
Там внутри макрос, который его чистит и закрывает.
Отключите макросы.
...
Рейтинг: 0 / 0
03.06.2010, 16:55
| Ответить | Цитировать | Написать  
25 сообщений из 32, страница 1 из 2
  1  все
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Макрос, удаление файла Word после определенной даты!
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&msg=36667339&tid=2157067]:
 0ms
get settings:
 12ms
get forum list:
 16ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 30ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 61ms
get tp. blocked users:
 1ms
others: 18ms
total:  155ms
созд. / загр.: 155ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]