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

VBA Access Discussion :

connaitre l'item le plus grand d'un champs d'une table


Sujet :

VBA Access

  1. #1
    Membre régulier
    Inscrit en
    Juin 2006
    Messages
    183
    Détails du profil
    Informations forums :
    Inscription : Juin 2006
    Messages : 183
    Points : 76
    Points
    76
    Par défaut connaitre l'item le plus grand d'un champs d'une table
    Bonjour,


    j'aimerais savoir s'il existe une fonction prédéfinie renvoyant la taille de l'item le plus grand d'un champ d'une table?

    par exemple pour le champ test de la table matable, j'ai 4 item
    test

    1)azerty
    2)jjjjjjjjjjjj
    3)jjjjjjjjjjjjjjj

    et ça me renvoit la taille l'item 3 jjjjjjjjjjjjjjj.

    en faisant quelques recherches j'ai trouvé la fonction dmax
    dmax(len("test","matable"),
    mais elle ne me renvoit pas toujours la plus grande valeur..

    conaissait-vous une fonction? ou un algorithme optimisé qui permette de récupérer la plus grande taille d'un champ.


    merci d'avancez

  2. #2
    Expert confirmé

    Homme Profil pro
    consultant développeur
    Inscrit en
    Mai 2005
    Messages
    2 878
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Val de Marne (Île de France)

    Informations professionnelles :
    Activité : consultant développeur
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Mai 2005
    Messages : 2 878
    Points : 4 754
    Points
    4 754
    Par défaut
    Par plus grand, je suppose que tu entends le plus long.


    (code non testé)

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    function MaxItem() as string
    dim rst as DAO.recordset
    dim strSql as String
     
    strSql="SELECT Test, len(Test)  from Table ORDER BY  len(Test) DESC;"
    SET rst=currentdb.openrecordset(strSql)
    if rst.recordcount > 0 then
     MaxItem=rst!test
    else
      MaxItem=Null
    end if
    end function
    Et pour retourner la longueur max

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    function LenMaxItem() as long
    dim rst as DAO.recordset
    dim strSql as String
     
    strSql="SELECT Test, len(Test) AS L1 from Table ORDER BY  len(Test) DESC;"
    SET rst=currentdb.openrecordset(strSql)
    if rst.recordcount > 0 then
     LenMaxItem=rst!L1
    else
      LenMaxItem=0
    end if
    end function
    "Always look at the bright side of life." Monty Python.

Discussions similaires

  1. Réponses: 2
    Dernier message: 29/05/2014, 14h43
  2. [Joomla!] mettre une bannière plus grande dans l'emplacement d'une petite
    Par fatjoe dans le forum EDI, CMS, Outils, Scripts et API
    Réponses: 10
    Dernier message: 05/04/2010, 14h29
  3. Réponses: 1
    Dernier message: 21/04/2009, 22h17
  4. grand nombre de champ dans une table
    Par drinkmilk dans le forum MS SQL Server
    Réponses: 2
    Dernier message: 21/06/2006, 18h54
  5. Réponses: 4
    Dernier message: 29/05/2006, 13h04

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