Comment afficher le resultat d'un recordSet

Fermé
vbaddict - 14 avril 2010 à 16:52
Bonjour je doit faire un petit programme en vba en utlisant des tables de ma base de donnée Access. Je voudrait savoir comment afficher le resultat d'un RecordSet mais il y a un erreur qui me dit Aucun enregistrement en cour !!!

voila mon code:


Dim base As DAO.Database
Dim espèce As String
Dim resultat As DAO.Recordset
Dim res As String
Set base = CurrentDb()
Set resultat = base.OpenRecordset("SELECT [tab especes complète].[nomVernaculaire] FROM [tab especes complète] WHERE ((([tab especes complète].code)=espèce));")

resultat.MoveFirst
While Not resultat.EOF
         With resultat
                res = !nomVernaculaire
                MsgBox res
         End With
         resultat.MoveNext
  
  Wend

  resultat.Close