Discussion :

[colorid]

Bonjour,

A l'ouverture d'une base de données une fenêtre Windows s'affiche pour saisir l'identifiant et le mot de passe.

Question :

Peut-on remplacer cette fenêtre par une fenêtre plus personnelle de type TForm ou autre ?

Si Oui comment courtcircuiter Windows ou la SGBD et comment adresser l'ID et le PW à la BD ?

Je travaille avec Delphi 2007 et InterBase 2007

Merci d'avance pour l'info

[rsc]

Je suppose que tu utilises un TDatabase (ou équivalent) pour te connecter à ta base. Si tu renseignes User et Password dans les Params de ton TDatabase et que tu mets sa propriété LoginPrompt à False, il se connecte sans rien te demander.
A partir de là, tu peux utiliser les événements OnLogin ou BeforeConnect pour faire les contrôles que tu veux avant connexion, ou bien l'événement AfterConnect (dans ce cas, l'utilisateur est déjà connecté à la base, mais tu n'es forcé de le lui dire , et tu peux utiliser des données stockées dans ta base pour déterminer ses droits).

J'espère avoir répondu à ta question.

[Andry]

Met LoginPrompt à False et gère la saisie des ID/MDP/Role via une fiche perso.

A+

[moezben]

Salut
Je te conseille de mettre LoginPrompt à False mais avant il faut renseigner les champs USER NAME et PASSWORD , de toutes façons tu peux utiliser une table pour archiver les noms de tes utilisateurs et leurs mots de passe associés et jouer sur l'événement OnLogin pour créer une fenêtre d'identification ( Nom d'utilisateur et Mot de passe ) qui récupérera comparera les noms d'utilisateurs ainsi que leurs logins avec ceux qui sont stockés dans la base , si tout va bien alors

Code :

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

1
2
3
4
5
6
7
8
9
 
Database.params[0] := 'USER NAME' ; // Nom d'utilisateur 
Database.params[1] := 'PASSWORD';// Mot de passe 
Try
Database.connected := True;
Except 
ShowMessage('Erreur de connexion');
Database.connected := False;
End;

Bon voilà , j'espére que ça va marcher , une derniére remarque , taches que tes utilisateurs n'ont pas le privilége de SYSDBA sinon , ils peuvent accéder à la table des utilisateurs

Bonne soirée

[colorid]