Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 26.08.2010, 17:04   #11
valerij
Старожил
 
Аватар для valerij
 
Регистрация: 12.05.2007
Сообщений: 2,339
По умолчанию

Цитата:
Сообщение от Skif-F Посмотреть сообщение
Имена и пароли помнишь?
КонЭчно!!!
Спасибо!!
---------------
| ^^пиво^^ \\|""\\_,_
|___________||___|__|)
(@)(@)""*|(@)(@)**(@)
valerij вне форума Ответить с цитированием
Старый 30.08.2010, 16:35   #12
Skif-F
Форумчанин
 
Регистрация: 24.03.2010
Сообщений: 349
По умолчанию

Добавил возможность добавления/удаления пользователей из формы.
Начальный вход: имя пользователя - admin, пароль - admin
Пользователя admin удалять нельзя, пароль сменить можно.
Вся информация по паролям на листе "Доступ"
Количество пользователей не лимитировано
Вложения
Тип файла: zip Пароль на доступ к книге.zip (21.9 Кб, 44 просмотров)
Нет нерешаемых задач - есть недостаток времени и данных!
Skif-F вне форума Ответить с цитированием
Старый 30.08.2010, 16:59   #13
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,858
По умолчанию

Цитата:
Сообщение от Skif-F Посмотреть сообщение
Добавил возможность добавления/удаления пользователей из формы
Я тоже тут как-то делал подобное: http://excelvba.ru/tools/Authentication
Только учётные данные сохранял в пользовательских свойствах книги.
EducatedFool вне форума Ответить с цитированием
Старый 30.08.2010, 17:42   #14
doober
Старожил
 
Аватар для doober
 
Регистрация: 02.05.2009
Сообщений: 3,907
По умолчанию

Валера.за булочку с изюмом кину тебе такую классную штуку.
делал как то раз
Я файл Excel одел в оболочку,у юзера возможности только смотреть.Босс делает что хочет.Книгу закрыли-она сохраняется как массив байтов,но при этом шифруется.При открытии обратный процесс дешифровки байтов,далее документ Exel в рубашке.Только босс сможет вывести ее в файл XLS
Анализ,обработка данных Недорого
doober вне форума Ответить с цитированием
Старый 30.08.2010, 18:43   #15
sasha_prof
Форумчанин
 
Регистрация: 06.01.2010
Сообщений: 292
По умолчанию

Цитата:
Сообщение от doober Посмотреть сообщение
Валера.за булочку с изюмом кину тебе такую классную штуку.
делал как то раз
Не поделитесь ли со всеми.
Так для развития...
sasha_prof вне форума Ответить с цитированием
Старый 31.08.2010, 11:33   #16
valerij
Старожил
 
Аватар для valerij
 
Регистрация: 12.05.2007
Сообщений: 2,339
По умолчанию

Цитата:
Сообщение от doober Посмотреть сообщение
у юзера возможности только смотреть.Босс делает что хочет.
Сереж, нужно как раз наоборот, юзер меняет данные, а босс, только контролирует, что именно этот, а не другой юзер, зашел, тогда -то и во столько, и именно он, поменял данные, а если окажется, что др. юзер, поменял данные и при этом отказывается, что он поменял данные, вылетает с работы!
valerij вне форума Ответить с цитированием
Старый 31.08.2010, 12:20   #17
alebed
Пользователь
 
Аватар для alebed
 
Регистрация: 26.05.2010
Сообщений: 77
По умолчанию Проект ПЕНТАГОН

Предлагаю доп защиту от утечки паролей
включив код

Dim strartUser, allUser, WMIService
strartUser = "."
Set WMIService = GetObject("winmgmts:\\" & strartUser & "\root\CIMV2")
Set allUser = WMIService.ExecQuery("Select * from Win32_ComputerSystem")
For Each User In allUser
Worksheets("Лист1").Range("A1").Val ue = User.UserName
Next User

Получите инфу под каким логином вносивший изменения заходил в систему
Спасибо и Пасибы принимаются на WebMoney в американских Z143254902288 или русских R388611339241 монетах

Последний раз редактировалось alebed; 31.08.2010 в 12:24.
alebed вне форума Ответить с цитированием
Старый 31.08.2010, 12:56   #18
Skif-F
Форумчанин
 
Регистрация: 24.03.2010
Сообщений: 349
По умолчанию

Для EducatedFool
Спасибо, инетересные идеи, по возможности буду их применят в своих решениях. Но в данном случае, по-моему, Валере это не требуется. Если уж потребуется, тогда он выдаст новое задание на проектирование. Вот тогда будем думать
Нет нерешаемых задач - есть недостаток времени и данных!
Skif-F вне форума Ответить с цитированием
Старый 31.08.2010, 16:20   #19
Skif-F
Форумчанин
 
Регистрация: 24.03.2010
Сообщений: 349
По умолчанию

для alebed
А так не проще: Application.UserName?
Нет нерешаемых задач - есть недостаток времени и данных!
Skif-F вне форума Ответить с цитированием
Старый 31.08.2010, 16:25   #20
doober
Старожил
 
Аватар для doober
 
Регистрация: 02.05.2009
Сообщений: 3,907
По умолчанию

Цитата:
Сообщение от valerij Посмотреть сообщение
Сереж, нужно как раз наоборот, юзер меняет данные, а босс, только контролирует, что именно этот, а не другой юзер, зашел, тогда -то и во столько, и именно он, поменял данные, а если окажется, что др. юзер, поменял данные и при этом отказывается, что он поменял данные, вылетает с работы!
Так тебе лог действий юзера вести,может и фотоконтроль соорудить
Анализ,обработка данных Недорого
doober вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Запуск ограниченного числа приложений Obsever0 Общие вопросы Delphi 2 26.07.2010 17:11
Книга по регистрации пользователей. lorkynesses SQL, базы данных 1 10.02.2010 20:35
Настройки приватности для пользователей Hobbit_88 БД в Delphi 10 27.05.2009 11:58
Случайный выбор времени из ограниченного диапазона Павел-812 Microsoft Office Excel 1 19.05.2009 08:55
Помогите сделать баланс для пользователей CasperKZ PHP 2 27.10.2008 23:34