Mysql : avoir current_user

**sondo** · 19/02/2009, 17h32

Salut à tous

Je tente de récupérer l'utilisateur courant des la création d'une form principal. Dans l'interpréteur de commande MySql si on tape :

Code :

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

Select current_user as code from dual

le nom d'utilisateur est affiché.
Dans delphi si j'exécute cette requête :

Code :

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

1
2
3
4
5
 
  Query_user.Sql.Clear;
  Query_user.Sql.Add('select current_user as code from dual');
  Query_user.Open;
  usr := Query_user.fieldbyname('code').AsString;

il y'a cette exception : champ code non trouvé.
Comment cela s'explique t-il?.
Merci de m'aider.

**philnext** · 19/02/2009, 22h51

Essaye :
usr := Query_user.fieldbyname('current_user').AsString;

**sondo** · 20/02/2009, 11h42

Salut philnext,

Çà aussi ne marche pas. c'est toujours la même erreur.

**BuzzLeclaire** · 20/02/2009, 14h30

Salut
et avec ca :

usr := Query_user.fields.fields[0].AsString;

**sondo** · 20/02/2009, 16h26

Salut BuzzLeclaire,

J'ai essayé mais il y'a une exception : ElistError avec le message indice hors limite(0);

**BuzzLeclaire** · 20/02/2009, 16h30

Tu veux bien essayer cela :

Code :

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

1
2
3
4
5
6
7
8
9
10
With Query_user do
Begin
  Sql.Clear;
  Sql.Add('select [current_user] as code from dual');
  Open;
  usr := fieldbyname('code').AsString;
// ou
  usr := Fields.Fields[0].AsString;

end;