Erreur de code VBA, SQL et Date [Résolu]

Messages postés
55
Date d'inscription
dimanche 13 novembre 2005
Statut
Membre
Dernière intervention
29 juin 2007
- - Dernière réponse : cs_tenthor
Messages postés
55
Date d'inscription
dimanche 13 novembre 2005
Statut
Membre
Dernière intervention
29 juin 2007
- 9 mai 2006 à 09:49
Bonjour,

voici un bou de code que j'ai en vba sous access :
(c'est un formulaire de recherche où l'on saisie un critère ou plusieur. Une requete se construit alors en fonction des critère selectionné.)

Dim sql As String

sql = "select * from ACTION"

sql sql & " and ACTION.Act_Date_Deb " & Format(Me!tDateDeb, "dd/mm/yyyy")

Set db = CurrentDb
Set rst = db.OpenRecordset(sql)

While Not rst.EOF
MsgBox rst("Act_Num_Action")
rst.MoveNext
Wend

rst.Close
Set rst = Nothing
Set db = Nothing

Le problème c'est que je n'ai aucun enregistrement de retourné, pourtant je suis sur qu'il y en a un dans ma base.
Le champ Act_Date_Deb est de type date/heure avec pour format date abrégée (jj/mm/aaaa)
J'ai fait des rechercher avec d'autre critère tout fonctionne bien, il n'y a que mes deux critère sur une date qui ne fonctionne pas.

Après réflexion j'ai essayé ceci :
ql sql & " and ACTION.Act_Date_Deb '" & Format(Me!tDateDeb, "dd/mm/yyyy") & "'"

c'est pas mieux, meme pire ! J'ai un message d'erreur : "Type de données incompatible dans l'expression du critère."

Je comprend pas, alors je lance un appelle à l'aide.
Merci
Afficher la suite 

2 réponses

Meilleure réponse
Messages postés
21042
Date d'inscription
jeudi 23 janvier 2003
Statut
Modérateur
Dernière intervention
21 août 2019
13
3
Merci
sql = sql & " and ACTION.Act_Date_Deb = " & CLng(Me!tDateDeb)

ciao...
BruNews, MVP VC++

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 214 internautes nous ont dit merci ce mois-ci

Messages postés
55
Date d'inscription
dimanche 13 novembre 2005
Statut
Membre
Dernière intervention
29 juin 2007
0
Merci
Merci, merci beaucoup !!! :-)