Discussion :

[Mihalis]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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 ?

[Rayek]

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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 ;');

[Mihalis]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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;

[Rayek]

Essaie comme ca :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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;

[Mihalis]

ok j'essaie ca ce soir ou demain
with query je ne connaissais pas, ca v ame faire gagner du temps:p

[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)

[Rayek]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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;

[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 peux-t-on créer un utilisateur directement en sql ??je suppose que oui .

[Mihalis]

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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;