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

VB 6 et antérieur Discussion :

comment utiliser Findfirst et FindNext


Sujet :

VB 6 et antérieur

  1. #1
    Nouveau membre du Club
    Inscrit en
    Février 2004
    Messages
    63
    Détails du profil
    Informations forums :
    Inscription : Février 2004
    Messages : 63
    Points : 36
    Points
    36
    Par défaut comment utiliser Findfirst et FindNext
    salut
    j'ai une table reliée par un data
    je voudrais faire la somme des champs en utilisant findfirst et findnext suivant un critère dans ce cas comment faire?
    voici matable
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
    facture ( codefac, codecli, montantfac)
    je voudrais faire la somme des montantfac pour le codecli="1" par exemple.

    merci de me répondre.

  2. #2
    Membre expérimenté Avatar de Megaxel
    Profil pro
    Inscrit en
    Mai 2003
    Messages
    1 187
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2003
    Messages : 1 187
    Points : 1 405
    Points
    1 405
    Par défaut
    Mais tu peux le faire directement en SQL, non? (Ça dépend peut-être de ta base...)
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    SELECT SUM(montantfac) FROM facture WHERE codecli = 1

  3. #3
    Nouveau membre du Club
    Inscrit en
    Février 2004
    Messages
    63
    Détails du profil
    Informations forums :
    Inscription : Février 2004
    Messages : 63
    Points : 36
    Points
    36
    Par défaut
    oui, en sql ça fonctionne bien. de me que la boucle Do while ...... Loop
    mais je veux savoir comment utiliser FINDFIRST ET FINDNEXT aussi.
    car ça pourra me servir un jour.

    merci

  4. #4
    Membre expérimenté Avatar de Megaxel
    Profil pro
    Inscrit en
    Mai 2003
    Messages
    1 187
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2003
    Messages : 1 187
    Points : 1 405
    Points
    1 405
    Par défaut
    Ha d'accord.
    Mais je ne peux pas trop t'aider sur ce point, je n'ai jamais utilisé ces méthodes. D'ailleurs, elles s'appliquent sur quel objet? Je ne les ai pas sur les RecordSet ADO...

  5. #5
    Membre actif Avatar de AdHoc
    Profil pro
    Inscrit en
    Mai 2003
    Messages
    245
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2003
    Messages : 245
    Points : 239
    Points
    239
    Par défaut
    bonjour,
    Il y a un exemple dans l'aide de Microsoft.
    Mais egalement un conseil: Utiliser plutot la methode seek
    D'autre part ces méthodes ne s'appliquent qu'avec la DAO et avec moults restrictions,
    donc si tu veux l'utiliser un jour, dépéche toi ou alors peut etre fais tu de l'archéologie ?

  6. #6
    Nouveau membre du Club
    Inscrit en
    Février 2004
    Messages
    63
    Détails du profil
    Informations forums :
    Inscription : Février 2004
    Messages : 63
    Points : 36
    Points
    36
    Par défaut
    ils s'applique sur DAO
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    Data1.Recorset.MoveFirst     'premier enregistrement
    Data1.Recorset.MoveNext     'enregistrement suivant
    Data1.Recorset.FindFirst (criteria )   'premier enregistrement répondant au critère
    Data1.Recorset.FindNext (criteria )   'enregistrement suivant répondant au critère
    en faite son utilisation n'ext pas aussi compliquée.
    merci

  7. #7
    Nouveau membre du Club
    Inscrit en
    Février 2004
    Messages
    63
    Détails du profil
    Informations forums :
    Inscription : Février 2004
    Messages : 63
    Points : 36
    Points
    36
    Par défaut
    quand j'utilise la méthode seek, ça me marche
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
     
    data1.recordset.index = "champ"
    data1.recordset.seek"=",  cle
    ça me signal toujours une erreur.
    et je suis obligé de passer par autre méthode:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
     
    dim mabase as database.
    dim matable as recordset
     
    set matable=mabase.openrecordset("table")
    matable.index="champ"
    matable.seek"=",cle
    if not matable.nomatch then
    .
    .
    .
    endif
    pourquoi avec data la recherche seek ne marche pas

    merci beaucoup

  8. #8
    Rédacteur
    Avatar de jacma
    Profil pro
    Inscrit en
    Juillet 2002
    Messages
    612
    Détails du profil
    Informations personnelles :
    Âge : 80
    Localisation : France

    Informations forums :
    Inscription : Juillet 2002
    Messages : 612
    Points : 1 241
    Points
    1 241
    Par défaut
    Bonjour

    Les méthodes en question sont des méthodes DAO. Un code du genre de ce qui suit fonctionne très bien.
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    rs.FindFirst "[nomcolonne] = '" & variable & "' "
    Mais pourquoi DAO : : :

    Et regarde le post http://www.developpez.net/forums/vie...&highlight=dao. Il date de mercredi et traite de ce thème.

  9. #9
    Nouveau membre du Club
    Inscrit en
    Février 2004
    Messages
    63
    Détails du profil
    Informations forums :
    Inscription : Février 2004
    Messages : 63
    Points : 36
    Points
    36
    Par défaut
    merci à tous
    ma question est resolue.

  10. #10
    Rédacteur
    Avatar de jacma
    Profil pro
    Inscrit en
    Juillet 2002
    Messages
    612
    Détails du profil
    Informations personnelles :
    Âge : 80
    Localisation : France

    Informations forums :
    Inscription : Juillet 2002
    Messages : 612
    Points : 1 241
    Points
    1 241
    Par défaut
    Citation Envoyé par oumarsaw
    merci à tous
    ma question est resolue.
    Alors, un petit tag [Résolu] ne déparrerait pas le tableau

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

Discussions similaires

  1. Réponses: 4
    Dernier message: 24/02/2009, 13h06
  2. Comment utiliser un cache ?
    Par TOM-Z dans le forum XMLRAD
    Réponses: 4
    Dernier message: 14/03/2003, 10h55
  3. comment utiliser actionscript ?
    Par webs dans le forum Flash
    Réponses: 3
    Dernier message: 10/02/2003, 00h11
  4. Comment utiliser OUT ?
    Par Bouziane Abderraouf dans le forum CORBA
    Réponses: 3
    Dernier message: 20/07/2002, 10h35
  5. Réponses: 5
    Dernier message: 11/06/2002, 16h21

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