Discussion :

[ToTo develop]

Bonjour,

je suis debutant en developpment access/vba, et j'ai de probleme d'affichage du resultat d'une requete dans une fonction vba

je vous montre mon code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
'recupere la date entree pour un collaborateur defini
Function recup_date(num As Integer) As Date
    Dim date_entree As ADODB.Connection
    Dim strSQL As String
    Set date_entree = CurrentProject.Connection
    strSQL = "SELECT Collaborateur.date_entree_AXA as resultat FROM   Collaborateur, DIF WHERE Collaborateur.num_collabo=DIF.num_collabo AND DIF.num_collabo=" & num
    date_entree.Execute strSQL
 End Function

je n'ai aucune erreur de code mais il doit me manquer quelque chose car ca m'affiche une date par default mais pas la date souhaitée

merci de m'aider

[Oliv-]

Salut,
regarde ici un cours sur ADODB
http://vb.developpez.com/bidou/recordset-ado/

tu devrais y trouver ta solution