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 :

Requête SQL Access


Sujet :

Bases de données Delphi

  1. #1
    Membre averti Avatar de zemeilleurofgreg
    Profil pro
    Inscrit en
    Mars 2006
    Messages
    515
    Détails du profil
    Informations personnelles :
    Âge : 48
    Localisation : Belgique

    Informations forums :
    Inscription : Mars 2006
    Messages : 515
    Points : 346
    Points
    346
    Par défaut Requête SQL Access
    Bonjour à tous,

    voici donc ma demande :

    j'ai 1 table "Tirages" composée comme suit :

    ID (clé primaire - NumAuto)
    num1 (numérique)
    num2 (numérique)
    num3 (numérique)
    num4 (numérique)
    num5 (numérique)
    num6 (numérique)

    Est ce qu'il y a un moyen simple en SQL de faire ressortir par ex : les 6 numéros less plus présents dans la table ?

    Merci d'avance
    [Il était une fois Delphi ....]


  2. #2
    Membre éprouvé Avatar de BuzzLeclaire
    Homme Profil pro
    Dev/For/Vte/Ass
    Inscrit en
    Août 2008
    Messages
    1 606
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Dev/For/Vte/Ass

    Informations forums :
    Inscription : Août 2008
    Messages : 1 606
    Points : 1 113
    Points
    1 113
    Par défaut
    Salut,

    Si ta clé primaire est bien en Auto

    - Le plus récent est celui qui a cet ID le plus élevé.

    Maintenant si dans le meme ID tu cherche quel est le pplus recent saisie
    Je ne vois que d'ajouter auto de champ DATE que de Numero et d'enregistrer cette date a chaque saisie.

    +

  3. #3
    Membre averti Avatar de zemeilleurofgreg
    Profil pro
    Inscrit en
    Mars 2006
    Messages
    515
    Détails du profil
    Informations personnelles :
    Âge : 48
    Localisation : Belgique

    Informations forums :
    Inscription : Mars 2006
    Messages : 515
    Points : 346
    Points
    346
    Par défaut
    Salut BuzzLeclaire,

    ce que je veux, c'est faire ressortir les numéros qui se trouvent le plus de fois dans la table !

    Merci
    [Il était une fois Delphi ....]


  4. #4
    Membre éprouvé Avatar de BuzzLeclaire
    Homme Profil pro
    Dev/For/Vte/Ass
    Inscrit en
    Août 2008
    Messages
    1 606
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Dev/For/Vte/Ass

    Informations forums :
    Inscription : Août 2008
    Messages : 1 606
    Points : 1 113
    Points
    1 113
    Par défaut
    Re,

    a l'arrache...

    Select count(num1) as CompteNum1, Count(num2) as CompteNum1
    From [tatable]

    Apres tu test fields[0] > ou pas à Fields[1] etc...

    PS : tu ne devrais pas avoir besoin de clause GROUP BY puisque tu les comptes tous.

  5. #5
    Membre éprouvé Avatar de BuzzLeclaire
    Homme Profil pro
    Dev/For/Vte/Ass
    Inscrit en
    Août 2008
    Messages
    1 606
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Dev/For/Vte/Ass

    Informations forums :
    Inscription : Août 2008
    Messages : 1 606
    Points : 1 113
    Points
    1 113
    Par défaut
    Laisse tombé je n'ai pas répondu correctement à ta question.

    je regarde

  6. #6
    Membre éprouvé Avatar de BuzzLeclaire
    Homme Profil pro
    Dev/For/Vte/Ass
    Inscrit en
    Août 2008
    Messages
    1 606
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Dev/For/Vte/Ass

    Informations forums :
    Inscription : Août 2008
    Messages : 1 606
    Points : 1 113
    Points
    1 113
    Par défaut
    bon,

    Je te propose de gérer cela avec des tableaux.

    Tu envoi toutes tes valeurs num1, num2, ... dans un Tableau à 1 dimension

    ensuite tu pourras facilement parcourir ce tableau pour détecter les occurence identique et les compter, en envoyant le résultat dans un autre tableau


  7. #7
    Membre averti Avatar de zemeilleurofgreg
    Profil pro
    Inscrit en
    Mars 2006
    Messages
    515
    Détails du profil
    Informations personnelles :
    Âge : 48
    Localisation : Belgique

    Informations forums :
    Inscription : Mars 2006
    Messages : 515
    Points : 346
    Points
    346
    Par défaut
    Citation Envoyé par BuzzLeclaire Voir le message
    bon,

    Je te propose de gérer cela avec des tableaux.

    Tu envoi toutes tes valeurs num1, num2, ... dans un Tableau à 1 dimension

    ensuite tu pourras facilement parcourir ce tableau pour détecter les occurence identique et les compter, en envoyant le résultat dans un autre tableau

    oui, c'est bien ce que je pensais mais j'espèrais une solution miracle en SQL !
    [Il était une fois Delphi ....]


  8. #8
    Membre éprouvé Avatar de BuzzLeclaire
    Homme Profil pro
    Dev/For/Vte/Ass
    Inscrit en
    Août 2008
    Messages
    1 606
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Dev/For/Vte/Ass

    Informations forums :
    Inscription : Août 2008
    Messages : 1 606
    Points : 1 113
    Points
    1 113
    Par défaut
    Ouep...

    Je connais pas en Requete se genre de chose.

    Un petit algo ?

    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
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    ValeurInitial : (tableau de nombre de ligne) * (nombre de champ) de type nombre
    Nouveautableau : dynamique de type String
     
    Ligne = Select num1, Num2 From MaTable
    i=0
    Pour chaque ligne
     
    ValeurInitial[i] = ligne.Num1
    ValeurInitial[i+1] = ligne.Num2
     
    inc(i)
     
    boucler
     
    Trier le tableau Valeurinitial // dans l'ordre croissant
     
    oldValeur = ValeurInitial[0] // évite le passage au premier parcourir
    comptevaleur = 1
    pour chaque i=1 to high(ValeurInitial) // attention pas zero sinon on compte é fois le premier
     
      Valeur = Valeurinitial[i]
     
      si Valeur <> oldValeur alors
    // ici il faut enregistrer le comptevaleur par rapport 
    // à Valeurinitial[i] dans un nouveau tableau
    	NouveauTableau[i] = IntToStr(Valeurinitial[i]) + ',' + InttoStr(CompteurValeur)
    	compteurValeur = 1
    	OldValeur = Valeur  	
      sinon
    // On compte le nombre d'occurence
    	compteurValeur = CompteValeur + 1
     
     
      finSi
     
    boucler
    je c'est je l'ai fais mis french mi english, j'ai pas delphi sous la main.

    A+

  9. #9
    Membre averti Avatar de zemeilleurofgreg
    Profil pro
    Inscrit en
    Mars 2006
    Messages
    515
    Détails du profil
    Informations personnelles :
    Âge : 48
    Localisation : Belgique

    Informations forums :
    Inscription : Mars 2006
    Messages : 515
    Points : 346
    Points
    346
    Par défaut
    Merci de te décarcasser

    j'ai déja réussi à récupérer toute les valeurs de la table :

    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
    SELECT num1 AS NB FROM Tirage
    UNION ALL
    SELECT num2 FROM Tirage
    UNION ALL
    SELECT num3 FROM Tirage
    UNION ALL
    SELECT num4 FROM Tirage
    UNION ALL
    SELECT num5 FROM Tirage
    UNION ALL
    SELECT num6 FROM Tirage
    UNION ALL
    SELECT num7 FROM Tirage
    UNION ALL
    SELECT num8 FROM Tirage
    UNION ALL
    SELECT num9 FROM Tirage
    UNION ALL
    SELECT num10 FROM Tirage
    après, y a plus compter quels sont les 10 nombres qui reviennent le plus de fois !
    [Il était une fois Delphi ....]


  10. #10
    Membre émérite
    Homme Profil pro
    Directeur technique
    Inscrit en
    Mai 2008
    Messages
    2 401
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Algérie

    Informations professionnelles :
    Activité : Directeur technique
    Secteur : Service public

    Informations forums :
    Inscription : Mai 2008
    Messages : 2 401
    Points : 2 310
    Points
    2 310
    Par défaut
    Salut;

    pourquoi ne pas continuer sur cette piste :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    Select count(num1) as CompteNum1, Count(num2) as CompteNum1
    From [tatable]
    puis renseigner un tableau de type TLIST et lui appliquer un SORT.
    Bon courage ou Bonne Chance (selon le contexte)
    Mon blog sur WordPress

  11. #11
    Membre averti Avatar de zemeilleurofgreg
    Profil pro
    Inscrit en
    Mars 2006
    Messages
    515
    Détails du profil
    Informations personnelles :
    Âge : 48
    Localisation : Belgique

    Informations forums :
    Inscription : Mars 2006
    Messages : 515
    Points : 346
    Points
    346
    Par défaut
    merci à tous,

    j'ai trouvé une solution avec une requête un peu tordue que je vais mettre sur le forum dès que possible.

    @+ et merci encore
    [Il était une fois Delphi ....]


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

Discussions similaires

  1. [REQUETE]Afficher un champ "case à cocher" dans une requête SQL-Access
    Par Amael ROCHE dans le forum Requêtes et SQL.
    Réponses: 4
    Dernier message: 03/04/2007, 11h07
  2. [Requête] SQL(ACCESS) extraire nombre d'une chaîne
    Par BORDEAUX4 dans le forum Requêtes et SQL.
    Réponses: 2
    Dernier message: 31/03/2007, 16h45
  3. [Requête SQL][ACCESS 2003] - Fonction TOP, DISTINCT
    Par guiguikawa dans le forum Requêtes et SQL.
    Réponses: 14
    Dernier message: 20/06/2006, 11h41
  4. [VB6]Fonction dans requête SQL Access
    Par jean-pierre96 dans le forum VB 6 et antérieur
    Réponses: 6
    Dernier message: 21/04/2006, 19h44
  5. Réponses: 4
    Dernier message: 29/06/2005, 11h40

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