IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Bases de données Delphi Discussion :

pb de connection avec interbase


Sujet :

Bases de données Delphi

  1. #1
    Membre éprouvé
    Homme Profil pro
    Benevole
    Inscrit en
    Mai 2004
    Messages
    1 694
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Côte d'Ivoire

    Informations professionnelles :
    Activité : Benevole
    Secteur : Enseignement

    Informations forums :
    Inscription : Mai 2004
    Messages : 1 694
    Points : 953
    Points
    953
    Par défaut pb de connection avec interbase
    bonjour à tous
    j'utilise interbase6 et delphi 6
    et je voulais derriere un bouton le code suivant
    pour me connecter a interbase
    en effet l'utilisateur rentre les données à partir de deux edit

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
     
     
    procedure Tconnection.Button1Click(Sender: TObject);
    begin
    ibdatabase1.Params.Clear;
    ibdatabase1.DatabaseName:='c:\systeme\data\normalisation.gdb';
    ibdatabase1.Params.add('USER'#13 + edit1.text + );
    ibdatabase1.params.add('PASSWORD'#13 + edit2.text);
    ibdatabase1.Connected:=true;
     
    if NOT ibdatabase1.Connected
    then
    showmessage('Utilisateur'+ edit1.Text+'  non Connecté')
    mon message d'erreur est le suivant:
    your user name and password are not defined
    si quelqu'un peu m'aider je suis vraiment coincer
    merci

  2. #2
    Membre du Club
    Profil pro
    Inscrit en
    Janvier 2003
    Messages
    56
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2003
    Messages : 56
    Points : 45
    Points
    45
    Par défaut
    salut,

    essaye plutôt :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
     
    ibdatabase1.Params.add('user_name=' + edit1.text +#13#10);
    ibdatabase1.params.add('password='+ edit2.text+#13#10);
    @++

  3. #3
    Membre habitué
    Profil pro
    Inscrit en
    Mars 2002
    Messages
    119
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2002
    Messages : 119
    Points : 125
    Points
    125
    Par défaut
    attention, il faut que les utilisateur soient référencé dans la base comme l'utilisateur SYSDBA

    Aller dans l'ibconsole et créer tous les utilisateurs
    Mika
    www.usargancy.net

  4. #4
    Membre éprouvé
    Homme Profil pro
    Benevole
    Inscrit en
    Mai 2004
    Messages
    1 694
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Côte d'Ivoire

    Informations professionnelles :
    Activité : Benevole
    Secteur : Enseignement

    Informations forums :
    Inscription : Mai 2004
    Messages : 1 694
    Points : 953
    Points
    953
    Par défaut
    j'éssai maintenant et je vous fait signe
    merci

  5. #5
    Membre éprouvé
    Homme Profil pro
    Benevole
    Inscrit en
    Mai 2004
    Messages
    1 694
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Côte d'Ivoire

    Informations professionnelles :
    Activité : Benevole
    Secteur : Enseignement

    Informations forums :
    Inscription : Mai 2004
    Messages : 1 694
    Points : 953
    Points
    953
    Par défaut
    voici le code corrigé
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
     
    procedure Tconnection.Button1Click(Sender: TObject);
    begin
    ibdatabase1.Close;
    ibdatabase1.Params.Clear;
    ibdatabase1.DatabaseName:='c:\systeme\data\mabase.gdb';
    ibdatabase1.Params.add('user_name='+ edit1.Text);
    ibdatabase1.params.add('password='+ edit2.Text);
    try
      ibdatabase1.open;
       if ibdatabase1.Connected
         then
        showmessage('Utilisateur'+edit1.Text +'Connecté')
         else
           showmessage('Utilisateur'+edit1.Text +'non Connecté');
    except
        on E:EDatabaseError do
         showmessage('Vérifier vos paramètres : '+ E.Message);
    end;
    end;
    end.
    ainsi si l'utlisateur entre un mot de passe ou un
    user name different de ceux reconnu par le moteur
    tout est gérer dans le try...except
    a ce sujet si tu as une meilleur idée je te serai très
    reconnaissant de me la faire partager
    merci pour le coup de main!

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. connection delphi avec interbase
    Par JLASSI dans le forum InterBase
    Réponses: 2
    Dernier message: 06/03/2007, 22h03
  2. Réponses: 1
    Dernier message: 24/08/2004, 18h10
  3. connection avec une serveur interbase 4.0
    Par nicassy dans le forum InterBase
    Réponses: 2
    Dernier message: 08/06/2004, 12h53
  4. [SYBASE] connectivity avec ODBC
    Par ora9i dans le forum Sybase
    Réponses: 8
    Dernier message: 03/09/2002, 22h39
  5. couper une connection avec un serveur corba
    Par pons dans le forum CORBA
    Réponses: 3
    Dernier message: 31/05/2002, 10h11

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo