Format Date problemes

Question

Bonjour a tous,

J'ai un petit problemes avec isDate function.

Je suis hongroise alors mon windows xp est aussi. Ches nous le format date est le yyyy.MM.dd

Dans mon developement je veux utiliser le format dd.MM.yyyy

Example. Si dans une textbox je ecrire 2007.02.26. epuis je convert ce string a date mais utilisent le format que je veux ca marche mais si je utilise function 

dim tmpDateFrom as string = "2007.02.27"
dim tmpDateTo as date = cdate(format(tmpDateFrom,"dd.MM.yyyy"))

isdate(cdate(tmpDateFrom))   is return True

isdate(tmpDateTo) is retur False et je ne sais pas porquoie ??

Quelqu'un peux m'aider?

jrivet · Answer

Salut,
Je ne connait pas toute les subtilité de .NET (meme pas du tout)

Mais en ravanche en VB6 j'essaierai ceci (alors peu etre que cela fonctoinne en .NEt)

Dim tmpDateFrom As String
Dim tmpDateTo As Date
tmpDateFrom = "2007/02/27"
tmpDateTo = CDate(Format(tmpDateFrom, "dd/MM/yyyy"))
MsgBox IsDate(CDate(tmpDateFrom)) & " " & IsDate(tmpDateTo), ----
[code.aspx?ID=41455 By Renfield]

@+: Ju£i?n
Pensez: Réponse acceptée

r_gabor · Answer

Justement, le probleme si le string que je vais convertir a date est different format que dans le system actuelle, isdate renvoie FALSE, pourtant c'est une date aussi mais format anglais au francais.

isdate renvoie true seulement si le format date est le meme que dans le system.

cs_Exploreur · Answer

Salut,

 Et ceci, par rapport à ton TextBox :

Private Sub Command1_Click()
If Text1.text = StrConv(Format(Now, "mm.dd.yyyy"), vbProperCase) Then
Else
Text1.text = StrConv(Format(Now, "dd.mm.yyyy"), vbProperCase)
End If
End Sub

A+
Exploeur

r_gabor · Answer

Salut,

Pour cette example que tu ma proposer:

Dim tmpDateFrom As String
Dim tmpDateTo As Date
tmpDateFrom = "2007/02/27"

Cette ligne me donne le erreur message suivante:
Conversion from string "dd/MM/yyyy" to type 'Date' is not valid
tmpDateTo = CDate(Format(tmpDateFrom, "dd/MM/yyyy"))

MsgBox IsDate(CDate(tmpDateFrom)) & " " & IsDate(tmpDateTo)

r_gabor · Answer

Le deuxieme example me donne le meme resultat.

Si je bien compris, VB ne peux pas convertir un string a format date si le format string est different que celle de system.

Peutetre il faut que definir mon propre format setting? Et si, c'est comment? Le question c'est comment on peux utiliser les date sur une format bien definie, que sur tout les type de format vas accepter?

Format Date problemes

5 réponses

Votre réponse

Discussions similaires