Bonjour :

Je compare une data de ma base access à celle dans vb.
Cela marche avec le supérieur et inferieur, mais pas avec l'égalité.

Je pense que cela est due à l'heure et les min, mais pourtant j'ai formater les dates pour que le soft n'en prenne pas compte.

Voici mon code :

Data2.RecordSource = "Select audit.date_audit from audit where format(audit.date_audit,'dd - mm - yyyy') = #" & Format(DTPicker1.Value, "dd - mm - yyyy ") & "# ;" Data2.Refresh

Si quelqu'un peu me dire ou est l'erreur

Excuses mon ignorance, mais a quoi servent les # ??

sinon, il te suffit de vérifier les chaines renvoyées par ton Format(date_audit) et par le Format ( DTPicker) et de les comparer...

C'est mortel pour les performances ton procede. Une date est stockee en 64 bits flottant (double), fais une comparaison numerique.
>= jour AND < JrPlusUn

ciao...
BruNews, Admin CS, MVP Visual C++

Merci pour les réponses.

Renfield, je voudrai bien verifier la chaine renvoyé par le Format (date_audit) mais je ne sais pas comment faire :

J'ai essayé ceci mais ca ne marche pas :

Data2.RecordSource = "Select format(audit.date_audit,'dd - mm - yyyy') from audit" data2.refresh var_temp = Data2.RecordSource.Fields("date_audit")

Mais il dit que le champ date audit n'existe pas.
Sais tu comment faire ?

( pour les # je croi qu'il faut entourer les champs date avec ceci pour les requete access )

BruNews, merci de ta suggestion, mais cela donne le même problème, il va aussi sur le jour suivant ( a cause de heure min je pense ). Ma requette donne ceci :

Data2.RecordSource = "Select audit.date_audit, sujet_audit from audit where format(audit.date_audit,'dd - mm - yyyy') > #" & Format(DTPicker1.Value - 1, "dd - mm - yyyy ") & "# and format(audit.date_audit,'dd - mm - yyyy') < #" & Format(DTPicker1.Value + 1, "dd - mm - yyyy ") & "# ;"

Merci

J'abonde dans le sens de BruNews sur les cycles que cela doit prendre....


C'est normal qu'il te dise ne pas connaitre le champs audit....
car il n'existe pas !!! Il te faut nommer le champ créé


Data2.RecordSource = "Select format(audit.date_audit,'dd - mm - yyyy') as date_audit from audit"
data2.refresh

Je ne comprend pas pourquoi cela doit prendre beaucoup de cycle ( mais bon, ce n'est pas grave, la requete n'est executé qu'une seule foi )

J'ai regardé ce que cela sort des deux cotés, cela sort exactement la même chose, mais quand il les compares, il dit que c'est différents.
Merci si vous avez la réponse

je trouve étrange tes comparaisons....

pourquoi ne formattes tu pas tes données sous la forme 'YYYYMMDDNNSS'


bref, on est pas plus avancés ;)

Bon, j'ai trouvé à force de bidouillage.

Vu que vous critiquié déja les cyles que ca prennait, la ca va etre pire :o) mais bon, ca marche

ma solution :

Data2.RecordSource = "Select audit.date_audit,sujet_audit from audit where format(audit.date_audit,'dd-mm-yyyy') = format(cdate('" & DTPicker1.Value & "'),'dd-mm-yyyy')"

Merci encore

En fait non, cela marche pour le = , mais pas pour les > ou <.

Pour lui le 25/05/04 est superieur au 02/06/04.

Je vais chercher une autre solution.

Merci qd mm.

normal !! tu compre des chaines de caractère avec des >

y'a pas un problème, là ??

tu constateras que 20040525 < 20040604