bonjour,
je suis en train d' essayer de suivre les instructions d'un tutorial:
http://loufab.developpez.com/recursivite/
Or il me semble qu il ya un pb dans une partie de code:
je ne vois pas a koi correspondent les variable cbo_Resultat.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16 Dim strTable As String, strField As String, strCriteria As String, strSql As String Dim Criter As Variant strTable = Me.cbo_Table ' recupère le nom de la table strField = Me.cbo_Champ ' recupère le nom du champ If IsNull(strTable) Or IsNull(strField) Then ' l'une des listes est vide MsgBox "Vous devez sélectionner une table et un champ.", vbExclamation + vbOKOnly, "une erreur" Exit Sub End If ' compose le critere de recherche strCriteria = strTable & "." & strField & " Like """ & Me.txt_Critere & """" ' construit la requête sql strSql = "SELECT DISTINCTROW " & strTable & ".*" strSql = strSql & " FROM " & strTable strSql = strSql & " WHERE ((" & strCriteria & "));" Me.cbo_Resultat.RowSource = strSql ' affecte sql a lst_result Me.cbo_Resultat.Requery ' recalcule la liste
Est ce que qq peut me dire ou est ce que l on retrouve ces variable dans le formulaire?
merci d'avance
Partager