Probleme vba access avec ADODB
bonjour,
je dois crée un programme de gestion d absences d eleve.
j ai ma base de donnée élève avec num_e, debut_abs et fin_abs.
j ai une liste déroulante ou l utilisateur choisi le num_e qu il veux consulter puis un bouton valider.
voici le code du bouton valider et je ne vois pas ou est l erreur.
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
| Private Sub btAbs_Click()
Dim vValide As String
Dim maConnexion As ADODB.Connection 'Déclaration de la connex
Set maConnexion = CurrentProject.Connection 'intenciation de la connex
Dim monRs As ADODB.Recordset 'declaration du record set
Set monRs = New ADODB.Recordset 'instenciation du record set
Dim maRequete As String
monRs.Open maRequete, maConnexion
vvar = InputBox("entrer le num_e")
maRequete = "SELECT * FROM Absences where Modifiable90.text=vvar;"
Debug.Print monRs!maRequete
maConnexion.Close
End Sub |
'(Modifiable90 est le nom de la liste deroulante )
merci de m aider
cordialement judas
