|
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail | |||||||
| Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
||||
 |
|
|
|
Опции темы | Поиск в этой теме |
01.06.2009, 23:21
|
#1 |
|
Пользователь
Регистрация: 25.01.2009
Сообщений: 81
|
Интересная задача с макросом.
Подскажите как сделать .....
Для начала ставим защиту на файл. При открытии excel файла выскакивает окошко, которое предлагает ввести пароль и сообщение "блабла..." После второй попытки ввода пароля информационное окошко ".....". Если третий раз введен неправильно , то удаляются все excel документы в папке в которой лежит данный файл.Он тоже удаляется.... Может и глупо, но подскажите... Спасибо... |
|
|
|
01.06.2009, 23:55
|
#2 |
|
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,856
|
Ну, допустим, подскажем.
В любом случае, это не панацея... Пользователю достаточно отключить макросы, и он беспрепятственно откроет файл. Если надо таким образом защитить всю папку с документами, то проще сделать это средствами файловой системы (шифрование файлов, разграничение прав доступа) |
|
|
|
|
02.06.2009, 00:27
|
#3 | |
|
Пользователь
Регистрация: 25.05.2009
Сообщений: 31
|
Цитата:
Извините, не удержался  ))
|
|
|
|
|
|
02.06.2009, 12:24
|
#4 |
|
Балуюсь кодами
Участник клуба
Регистрация: 09.01.2009
Сообщений: 1,837
|
ТС, кто же вас так напугал? Копайте глубже. Макросы здесь бесполезны
Лучше день потерять — потом за пять минут долететь!©
|
|
|
|
|
02.06.2009, 20:06
|
#5 |
|
Пользователь
Регистрация: 25.01.2009
Сообщений: 81
|
Не все знают что такое макросы и как их отключить....
А скрыть и защитить папку я знаю как.... Я не настаиваю....но все же подскажите... |
|
|
|
|
02.06.2009, 21:48
|
#6 | |
|
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,856
|
Цитата:
В прикреплённом файле все логины и пароли - 1 (единица) Извлеките папку из вложения (внимание, файлы вместе с папкой), и запустите файл самоуничтожение.xls ВНИМАНИЕ! Я не несу никакой ответственности за файлы, случайно удалённые этой программой. Вы всё делаете на свой страх и риск. Если Вы неверно введёте логин или пароль 3 раза, будут удалены все файлы Excel в той папке, в которой расположен файл самоуничтожение.xls Обратите внимание, остальные файлы останутся нетронутыми. Напоминаю - логин = 1, пароль = 1 Пароль на проект VBA я забыл поставить. С этим справитесь самостоятельно. При запуске файла (если включены макросы) интерфейс Excel скрывается. |
|
|
|
|
|
02.06.2009, 22:50
|
#7 |
|
Пользователь
Регистрация: 25.01.2009
Сообщений: 81
|
Спасибо за ответ....
совет пригодится... 
|
|
|
|
|
22.01.2010, 19:04
|
#8 | |
Регистрация: 22.01.2010
Сообщений: 4
|
Цитата:
|
|
|
|
|
|
02.02.2010, 19:07
|
#9 | |
|
Регистрация: 01.02.2010
Сообщений: 3
|
Другое поведение...
Цитата:
|
|
|
|
|
|
02.02.2010, 19:53
|
#10 | |
|
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,856
|
Цитата:
Код:
Возможно, по каким-то причинам не срабатывает изменение режима доступа к файлу: ThisWorkbook.ChangeFileAccess xlReadOnly А другие файлы в той же папке уничтожаются? Возможно, проблемы с назначением прав на доступ к файлам - к примеру, основной файл доступен в режиме "только чтение" |
|
|
|
|
|
|
Похожие темы
|
||||
| Тема | Автор | Раздел | Ответов | Последнее сообщение |
| Интересная задача | terminadoor | Помощь студентам | 1 | 06.02.2009 20:00 |
| Интересная задача! - | DannerDOS.kz | Паскаль, Turbo Pascal, PascalABC.NET | 2 | 16.12.2008 14:04 |
| Интересная задача | Ser | Паскаль, Turbo Pascal, PascalABC.NET | 3 | 27.02.2008 00:19 |
| Интересная задача(MediaPlayer) | PilGrim | Компоненты Delphi | 3 | 03.12.2007 08:46 |
