Discussion :

[/dev/null]

En gros, mon soucis est assez simple je pense. Je souhaite qu'a l'ouverture de mon application, je puisse vérifier que l'utilisateur a bien le droit de ce connecter au serveur, et si c'est la cas, j'aimerais vérifier que ma base de donnée existe...
Je n'ai vraiment aucune connaissance d'InterBase, mais je doit travaillé avec ce system. J'espaire ne pas avoir fait un post redondant, j'ai fait une recherche assé rapide et verifier dans la FAQ...

Mercie, même si vous ne faite que lire ce message .

[qi130]

Le "pb" avec IB, c'est que la BD et le serveur sont très intimement liés (et j'ose dire inversement !!!)

Les autorisations d'accès ne se font pas sur une BD, mais sur les tables qui la constituent.

En plus, le composant database reçoit tous les paramètres de connexion:
- adresse serveur (et protocole si pas en local)
- nom du fichier IB supportant la DB (ou alias si via BDE ? je maitrise pas ce point)
- username
- password

quand c'est fait, tu mets le Tdatabase à actif et tu vois ce qui se passe...

donc: tu ne peux pas savoir a priori si le username a des droits sur la BD et tu ne peux pas savoir si la BD existe sans fournir un username.

ce que j'ai fait dans 1 appli: déclarer en base un user réservé à l'init (récup de qq info). Si les infos reviennent, c'est que la BD existe et est active.
Ensuite je réinitialise le user pour permettre le login de l'utilisateur.


Et pour + d'infos le forum Interbase !

[/dev/null]

J'ai une petite piste...
Quand j'initialise corectement mon TIBDatabase, c'est à dire avec le bon login et le nom de ma table, l'erreur revoyé semble diférente. Si je dit semble, c'est que le méssage est bien diférent, mais le code de l'exception (EIBInterBaseError) semble lui identique...

J'ai déclaré c'est deux constante:

Code :

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

1
2
3
Const
        INVALID_USERNAME_AND_PASSWORD : Integer = -902;
        CLIENT_LOGON_ANNULATED        : Integer = 10;

Le code suivant

Code :

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

1
2
3
4
5
6
7
8
9
10
     Try
      BDD.Connected := true;
    Except
      on E: EIBInterBaseError do
        if E.SQLCode = INVALID_USERNAME_AND_PASSWORD then
          Application.MessageBox('Nom d''utilisateur ou mot de passe incorrecte','Erreur')
        Else Begin
          Application.MessageBox('Erreur innatendue','Erreur');
          Exit;
        End;

M'afficheras bien ma 1er boite de dialogue si le longin n'est pas bon, mais aussi si la base n'existe pas...
Aurais-je fait une erreur ?