Conversion en Date

Bonjour,

Comment peut on rendre une chaine de caractre “dd/mm/aaaa hh:mm:ss” reconnaissable en tant que date heure ?

MyDate = “19 octobre 1962” ’ Dfinit la date.
MyShortDate = CDate(MyDate) ’ Convertit en type de donnes Date.
MyTime = “16:35:47” ’ Dfinit l’heure.
MyShortTime = CDate(MyTime) ’ Convertit en type de donnes Date.

CDate n’existe pas en Xojo.

[quote=126004:@jean-paul devulder]C’est la commande Parsedate

voir ici [/quote]

ça marche que pour la date, ma chaine contient “31/08/2014 19:55:25”

[code] Dim theDate as New Date
Dim converted as Boolean

// Attempt to convert the string “12/31/2013” to a date. If
// the conversion succeeds, theDate variable contains the converted date.
//converted = ParseDate(“31/08/2014”, theDate)
Converted = ParseDate(ddate(1),theDate)
If converted then
MsgBox("Converted to: " + theDate.ShortDate)
Else
MsgBox(“Could not convert the string to a date.”)
End If[/code]

Vous pouvez obtenir l’heure en dcomposant (parse) la chane de caractres.

dim d as new date dim s as string = "31/08/2014 19:55:25" d.hour = val(mid(s,len(s)-7,2)) d.Minute = val(mid(s,len(s)-4,2)) d.Second = val(mid(s,len(s)-1,2))

Michel, ma question est rgle, merci a tous.

[code]
dim d As new date
d.SQLDateTime = “2014-08-31 19:55:25”

MsgBox str(d.hour)+":"+str(d.Minute)+":"+str(d.Second)[/code]