Новости
Документация
Download
Webboard
Поиск
FAQ/ЧаВо
Обратная связь




MySQL.RU - Webboard



Вернуться
превелегии пользователей DELPHI+ADO или MYDAC (Феникс) 29/05/2008 - 13:24:12
      Re: превелегии пользователей DELPHI+ADO или MYDAC (Dima) 02/06/2008 - 11:43:16
      Re: превелегии пользователей DELPHI+ADO или MYDAC (админ) 10/02/2009 - 17:18:23



From: Феникс - 29/05/2008 - 13:24:12
Subject:превелегии пользователей DELPHI+ADO или MYDAC
-----------------
Проблема (пишу программу для диспетчера такси, локальную СУБД, но в будущем свозможность работы через интернет и некой вераютность для PHP, по этому и MYSQL) такая, при изменении из Делфи базы mysql\user\max_user_connections
Изменения не действую но запись сохраняется. Тоесть к примеру у пользователя pain@% (с любого хоста) было max_user_connections - 0 я изменяю и ставлю один. то из ЛЮБОЙ другой программы всеравно можно подключится не огранниченное кол-во раз, но стоит зайти в SQL Administrator->USer Administrator-> pain resources и просто посматреть этот параметр, И вся, как по волшебству кол-во подключений ограниченно.
ПС для обычного пользователя (Pain к примеру все ок, спокойно рабоатет все сохраняется)
ППС
для работы с таблицей user, подключаюсь как root
Вопрос ЧТО не так? я использую


5.05и cammuntiy-nt VIA TCP/IP server
Borland delphi 7
MYDAC 4.4 или 5.0 (пробовал, но использую ADO и ODBC, результат такойже)
параметры подключения
для root
server 192.168.1.2
port 3306
UID root
PWD 123
OPTIONAL = 1// для ADO, при работе с MYDAC не используется

function connection(BD_T3: TADOConnection;SERVER,UID,PWD,PORT,BD:string):integer;
// для подлючение через ADO
begin
BD_T3.ConnectionString:='Provider=MSDASQL.1;Extended Properties="' +
'SERVER='+SERVER+';' +
'PORT='+PORT+';'+
'DRIVER=MySQL ODBC 5.1 Driver;' +
'UID='+UID+';PWD='+PWD+';' +
'DATABASE='+BD+';' +
'OPTION=1"' ;


try
BD_T3.Connected:=true;
except
on e: exception do
begin
result:= GetErrorCod(e.Message);
exit;
end;
end;
result:=1;
end;


function GetErrorCod(Emessage:string):integer ;
begin
//для того что бы писать ошибки, по русски... по их коду
// login_u.frm_log.mem_error.Lines.Add(Emessage);
if copy(Emessage,0,46)=ServerNF then begin result:= 10; exit; end;
if copy(Emessage,0,46)=AccessD then begin result:= 20; exit; end;
if PosEx(MaxUC,Emessage)<>0 then begin result:=30; exit; end;
result:=-1;
end;
end.
и на последок:-)
можно программно перегузить сервер и все заработает.. но не ахото после каждого добовления юзера или изменения его привелегий(ничего не меняется но запись в таблицы идет!!, пока не зайдеш в SQL adminidtrator или грузанеш сервер)


[Это сообщение - спам!]

Последние сообщения из форума

Уважаемые посетители форума MySQL.RU!
Убедительная просьба, прежде чем задавать свой вопрос в этом форуме, обратите внимание на разделы:
- ответы на наиболее часто задаваемые вопросы - FAQ
- раздел документация
- раздел поиск по сообщениям форума и документации
Также, старайтесь наиболее подробно указывать свою ситуацию (версию операционной системы, версию MySQL, версию программного обеспечения, по которому возникает вопрос, текст возникающих ошибок, и др.)
Помните, чем конкретнее Вы опишете ситуацию, тем больше шансов получить реальную помощь.
 Имя:
 E-mail:
 Тема:
 Текст:
Код подтверждения отправки: Code
34982



РЕКЛАМА НА САЙТЕ
  Создание сайтов | |