create user dynamique

Version imprimable

11/03/2007, 20h43
Mihalis

create user dynamique
Bonjour, je voudrais pouvoir créer dynamiquement un utilisateur pour la base de données, j'utilise bds2006 , dans la faq j'ai vu qu'il fallait le composant tibsecurityservice, je n'ai pas ce compo, je pensaios betement faire une requete
Code:

1 2 3 CREATE USER 'tu'@ '%'; GRANT ALL PRIVILEGES ON * . * TO 'tu'@ '%' WITH GRANT OPTION MAX_QUERIES_PER_HOUR 0 MAX_CONNECTIONS_PER_HOUR 0 MAX_UPDATES_PER_HOUR 0 MAX_USER_CONNECTIONS 0 ;
mais il lui faut les ' ', alors avec query.sql.add(' ');
il plante
qq'un aurait il une piste ?

Tu les doubles les ' et tu n'auras plus de problème.

Code:

1
2
3
4
5
 
SQL.Add('CREATE USER ''tu''@ ''%'';');
SQL.Add('GRANT ALL PRIVILEGES ON * . * TO ''tu''@ ''%'' WITH GRANT OPTION');
SQL.Add('MAX_QUERIES_PER_HOUR 0 MAX_CONNECTIONS_PER_HOUR 0 ');
SQL.Add('MAX_UPDATES_PER_HOUR 0 MAX_USER_CONNECTIONS 0 ;');

oui j'avais essayé mais ce que je n'avais pas dit c'est que j'utilise un paramètre pour encoder le user

voici mon code :

Code:

1
2
3
4
5
6
7
8
9
queryuser.Close;
queryuser.SQL.clear;
queryuser.SQL.Add('CREATE USER '':ut''@ ''%'';');
queryuser.SQL.Add('GRANT ALL PRIVILEGES ON * . * TO '':ut''@ ''%'' WITH GRANT OPTION');
queryuser.SQL.Add('MAX_QUERIES_PER_HOUR 0 MAX_CONNECTIONS_PER_HOUR 0 ');
queryuser.SQL.Add('MAX_UPDATES_PER_HOUR 0 MAX_USER_CONNECTIONS 0 ;');
queryuser.paramcheck:=true;
queryuser.parambyname('ut').asstring:=dbeditini.text;
queryuser.execsql;

Essaie comme ca :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
 
With queryuser do
begin
  Close;
  SQL.clear;
  SQL.Add('CREATE USER :ut@ ''%'';');
  SQL.Add('GRANT ALL PRIVILEGES ON * . * TO :ut@ ''%'' WITH GRANT OPTION');
  SQL.Add('MAX_QUERIES_PER_HOUR 0 MAX_CONNECTIONS_PER_HOUR 0 ');
  SQL.Add('MAX_UPDATES_PER_HOUR 0 MAX_USER_CONNECTIONS 0 ;');
  paramcheck:=true;
  parambyname('ut').asstring:=QuotedStr(dbeditini.text);
  execsql;
End;

Sinon, sasn paramètre :

Code:

1
2
3
4
5
6
7
8
9
10
11
 
With queryuser do
begin
  Close;
  SQL.clear;
  SQL.Add('CREATE USER ' + QuotedStr(dbeditini.text) + '@ ''%'';');
  SQL.Add('GRANT ALL PRIVILEGES ON * . * TO ' + QuotedStr(dbeditini.text) + '@ ''%'' WITH GRANT OPTION');
  SQL.Add('MAX_QUERIES_PER_HOUR 0 MAX_CONNECTIONS_PER_HOUR 0 ');
  SQL.Add('MAX_UPDATES_PER_HOUR 0 MAX_USER_CONNECTIONS 0 ;');
  execsql;
end;

12/03/2007, 19h08
Mihalis

ok j'essaie ca ce soir ou demain
with query je ne connaissais pas, ca v ame faire gagner du temps:p
12/03/2007, 20h29
Mihalis

il plante avec les deux solutions
voici l'erreur si ca te dit qq chose....
First chance exception at $7C812A5B. Exception class EDBEngineError with message 'General SQL error.
[MySQL][ODBC 3.51 Driver][mysqld-5.0.18-nt]You have an error in your SQL syntax; check the manual that corresponds to your
MySQL server version for the right syntax to use near ''%'' at line 1'. Process Projecttimesheet.exe (4616)

Es tu sûr de la synthaxe de la requete ?

Si tu utilises la deuxieme solution (celle sans les paramètres), sauvegarde la requete pour voir si l'affichage est le bon et test la requete dans le SQL de MySQL.
Code:

1 2 3 4 5 6 7 8 9 10 11 12 With queryuser do begin Close; SQL.clear; SQL.Add('CREATE USER ' + QuotedStr(dbeditini.text) + '@ ''%'';'); SQL.Add('GRANT ALL PRIVILEGES ON * . * TO ' + QuotedStr(dbeditini.text) + '@ ''%'' WITH GRANT OPTION'); SQL.Add('MAX_QUERIES_PER_HOUR 0 MAX_CONNECTIONS_PER_HOUR 0 '); SQL.Add('MAX_UPDATES_PER_HOUR 0 MAX_USER_CONNECTIONS 0 ;'); SQL.SaveToFile(ExtractFilePath(Application.exeName) + 'test.txt'); execsql; end;

13/03/2007, 16h16
Mihalis

salut, en fait, j'ai ajotué un utilisateur au départ de phpmyadmin, lorsque je crée un nouveal utilisateur a partir de phpmyadmin ca fonctionne, mais si j'exécute la même requête en sql ca plante 8O peux-t-on créer un utilisateur directement en sql ??je suppose que oui .

voila, il faut le faire en deux étapes et ne pas mettre le @ server

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
With queryuser do
begin
  Close;
  SQL.clear;
  SQL.Add('CREATE USER '+quotedstr(dbeditini.text)+';');
  execsql;
  close;
  sql.clear;
  SQL.Add('GRANT ALL PRIVILEGES ON * . * TO '+quotedstr(dbeditini.text)+' WITH GRANT OPTION');
  SQL.Add('MAX_QUERIES_PER_HOUR 0 MAX_CONNECTIONS_PER_HOUR 0 ');
  SQL.Add('MAX_UPDATES_PER_HOUR 0 MAX_USER_CONNECTIONS 0 ;');
  execsql;
end;