Erreur de code VBA, SQL et DateRésolu

Question

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

BruNews · Accepted Answer

sql = sql & " and ACTION.Act_Date_Deb = " & CLng(Me!tDateDeb)

ciao...
BruNews, MVP VC++

cs_tenthor · Answer

Merci, merci beaucoup !!! :-)

Erreur de code VBA, SQL et Date

2 réponses

Discussions similaires