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

Access Discussion :

Recherche sur un champ et recherche suivant


Sujet :

Access

  1. #1
    Membre habitué Avatar de DurDur
    Homme Profil pro
    Retraité
    Inscrit en
    Avril 2005
    Messages
    241
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 79
    Localisation : France, Moselle (Lorraine)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Distribution

    Informations forums :
    Inscription : Avril 2005
    Messages : 241
    Points : 133
    Points
    133
    Par défaut Recherche sur un champ et recherche suivant
    Bonjour,

    J'ai récupéré ce code qui marche bien, mais je voudrais qu'il recherche aussi si la demande (rechnom) est partièle.
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    Private Sub Recherche_Click()
    Dim strcritere As String
    strcritere = "nom like " & Chr(34) & rechnom & Chr(34)
    Me.Recordset.findfirst strcritere
        If Me.Recordset.nomatch Then
            If rechnom <> "" Then
                Formattedmsgbox "ATTENTION@AUCUN enregistrement correspond à votre DEMANDE@", vbExclamation, "RECHERCHE 'PATIENT'"
            Else
                Formattedmsgbox "ATTENTION@Votre critère de recherche est vide@", vbExclamation, "RECHERCHE 'PATIENT'"
            End If
        End If
    End Sub
    ensuite, je voudrais créer une commande qui continue à chercher.
    Si on trouve, on affiche.
    Si on trouve pas, on affiche une msgbox.

    et pour finir, si la recherche est exacte, comment effacer le champ "rechnom"?

    Merci de votre aide.
    Windows 10 - ACCESS 2007

  2. #2
    Modérateur

    Homme Profil pro
    Inscrit en
    Octobre 2005
    Messages
    15 323
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Canada

    Informations forums :
    Inscription : Octobre 2005
    Messages : 15 323
    Points : 23 758
    Points
    23 758
    Par défaut Re: Recherche sur un champ et recherche suivant
    Citation Envoyé par DurDur
    Bonjour,

    J'ai récupéré ce code qui marche bien, mais je voudrais qu'il recherche aussi si la demande (rechnom) est partièle.
    Remplace

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
    strcritere = "nom like " & Chr&#40;34&#41; & rechnom & Chr&#40;34&#41;
    par

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
    strcritere = "nom like " & Chr&#40;34&#41; & "*" & rechnom & "*" & Chr&#40;34&#41;
    ensuite, je voudrais créer une commande qui continue à chercher.

    Si on trouve, on affiche.
    Si on trouve pas, on affiche une msgbox.
    pour la commande, c'est FindNext en lieu et place de FindFirt, pour la logique de message je t'en laisse le soin. C'est

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
    Me.Recordset.nomatch
    qui te dit si tu n'a pas trouvé ce que tu cherchais.

    et pour finir, si la recherche est exacte, comment effacer le champ "rechnom"?
    Je suppose que RechNom est dans ton form courrant

    A+
    Vous voulez une réponse rapide et efficace à vos questions téchniques ?
    Ne les posez pas en message privé mais dans le forum, vous bénéficiez ainsi de la compétence et de la disponibilité de tous les contributeurs.
    Et aussi regardez dans la FAQ Access et les Tutoriaux Access. C'est plein de bonnes choses.

  3. #3
    Membre habitué Avatar de DurDur
    Homme Profil pro
    Retraité
    Inscrit en
    Avril 2005
    Messages
    241
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 79
    Localisation : France, Moselle (Lorraine)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Distribution

    Informations forums :
    Inscription : Avril 2005
    Messages : 241
    Points : 133
    Points
    133
    Par défaut
    Voilà une réponse rapide.

    Je vais essayé tout ça.

    Pour l' "*", j'avais trouvé un truc, maintenant je vais faire la suite.

    Pour continuer la recherche en effaçant le champ "rechnom", peut-on mettre son contenu dans une variable ?

    Merci.
    Windows 10 - ACCESS 2007

  4. #4
    Modérateur

    Homme Profil pro
    Inscrit en
    Octobre 2005
    Messages
    15 323
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Canada

    Informations forums :
    Inscription : Octobre 2005
    Messages : 15 323
    Points : 23 758
    Points
    23 758
    Par défaut
    Citation Envoyé par DurDur
    Voilà une réponse rapide.
    Pour continuer la recherche en effaçant le champ "rechnom", peut-on mettre son contenu dans une variable ?
    Oui, tu peux il suffit de définir une variable globale au formulaire en dehors de la procédure.

    Tu peux aussi essayer avec une variable 'static' dans ta procédure. Les variables static ne sont pas réinitialisée à chaque appel de la procéduer.

    Attention les variables globales sont à manier avec précaution, c'est une bonne source de bug. L'attitude recommandée est de ne pas les utiliser et de préférer le passage de paramètres
    Vous voulez une réponse rapide et efficace à vos questions téchniques ?
    Ne les posez pas en message privé mais dans le forum, vous bénéficiez ainsi de la compétence et de la disponibilité de tous les contributeurs.
    Et aussi regardez dans la FAQ Access et les Tutoriaux Access. C'est plein de bonnes choses.

  5. #5
    Membre habitué Avatar de DurDur
    Homme Profil pro
    Retraité
    Inscrit en
    Avril 2005
    Messages
    241
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 79
    Localisation : France, Moselle (Lorraine)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Distribution

    Informations forums :
    Inscription : Avril 2005
    Messages : 241
    Points : 133
    Points
    133
    Par défaut
    La première partie de ma demande fonctionne trés bien.

    Pour effacer le champ "rechnom", j'ai essayé plusieurs choses qui ne me satisfont pas.

    Il faudrait que cette fonction s'efface seulement si on fait une autre commande que RECHERCHE ou SUITE DE RECHERCHE et je ne vois pas d'autre solution que de mettre sur chaque champ et commande, à reception du focus, le code:
    Avez vous une autre idée ?

    Je m'absente pour une semaine.

    Merci beaucoup et

    @+
    Windows 10 - ACCESS 2007

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

Discussions similaires

  1. [Débutant]Recherche sur plusieurs champs
    Par Touareg dans le forum Langage SQL
    Réponses: 2
    Dernier message: 21/03/2007, 15h04
  2. requete recherchant sur 2 champs
    Par ozzmax dans le forum Requêtes
    Réponses: 3
    Dernier message: 01/09/2006, 20h07
  3. [PostGre SQL] Recherche sur un champs
    Par Cyberbob002 dans le forum Langage SQL
    Réponses: 3
    Dernier message: 10/01/2006, 12h57
  4. Recherche sur un champ LONG
    Par Endymion222 dans le forum Oracle
    Réponses: 14
    Dernier message: 29/11/2005, 15h31
  5. Réponses: 2
    Dernier message: 30/11/2004, 10h42

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