...rendre possible la recherche à partir de deux champs dans plusueurs table...
Hm ! Pas très clair tout ça. En fait je fait une base de donnée de suivi de matos info. J'aimerai que l'utilisateur puisse faire une recherche sur n'importe quel champ de n'importe qu'elle base. Pour Cela, j'ai fait :
- une zone de liste Modifiable qui réunit le type de pc ou de périph (scanner, Station, Portable etc...)
- une autre zone de liste qui avec la propriété .rowsourcetype = "liste de champs" doit me dresser la liste des champs d'une table préciser dans Rowsource. Ainsi, la personne sélection sa table, puis son champs sans rien saisir. Et cette 2eme zone de liste se modifie selon la valeur de la première.
Si à la première on choisit "Scanner" la deuxième devrait permettre de sélectionner les champs de la table scanner et idem pour les autres. J'ai déjà fait ce type de recherche sur deux zone de liste modifiable+ une EditBox pour saisir le critères, donc je sais que c'est possible. Toutefois la deuxième ne veut pas prendre la valeur des champ de la table spécifié.
Je vous donne le code VB :
Private Sub resmod_Change() 'resmod c'est la 1 Zone deL modif
Dim etatres As Boolean
etatres = True
canvaresOnOff (etatres)
Select Case resmod.Value
Case "Scanner"
Forms!Utilisateur!champmod.RowSourceType = "Liste champs"
Forms!Utilisateur!champmod.RowSource = "Scanner"
Case "Imprimante"
Forms!Utilisateur!champmod.RowSourceType = "Liste champs"
Forms!Utilisateur!champmod.RowSource = "Imprimantes"
Case "Station"
Forms!Utilisateur!champmod.RowSourceType = "Liste champs"
Forms!Utilisateur!champmod.RowSource = "ConfigurationStation"
Case "Portable"
Forms!Utilisateur!champmod.RowSourceType = "Liste champs"
Forms!Utilisateur!champmod.RowSource = "ConfigurationPortable"
Case "Ecran"
Forms!Utilisateur!champmod.RowSourceType = "Liste champs"
Forms!Utilisateur!champmod.RowSource = "Ecran"
Case "Palm"
Forms!Utilisateur!champmod.RowSourceType = "Liste champs"
Forms!Utilisateur!champmod.RowSource = "PALM"
Case "Graveur"
Forms!Utilisateur!champmod.RowSourceType = "Liste champs"
Forms!Utilisateur!champmod.RowSource = "Graveur"
Case "Utilisateur"
Forms!Utilisateur!champmod.RowSourceType = "Liste champs"
Forms!Utilisateur!champmod.RowSource = "Utilisateur"
End Select
End Sub
Enfait dès que la valeur de la première change il doit remplir en conséquence le contenu rowsource de la deuxième.
Sauriez vous pourquoi ça marche pas ???