Discussion :

[santacrus]

Bonjour a tous,

J'ai un souci de date que je n'arrive pas a résoudre:
lorsque j'écrit:

Code :

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

rst2.FindFirst "[tel_Date]=#" & dtDate & "#"

le code fonctionne bien lorsque la date du jour commence par 1 ou 2, mais pas quand elle commence par 0(ex:01/01/2009)

Je n'arrive pas a avancer

[Kloun]

Tout doit sans doute se trouver dans la FAQ.

Code :

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

rst2.FindFirst "[tel_Date]= #" & format(dtDate, "MM/DD/YYYY") & "#"

[santacrus]

Merci du coup de main Kloun,

mais j'avais deja essayé cette solution et ca ne fonctionne pas non plus.

[Jean-Philippe André]

salut,
de quel type est ta variable dtDate ?
quelle valeur et comment attribues-tu à cette variable ?

[GillesDeVuif]

Bonjour.
dtDate est probablement de type texte, peut-être qu'avec

Code :

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

Cdate(dtDate)

.
Cordialement.

[santacrus]

Effectivement au départ c'est bien une variable texte transformée avec Cdate
Voici le bout de code qui me pose probleme:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
While Not rst.EOF
 
dtDateTemp = CDate(rst("F1"))
dtDateTemp = Format(dtDateTemp, "DD/MM/YYYY")
Debug.Print dtDateTemp
 
 
rst2.FindFirst "[tel_Date]=#" & dtDateTemp & "#"
 
    While Not rst2.NoMatch
 
    MsgBox (rst2("tel_Date") & " " & rst2("tel_NumOp"))
    rst2.FindNext "[tel_Date]=#" & dtDateTemp & "#"
    Wend
 
 
rst.MoveNext
Wend
 
End Function

Je recupere une date dans un recordset et je verifie si elle existe dans le second recordset

[santacrus]

La fonction Format me dérange, je vient de changer:

Code :

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

dtDateTemp = Format(dtDateTemp, "DD/MM/YYYY")

en

Code :

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

dtDateTemp = Format(dtDateTemp, "mm/dd/yyyy")

et debug.print dtDateTemp me donne rigoureusement la meme chose

[Kloun]

dtDateTemp, rst("F1") et rst2("tel_Date") sont de quels types ?

[GillesDeVuif]

Bonjour.

Test : Une table contenant deux colonnes, même valeur (18/05/2009) pour les deux, une au format Date, l'autre au format Texte, puis un openrecordset sur cette table, appel de la date (sans Cdate) en utilisant tantôt une variable String, tantôt une variable Date; résultats :

18/05/2009 - /Var Str /Champ Txt
05/18/2009 - /Var Str /Champ Txt /mmddyyyy
18/05/2009 - /Var Str /Champ Dat
05/18/2009 - /Var Str /Champ Dat /mmddyyyy
18/05/2009 - /Var Dat /Champ Txt
18/05/2009 - /Var Dat /Champ Txt /mmddyyyy
18/05/2009 - /Var Dat /Champ Dat
18/05/2009 - /Var Dat /Champ Dat /mmddyyyy

(où chez toi, Var=dtDateTemp, Champ=F1, mmddyyyy=le formatage) ton formatage pourrait fonctionner avec dtDateTemp as string, et par la suite, ton égalité, à la condition que tu sois sûr du format renvoyé par rst2("Tel_date") qui ne subit, lui, aucun lifting.

Cordialement.

[santacrus]

Bonjour,

dtDateTemp, rst("F1") et rst2("tel_Date") sont de quels types ?

dtDateTemp=date
rst("F1")=string transformée en date
rst("tel_Date")=date

Merci a vous pour votre aide, mais apres avoir bosser la dessus toute la journée d'hier en essayant un million de choses sans résultat, j'ai du me résoudre a utiliser un autre champ pour faire la recherche.
C'est un champ de type string, ca fait un peu bricolage, c'est tiré par les cheuveux, mais ca fonctionne.

Ceci étant, je ne comprend toujours pas pourquoi la première solution ne fonctionne pas, et ca m'enerve au plus haut point.
Mais malheureusement ca dépasse mes (piètres) compétences.
Peut etre que quelqu'un de plus expérimenté pourra trouver une solution.
En attendant je met le tag "résolu" puisque je ne suis plus bloqué.

Merci encore pour votre aide.