| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Программное создание пользователя Interbase [D6, IB6.x]
MAxiMum © (2003-02-16 16:17:00)Помогите, пожалуйста, с такой задачей. Надо добавить пользователя БД Interbase. База данных создавалась для конкретного пользователя и его же паролем. Чтобы начать пользоваться с ней, естественно этот логин необходимо зарегить на этом компе. Не могли бы вы подсказать, как это можно сделать. Есть два варианта. Может, кто предложит еще. Первый - как в помощи. Но он не работает:
procedure AddUser(const aUser, aPass: String);
var IBSecurityService: TIBSecurityService;
begin
IBSecurityService := TIBSecurityService.Create(nil);
with IBSecurityService do
begin
Protocol := Local;
ServerName := "localhost";
Params.Add("user_name=SYSDBA");
Params.Add("password=masterkey");
Active := True;
try
FirstName := "Пользователь УМК";
UserName := aUser;
Password := aPass;
AddUser;
finally
try
Active := False;
finally
Free;
end;
end;
end;
end;
Второй - написать в наглую в файл isc4.gdb - но там пароли шифруются. И если они шифруются у меня так, нет вероятности, что на другой тачке будет по-другому. Это так сказать запасной вариант, расчитанный на недок. возможность.
А как надо?
y-soft (2003-02-16 18:07:00) [1]А кто сказал, что алгоритм шифровки должен измениться?
Если будет так, то с обратной совместимостью можно сразу же распрощаться. Всегда используется один и тот же вариант алгоритма DESX.
Примеры реализации:
http://www.ibase.ru/download/IBUSER.ZIP
http://www.ibase.ru/download/UNIXPASS.ZIP
http://www.ibase.ru/download/ib_pass.zip
http://www.ibase.ru/download/UNXCRYPT.ZIP
http://www.ibase.ru/download/ibusers.zip
Reindeer Moss Eater (2003-02-16 17:49:00) [2]gsec.exe ?
MAxiMum (2003-02-16 17:29:00) [3]Никто не знает?
| |
