Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Как программно создать пользователя базы ACCESS? [D6, ACCESS97]

MN © (2006-07-26 13:18:00)
Уважаемые Мастера. Как можно с помощью программы добавить/удалить пользователя(USER)и добавить/удалить группу(GROUP)? Если можно, примерчики...

Megabyte (2006-07-26 18:01:00) [1]

> sniknik © (26.07.06 17:00) [9]

Оффтоп:какой кошмар. Мы все пропали. :)))

sniknik (2006-07-26 17:00:00) [2]
ну как же не оттуда?

# Рюхаться — 1. договаpиваться о пpедстоящем пpеступлении; 2. чувствовать, что воp лезет в каpман.
# Рюхнуться — догадаться.

корни оттуда, т.к. блатная феня очень старая (возможно старше вашего института, и наоборот быть не может), т.что можеш поздравить своих в универе, они выбрали себе подходящих авторитетов.

Megabyte (2006-07-26 16:37:00) [3]

> sniknik © (26.07.06 14:41) [6]
> > но при этом не рюхаютSQL.
> http://ru.wikipedia.org/wiki/%D0%92%D0%BE%D1%80%D0%BE%D0%B2%D1%81%D0%BA%D0%BE%D0%B9_%D0%B6%D0%B0%D1%80%D0%B3%D0%BE%D0%BD

Близко. %) Но слово не оттуда. Это используется у нас в универе. Синомним понимать, разбираться, знать.

MN (2006-07-26 14:46:00) [4]
С таблицами все прошло гладко. А что с юзерами-не знаю. Жду ответа...
Справку смотрела-ничего нового. VB очень сильно отличается от Делфей

sniknik (2006-07-26 14:41:00) [5]
> имя Марина, пол - мужской... как то страшновато столо :-)
да уж, в реале с ним явно лучше не встречаться... во избежание. ;о)

> Я в SQL не сильна. Может быть, есть примерчики с использованием ADOX?
конечно есть. справка ADO210.CHM, раздел "Users Collection" ну и все там связанное. примеры там в основном на VB, ну и на С++ есть.

> но при этом не рюхаютSQL.
http://ru.wikipedia.org/wiki/%D0%92%D0%BE%D1%80%D0%BE%D0%B2%D1%81%D0%BA%D0%BE%D0%B9_%D0%B6%D0%B0%D1%80%D0%B3%D0%BE%D0%BD

MN (2006-07-26 14:39:00) [6]
Вот код:
procedure TForm1.Button1Click(Sender: TObject);
Var
Catalog:Variant;
User:Variant;
begin
//Строка соединения ADOConnection
//Provider=Microsoft.Jet.OLEDB.4.0;
//Data Source=C:\testadox\GammaI1.mdb;
//Persist Security Info=False;
//Jet OLEDB:System database=c:\Windows\System\system.mdw

adoc.Connected:=True;
Catalog:=CreateOLEObject('ADOX.Catalog');
Catalog.ActiveConnection:=adoc.ConnectionObject;
User:=CreateOLEObject('ADOX.User');
User.Name:='newuser';
catalog.users.append(user,'password');//!!!Error!!!
//ARGUMENTS ARE OF THE WRONG TYPE,
//ARE OUT OF ACCEPTABLE RANGE,
//OR ARE IN CONFLICT WITH ONE ANOTHER
showmessage(inttostr(catalog.users.count));
user:=UnAssigned;
catalog:=UnAssigned;
end;
Ну не хочет он выполнять команду... Помогите, пожалуйста, в чем ошибка?

з.ы. Строчка ПОЛ в анкете необязательна для заполнения...

Megabyte (2006-07-26 14:27:00) [7]

> Я в SQL не сильна.

Вот никогда не понимал людей, которые работают с БД, но при этом не рюхают SQL.

Max Zyuzin (2006-07-26 14:03:00) [8]
>MN © (26.07.06 13:48) [2]
<offtop>Заглянул к Вам в анкету - имя Марина, пол - мужской... как то страшновато столо :-)</offtop>

MN (2006-07-26 13:48:00) [9]
Я в SQL не сильна. Может быть, есть примерчики с использованием ADOX?

sniknik (2006-07-26 13:35:00) [10]
справка JETSQL40.CHM раздел "CREATE USER или GROUP - инструкция" + DROP USER ... и т.д. все связанное по списку внизу первой темы.
примеры там есть.

кстати ACCESS 97не рекомендуется к использованию, возьми версию базы 2000 минимум.

Наверх

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