Access ASP SQL Server VBA NET - Форумы по проектированию

LEADERSOFT.ru Разработка на заказ программ и сайтов

Форумы по информационным технологиям

Начало

Forums

Регистрация | Вход

Форумы

Поиск

Список форумов

Программирование

Microsoft Access. Файлы mdb и accdb

Тема: Зашита md...

Тема: Зашита mdw - бесполезна?

15.06.2007 20:01:54

All

4316 сообщения

Тема: Зашита mdw - бесполезна?

На www.access.nm.ru узнал новость о том, что защита с помощью файла рабочих групп mdw вскрывается мгновенно (проверено лично).
Как защищать базы теперь?

P.S. Защита базы данных
Автор: N-A от 0:00:00 Источник ...

15.06.2007 20:01:54

All

4316 сообщения

RE: Защита mdw - бесполезна?

Непонятно, что Вы собираетесь защищать. Если полностью защитить базу данных, то ее надо конвертировать в mde. Запуск объектов и некоторые данные в таблицах защищать лучше своим алгоритмом. В одной из рассылок говорилось о шифровании RSA. В принципе достаточно просто создать на VBA программу, которая при запуске любых объектов проверять права доступа к базе данных, используя свой алгоритм шифрования.

P.S. Защита базы данных
Автор: Виктор Конюков от 0:00:00 Источник ...

15.06.2007 20:01:54

All

4316 сообщения

RE: Зашита mdw - бесполезна?

• Рассмотрим другой вариант защиты, а именно, объектов базы данных и программного кода. Например, необходимо создать файл mdb, который можно было изменять пользователю, а некоторые программы из формы изменить было бы нельзя. В данном примере создается внешний класс для формы и размещается в mde файле, который используется как библиотека.
• Применение класса выгодно также за счет экономии времени на разработку событий для стандартных кнопок: ОК, Отмена, Добавить, Печать и т.п. Если у Вас будет 5-10 форм это уже оправдывает создание класса и описание событий объектов.
• Полный программный код дан в файле: la_prot1.mdb (см. пример 11 и класс: clsProtForm )
' Описание внутреннего класса для формы. Разместите его в вашей форме.
Private mFrm As clsProtForm

Private Sub Form_Open(Cancel As Integer)
Set mFrm = New clsProtForm ' Создаем класс
Set mFrm.Form = Me.Form ' Устанавливаем ссылку
End Sub

' Это внешний класс для формы. Сохраните его в текстовом файле, а потом импортируйте из VBA. Обратите внимание на использование объектов c событиями, и именно, формы, кнопок и группы. Все события класса будут срабатывать ПОСЛЕ работы с пользовательским классом формы.
VERSION 1.0 CLASS
BEGIN
MultiUse = -1 'True
END
Attribute VB_Name = "clsProtForm"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = False
Option Compare Database
Option Explicit

' Объекты с событиями
Private WithEvents clsFrm As Form ' Форма класса
Attribute clsFrm.VB_VarHelpID = -1
Private WithEvents butCancel As CommandButton ' Кнопка класса
Attribute butCancel.VB_VarHelpID = -1
Private WithEvents GroupSelect As OptionGroup ' Группа
Attribute GroupSelect.VB_VarHelpID = -1

' Свойства форм
Public Property Set Form(Value As Form)
On Error GoTo 999
' События для формы
Set clsFrm = Value
clsFrm.OnLoad = "[Event Procedure]" ' Событие для загрузки

' События для клавиш
Set butCancel = clsFrm.Controls("butCancel") ' Ссылка на кнопку
butCancel.OnClick = "[Event Procedure]" ' Устанавливаем событие

' События для переключателя
Set GroupSelect = clsFrm.Controls("GroupSelect") ' Ссылка на группу
GroupSelect.AfterUpdate = "[Event Procedure]" ' Устанавливаем событие

Exit Property
999:
MsgBox Err.Description
Err.Clear
End Property
Public Property Get Form() As Form
Set Form = clsFrm
End Property

' События формы
Private Sub clsFrm_Load()
subProgress "clsFrm_Load" ' Загрузка
End Sub
' События кнопок
Private Sub butCancel_Click()
subProgress "butCancel_Click" ' Нажатие кнопки отмена
End Sub
' События группы
Private Sub GroupSelect_AfterUpdate()
subProgress "GroupSelect_AfterUpdate. Значение= " & clsFrm.Controls!GroupSelect
End Sub

' Сообщение. Вывод данных в форму
Public Sub subProgress(strMsg As String)
clsFrm.Controls("Progress") = _
clsFrm.Controls("Progress") & "clsProtForm: " & strMsg & vbNewLine
End Sub

P.S. Защита базы данных
Автор: Виктор Конюков от 0:00:00 Источник ...

15.06.2007 20:01:54

Дмитрий24

5 сообщения

RE: Зашита mdw и mde - бесполезна?

Мы вместе с автором этого вопроса давно работаем в эксессе. У нас есть несколько готовых (уже работающих) проектов. Но в данный момент встал вопрос о защите данных в таблицах. Код, Бог с ним, можно в mde конвертнуть, можно в dll спрятать. Да и кто захочет в нем разбираться. если программа уникальна (под заказчика). А таблицы как защитить? Что сказать заказчику, который параноидально боится кражи данных. То есть в эксессе две неразрешимые дыры, файлы групп вскрываются, мдешки реконвертятся в обычный басиковский код. И на данный момент они никак не закрыты. Свой алгоритм шифрования данных в таблицах приведет только к сильному замедлению работы, попытка дешифрования и переброски во временную таблицу не решает проблемы - это громоздко и не мешает воровать данные, если программа уже запущена. В общем, проблема.))

P.S. Защита базы данных
Автор: Дмитрий от 30.01.2002 15:56:03 Источник ...

15.06.2007 20:01:54

Михаил5

2 сообщения

RE: Зашита mdw - бесполезна?