Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Раздача GRANTов [D6, IB6.x, FB]


dash78 ©   (2003-05-19 14:22:00) 

Добрый день.
Подскажите пож, как программно давать или аннулировать GRANTы.
Заранее благодарен.


kaif   (2003-05-19 17:34:00) [1]

Кладешь на фому или на датамодуль (кому как нравится) что-то вроде TIBQuery или TIBSQL.
Затем в свойство SQL записываешь команду:
SQL.Text := "GRANT ALL ON mytable TO ADVANCED_USER";
И далее запускаешь метод ExecSQL.


Соловьев   (2003-05-19 17:10:00) [2]


> dash78 © (19.05.03 16:49)

программно!!! я делаю и нет проблем.


dash78   (2003-05-19 16:49:00) [3]

2 Соловьев © (19.05.03 15:38)
см ПРОГРАММНО

2 Rad © (19.05.03 15:32)
FIBPlus, Classic

2 Alexandr © (19.05.03 14:26)
большое спасибо :(


Соловьев   (2003-05-19 15:38:00) [4]

grant и revoke отменили?


Rad   (2003-05-19 15:32:00) [5]

2Alexandr © (19.05.03 14:26)
Ловко ты его отшил :)

По теме:
1) Можно вручную работать с системными таблицами базы. Вариант не шибко хороший.
2) Можно выполнять из командной строки скрипт с раздачей и забиранием прав.
3) Можно использовать IBServices - но это зависит от версии IBX (или что там у тебя) и вида сервера (Classic или Super). Точно ничего не знаю.


Alexandr   (2003-05-19 14:26:00) [6]

www.ibexpert.com


Наверх

Титульная страница Поиск, карта сайта Написать письмо