Problème de recherche sur Access VBA
Bernamax
Messages postés
2
Date d'inscription
Statut
Membre
Dernière intervention
-
Bernamax Messages postés 2 Date d'inscription Statut Membre Dernière intervention -
Bernamax Messages postés 2 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
J'aurais besoin que vous m'éclairiez de votre connaissance et de votre
savoir faire en vue de débloquer mon stage.
Mon problème est le suivant :
Comme sur l'image ci-jointe, mon but est là de permettre une recherche
multicritère. A la modification de chaque champs, la liste des produit de
met correctement à jour dans la zone du bas, mais chaque champs est pour
le moment indépendant des autre. Ainsi, je ne puis faire qu'une recherche
par type ou par modèle ou pardisponibilité ou par etc. Le problème est que
j'aimerai transformer ces "ou" en "et". (le bouton Rechère multicritère
n'a encore aucune procedure évènementielle reliée)
Voici le code du champs de référence du type
Private Sub critReftype_Change()
Me.Liste0.RowSource =
"SELECT type_produit.ref_type_produit, type_produit.nom_type_produit,
type_produit.descriptif, type_produit.valeur_achat,
modele_produit.ref_modele, modele_produit.video_modele,
produit.ref_produit, produit.nom_produit,
produit.Etat_produit, produit.est_pack,
produit.ref_pack_produit
FROM (produit INNER JOIN modele_produit ON
produit.ref_modele=modele_produit.ref_modele)
INNER JOIN type_produit ON
modele_produit.ref_type_produit=type_produit.ref_type_produit
WHERE type_produit.ref_type_produit Like ('" + Me.critReftype.Text + "*')
ORDER BY type_produit.ref_type_produit;"
If Me.Liste0.ListCount = 0 Then
Me.txtCompteur.Value = 0
Else
Me.txtCompteur.Value = Me.Liste0.ListCount - 1
End If
End Sub
et chaque champs est construit sur le même modèle ( sauf pour est une pack qui est un choix binaire)
Merci d'avance
J'aurais besoin que vous m'éclairiez de votre connaissance et de votre
savoir faire en vue de débloquer mon stage.
Mon problème est le suivant :
Comme sur l'image ci-jointe, mon but est là de permettre une recherche
multicritère. A la modification de chaque champs, la liste des produit de
met correctement à jour dans la zone du bas, mais chaque champs est pour
le moment indépendant des autre. Ainsi, je ne puis faire qu'une recherche
par type ou par modèle ou pardisponibilité ou par etc. Le problème est que
j'aimerai transformer ces "ou" en "et". (le bouton Rechère multicritère
n'a encore aucune procedure évènementielle reliée)
Voici le code du champs de référence du type
Private Sub critReftype_Change()
Me.Liste0.RowSource =
"SELECT type_produit.ref_type_produit, type_produit.nom_type_produit,
type_produit.descriptif, type_produit.valeur_achat,
modele_produit.ref_modele, modele_produit.video_modele,
produit.ref_produit, produit.nom_produit,
produit.Etat_produit, produit.est_pack,
produit.ref_pack_produit
FROM (produit INNER JOIN modele_produit ON
produit.ref_modele=modele_produit.ref_modele)
INNER JOIN type_produit ON
modele_produit.ref_type_produit=type_produit.ref_type_produit
WHERE type_produit.ref_type_produit Like ('" + Me.critReftype.Text + "*')
ORDER BY type_produit.ref_type_produit;"
If Me.Liste0.ListCount = 0 Then
Me.txtCompteur.Value = 0
Else
Me.txtCompteur.Value = Me.Liste0.ListCount - 1
End If
End Sub
et chaque champs est construit sur le même modèle ( sauf pour est une pack qui est un choix binaire)
Merci d'avance
A voir également:
- Problème de recherche sur Access VBA
- Recherche automatique des chaînes ne fonctionne pas - Guide
- Fréquence tnt recherche manuelle - Forum Téléviseurs
- Recherche photo - Guide
- Moteur de recherche 1fichier ✓ - Forum Réseaux sociaux
- Probleme recherche chaine tv tcl - Forum TV & Vidéo