comparaison de dateRésolu

Question

j'ai un petit probleme que j'arrive pas a gerer...
voila mon code:

If "#" & Month(lRecordsetTemp(lRecordsetMaxRelation("TableClasse1") & ".dtmaj")) & "/" & Day(lRecordsetTemp(lRecordsetMaxRelation("TableClasse1") & ".dtmaj")) & "/" & Year(lRecordsetTemp(lRecordsetMaxRelation("TableClasse1") & ".dtmaj")) & "#" > "#" & Month(mdDateMiseAJour) & "/" & Day(mdDateMiseAJour) & "/" & Year(mdDateMiseAJour) & "#" Then




 



ce test compare deux date, une prise de la base de donnée (le champ "dtmaj") et l'autre une date inseré dans "mdDateMiseAJour", 
quand j'arrive a 31/12/2000>01/01/2007 il renvoi vrai(le test reussi).....

PCPT · Accepted Answer

salut,

normalement ->

If CDate(Format(lRecordsetTemp(lRecordsetMaxRelation("TableClasse1") & ".dtmaj"), "MM/DD/YYYY")) > CDate(Format(mdDateMiseAJour, "MM/DD/YYYY")) Then

++
<hr size="2" width="100%" />Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp

PCPT · Answer

salut,
le "#" c'est pour les requêtes SQL, pas pour une condition booléenne attendue

++
<hr size="2" width="100%" />Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp

moudz84 · Answer

comment je les transforme en date alor? j'enleve juste les #????

PCPT · Answer

t'as essayé?!
nous dire à quoi correspont lRecordsetTemp(lRecordsetMaxRelation("TableClasse1") & ".dtmaj"), çà pourrait aider...

et bonjour merci? faut pas de forcer surtout, nos réponses sont un dû n'est-ce pas?

moudz84 · Answer

excuse moi pour le bonjour et le merci mais vu que j'ai poster plusieurs sujets de suite pour moi c'est comme si je continuais le meme... 

alors bonjour,
le lRecordsetTemp(lRecordsetMaxRelation("TableClasse1") & ".dtmaj") correspond a une date recuperé d'une table de la base de données, j'ai essayer de ne pas mettre les # et ça na pas marché, est ce qu'il y aurait une fonction de comparaison de date ou une fonction qui transforme une chaine de caractaire en date??
merci d'avance

PCPT · Answer

re,
même si tu vas réussir en utilisant CDate(expression), j'suis curieux de savoir les type et les contenus de lRecordsetMaxRelation("TableClasse1"), de lRecordsetTemp(lRecordsetMaxRelation("TableClasse1") & ".dtmaj") et de mdDateMiseAJour (on devine mais pour être certain.....).

en gros je ne vois pas pourquoi tu passes par tous ces Month Day Year
voir Format pour changer DD MM
++
<hr size="2" width="100%" />Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp

moudz84 · Answer

en fait le lRecordsetMaxRelation("TableClasse1") me renvoi le nom d'une table dison "maTable"

et le lRecordsetTemp("maTable.dtmaj") me renvoi un champ date dans maTable

mdDateMiseAJour est un type Date que j'ai crée et que l'utilisateur rempli manuellement, voila comment je la rempli:
mdDateMiseAJour = "12/31/" & Year(Date) - 4

et finalement je doit comparer ces dates, est ce qu'il y a une façon meilleur que celle ci pour la faire (transformer en date tout les MM YY DD)??

PCPT · Answer

lRecordsetTemp("maTable.dtmaj") te renvoie une date MMYYDD sans slash c'est çà ?
et mdDateMiseAJour une chaîne MM/DD/YYYY ?

moudz84 · Answer

"mdDateMiseAJour" est de type Date mais elle est remplie comme ca:


Dim mdDateMiseAJour As Date
mdDateMiseAJour = "12/31/" & Year(Date) - 4




quand je fais:


MsgBox(lRecordsetTemp("maTable.dtmaj"))




je reçoi:
01/01/2007       JJMMAAAA avec slash

moudz84 · Answer

thank you, tu m'as encore une fois sorti d'un grand mer--er...

PCPT · Answer

ok 

et je te le REDIS : pour tes prochaines questions, dis toi bien qu'on est pas devant ton écran.
donc explications détaillées avec TOUTES les réponses qu'on pourrait se poser pour te répondre.
ainsi tout le monde y gagnera du temps (c'est précieux!!)

bonne journée
<hr size="2" width="100%" />Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp

Comparaison de date

11 réponses

Votre réponse