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

 Delphi Discussion :

requête sql avec message erreur


Sujet :

Delphi

  1. #1
    Membre du Club
    Inscrit en
    Mai 2008
    Messages
    89
    Détails du profil
    Informations forums :
    Inscription : Mai 2008
    Messages : 89
    Points : 49
    Points
    49
    Par défaut requête sql avec message erreur
    bonjours à tous

    une simple question :
    comment afficher un message d'erreur :showmessage ('numero d''ordre de mission non trouvé!!'); lorsque on utilise une requette de recherche
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
     
    Query1.active:=false;
        Query1.Sql.Clear;
     
       Query1.Sql.Add('SELECT * from missionaires,ordremission WHERE ordremission.num_miss ='+quotedStr(edit1.Text)+'and ordremission.mat_pers=missionaires.mat_pers');
        Query1.active:=true;
    merci

  2. #2
    Rédacteur/Modérateur

    Avatar de SergioMaster
    Homme Profil pro
    Développeur informatique retraité
    Inscrit en
    Janvier 2007
    Messages
    15 031
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 67
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations professionnelles :
    Activité : Développeur informatique retraité
    Secteur : Industrie

    Informations forums :
    Inscription : Janvier 2007
    Messages : 15 031
    Points : 40 930
    Points
    40 930
    Billets dans le blog
    62
    Par défaut
    Bonjour,
    Plusieurs solutions :
    Tester le Nombre d'enregistrement retournés =0
    Tester que la valeur de ordremission.num_miss = null

    et un conseil Indiquez votre version de Delphi , le type de composants utilisés pour la Query et la SGBD
    MVP Embarcadero
    Delphi installés : D3,D7,D2010,XE4,XE7,D10 (Rio, Sidney), D11 (Alexandria), D12 (Athènes)
    SGBD : Firebird 2.5, 3, SQLite
    générateurs États : FastReport, Rave, QuickReport
    OS : Window Vista, Windows 10, Windows 11, Ubuntu, Androïd

  3. #3
    Membre du Club
    Inscrit en
    Mai 2008
    Messages
    89
    Détails du profil
    Informations forums :
    Inscription : Mai 2008
    Messages : 89
    Points : 49
    Points
    49
    Par défaut
    Citation Envoyé par SergioMaster Voir le message
    Bonjour,
    Plusieurs solutions :
    Tester le Nombre d'enregistrement retournés =0
    Tester que la valeur de ordremission.num_miss = null

    et un conseil Indiquez votre version de Delphi , le type de composants utilisés pour la Query et la SGBD
    j'ai delphi 7 etsql 2000 server
    et pour le composant c'est un tquery
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
     
    if num_miss='' then 
    showmessage('Ordre de mission non trouvé');
    c'est ça ???!!! aprés le select !!

  4. #4
    Rédacteur/Modérateur

    Avatar de SergioMaster
    Homme Profil pro
    Développeur informatique retraité
    Inscrit en
    Janvier 2007
    Messages
    15 031
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 67
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations professionnelles :
    Activité : Développeur informatique retraité
    Secteur : Industrie

    Informations forums :
    Inscription : Janvier 2007
    Messages : 15 031
    Points : 40 930
    Points
    40 930
    Billets dans le blog
    62
    Par défaut
    Bonjour,

    if num_miss='' then
    showmessage('Ordre de mission non trouvé');
    c'est ça ???!!! aprés le select !!
    non , là vous testez une variable num_miss qui vient d'on ne sait où !

    avec votre code
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
     
    Query1.active:=false;
    Query1.Sql.Clear;
    Query1.Sql.Add('SELECT * from missionaires,ordremission WHERE ordremission.num_miss ='+quotedStr(edit1.Text)+'and ordremission.mat_pers=missionaires.mat_pers'); 
    Query1.active:=true;
    if Query.fieldByName('num_miss').isNull then 
          showmessage('Ordre de mission non trouvé');
    personnellement j'aurais écrit de la manière suivante (outre le fait de ne pas passer par le BDE qui est obsolète)

    Tout d'abord la query : je pense que SQL server est normalisé donc utilisez un SQL Normalisé (utilisation d'alias de table et de JOIN)
    Code SQL : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
    SELECT * FROM ordremission o 
                         JOIN missionaires m ON o.mat_pers=m.Mat_pers
    WHERE o.num_miss ='+quotedStr(edit1.Text)
    ensuite , plutôt que * , indiquez les champs que vous voulez récupérer , avec * vous récupérez 2 fois NUM_MISS par exemple cela peut être ambigu

    pour la partie Delphi
    utilisez plutôt une requête paramètrée
    Code SQL : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
    SELECT * FROM ordremission o 
                         JOIN missionaires m ON o.mat_pers=m.Mat_pers
    WHERE o.num_miss =:P'

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
     
    Query1.active:=false;
    Query1.ParamByName('P').asString:=Edit1.text;
    Query1.active:=true;
    if Query.fieldByName('num_miss').isNull then 
          showmessage('Ordre de mission non trouvé');
    MVP Embarcadero
    Delphi installés : D3,D7,D2010,XE4,XE7,D10 (Rio, Sidney), D11 (Alexandria), D12 (Athènes)
    SGBD : Firebird 2.5, 3, SQLite
    générateurs États : FastReport, Rave, QuickReport
    OS : Window Vista, Windows 10, Windows 11, Ubuntu, Androïd

  5. #5
    Membre du Club
    Inscrit en
    Mai 2008
    Messages
    89
    Détails du profil
    Informations forums :
    Inscription : Mai 2008
    Messages : 89
    Points : 49
    Points
    49
    Par défaut
    Citation Envoyé par SergioMaster Voir le message
    Bonjour,



    non , là vous testez une variable num_miss qui vient d'on ne sait où !

    avec votre code
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
     
    Query1.active:=false;
    Query1.Sql.Clear;
    Query1.Sql.Add('SELECT * from missionaires,ordremission WHERE ordremission.num_miss ='+quotedStr(edit1.Text)+'and ordremission.mat_pers=missionaires.mat_pers'); 
    Query1.active:=true;
    if Query.fieldByName('num_miss').isNull then 
          showmessage('Ordre de mission non trouvé');
    personnellement j'aurais écrit de la manière suivante (outre le fait de ne pas passer par le BDE qui est obsolète)

    Tout d'abord la query : je pense que SQL server est normalisé donc utilisez un SQL Normalisé (utilisation d'alias de table et de JOIN)
    Code SQL : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
    SELECT * FROM ordremission o 
                         JOIN missionaires m ON o.mat_pers=m.Mat_pers
    WHERE o.num_miss ='+quotedStr(edit1.Text)
    ensuite , plutôt que * , indiquez les champs que vous voulez récupérer , avec * vous récupérez 2 fois NUM_MISS par exemple cela peut être ambigu

    pour la partie Delphi
    utilisez plutôt une requête paramètrée
    Code SQL : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
    SELECT * FROM ordremission o 
                         JOIN missionaires m ON o.mat_pers=m.Mat_pers
    WHERE o.num_miss =:P'

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
     
    Query1.active:=false;
    Query1.ParamByName('P').asString:=Edit1.text;
    Query1.active:=true;
    if Query.fieldByName('num_miss').isNull then 
          showmessage('Ordre de mission non trouvé');
    merci pour votre aide, merci ça marche

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

Discussions similaires

  1. Réponses: 5
    Dernier message: 03/01/2023, 10h56
  2. [MySQL] Erreur requête SQL avec simple variable.
    Par Mck698 dans le forum PHP & Base de données
    Réponses: 21
    Dernier message: 31/05/2012, 14h33
  3. Réponses: 2
    Dernier message: 16/05/2012, 09h48
  4. erreur de requête SQL avec ASP mais pas dans Access
    Par csszzen dans le forum Langage SQL
    Réponses: 6
    Dernier message: 16/03/2007, 09h07

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