Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2002.10.24;
Скачать: [xml.tar.bz2];

Вниз

Password   Найти похожие ветки 

 
Kim   (2002-09-29 09:48) [0]

Добрый день мастера.
Поставил пароль в Database desktop всего на одну таблицу
При открытии приложения запрашивает пароль
Как сделать (прописать в проге),чтоб не просил пароль?
Я сделал так:
Обработал событие в On Password в Session:
procedure TdmPro.SessionPassword(Sender: TObject;
var Continue: Boolean);

begin
dmPro.Session.AddPassword("12345"); // dmPro-модуль проекта
dmPro.table1.Open;
end;
Компилет по Ctrl+F9 нормально, а по F9 (Run) ругается так:
Project Pro.exe raised exception class EDBE ngine Error with
Message ‘Слишком много паролей’. Proces stopped.

Нажимаю далее F9 (Run) – пишет:

Exception EDBE ngineError in module Pro.exe at 0009E4BE.
‘Слишком много паролей’.

Обрабатывал в OnCreate ( основного приложения) :

dmPro.Database.loginprompt:=false; // где dmPro- модуль проекта
//dmPro.Database.Params.clear;
//dmPro.Database.Params.Add("12345"); // где 12345- пароль
//dmPro.Database.connected:=true;
// dmPro.table1.Open;

Ничего не помагло.
Помогите Господа Мастера, бъюс три дня и три ночи,
наверное, что-то у меня с ДНК невпорядке.


 
elv   (2002-09-29 11:08) [1]

Перед открытием таблицы.

Session.NetFileDir:="Z:\";
Session.PrivateDir:="c:\";
Session.AddPassword("123456789");
Session.Active:=True;


 
Kim   (2002-09-29 16:13) [2]

> elv
Спасибо щас попробую


 
Kim   (2002-09-29 17:39) [3]

Сделал как подсказали, а нифига не получается
Пишет такие-же ошибки, может че нето делаю
procedure TfmMain.FormCreate(Sender: TObject);
begin

dmPro.Session.NetFileDir:="d:\Pro\base";
dmPro.Session.PrivateDir:="d:\Pro\base";
dmPro.Session.AddPassword("12345");
dmPro.Session.Active:=True;
end;


 
Kim   (2002-09-30 07:22) [4]

.


 
Виталий Панасенко   (2002-09-30 08:32) [5]

Не указывай NetDir&PrivDir в папку, гду лежат таблицы !!! А Session связан с таблицами ?


 
elv   (2002-09-30 09:04) [6]


> Kim (29.09.02 17:39)
> procedure TfmMain.FormCreate(Sender: TObject);
> begin
> dmPro.Session.NetFileDir:="d:\Pro\base";
> dmPro.Session.PrivateDir:="d:\Pro\base";
> dmPro.Session.AddPassword("12345");
> dmPro.Session.Active:=True;
> end;

А дата модуль уже создан? Он у тебя создается до создания главной формы? Ты уверен?

>


 
vis79   (2002-09-30 10:24) [7]

>Kim Ну парень не слушай ты всякую .... что тебе пытаются вчухать
а просто попробуй сделать так:

procedure TdmPro.SessionPassword(Sender: TObject;
var Continue: Boolean);
begin
Continue:= True;
dmPro.Session.AddPassword("12345"); // dmPro-модуль проекта
dmPro.table1.Open;
end;

Если не поможет открывай таблицу в другом методе
dmPro.table1.Open; - после того как отработает TdmPro.SessionPassword


 
vis79   (2002-09-30 10:58) [8]

Нужно перекрыть обработчик события OnPassword

if not Assigned(Session.OnPassword) then
Session.OnPassword := SessionPassword;
Session.GetPassword;
dmPro.table1.Open;
------------------------------------------------------ <OK>


 
Kim   (2002-09-30 11:24) [9]

Спасибо ребята!!! Все учту, щас пробовать буду.

Спасибо большое vis79, щас поэксперементирую !

Есчо маленький вопросик в этой облости:
Есть база на ADO ACCESS, Я ее запоролил (общий пароль)в
ACCESSE 2000. Но при открытии проги с запороленной базой
прога ругается, пишет, что не могу открыть базу в монопольном
режиме (естественно паролил я базу в монопольном режиме)
Вот вопрос какой: Как и что прописать в проге или еще где, чтоб
прога не ругалась?
Поможите пажалуйсто, а то я уже запарился с этими паролями !!!


 
Kim   (2002-10-01 17:27) [10]

> vis79

Спасибо большое vis79 !!!

Получилось,все работает OK!!!

А как защитится от универсальных паролей, типа: jIGGAe



Страницы: 1 вся ветка

Форум: "Базы";
Текущий архив: 2002.10.24;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.58 MB
Время: 0.037 c
3-78241
diwin
2002-10-01 18:58
2002.10.24
теоретический вопрос по Query


1-78323
Shapovalov KI
2002-10-14 12:00
2002.10.24
Как в RxBDComboBox e перейти на нужный итем?


1-78373
brestmarket
2002-10-13 14:38
2002.10.24
В WebBrowser грузятся НЕ все картинки (gif-изображения) ?!


14-78622
RV
2002-09-30 17:11
2002.10.24
а говорили, по радио, сегодня день Интернета


14-78649
Сатир
2002-10-04 13:14
2002.10.24
---|Ветка была без названия|---





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский