Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 370
  • Last Modified:

ISO8601 date conversion functions needed.

Hello.
I have urgent tasks and have no time for subj.
Will grant points for VB code (or link) converting dates from ISO8601 format (YYYYMMDD-HH:MM:SS) to Date. CDate function usage prohibited.
Sincerely,
Crin
0
Crin
Asked:
Crin
  • 3
1 Solution
 
Anthony PerkinsCommented:
Format$(now,"yyyymmdd-hh:nn:ss")

By the way ISO8601 requires a T between the date and time.

Anthony

0
 
Anthony PerkinsCommented:
Actually the correct format is as follows:
YYYY-MM-DDTHH:MM:SS

Here is the link to the official site
http://www.w3.org/TR/NOTE-datetime

In any case, it is pretty easy to change your code:

Format$(now,"yyyy-mm-ddThh:nn:ss")
0
 
Guy Hengel [angelIII / a3]Billing EngineerCommented:
I think you need the dateserial function, somewhat like this:

dim yourdate as Date
dim strInput as string

strInput = "20010502-19:48:10"

yourdate = DateSerial ( left(strInput,4), mid(strInput, 5,2), mid(strInput, 7,2)) + TimeSerial ( mid(strInput,10,2),mid(strInput,13,2),mid(strInput,16,2))

Cheers
0
 
Anthony PerkinsCommented:
angelIII is right I misread the question.

Anthony
0
 
CrinAuthor Commented:
Thanks, 'DateSerial' name of the function would be enough...

Hehe... Looks so interesting, after 14 yrs of programming I was stalled with simpliest task! I defenitely need vacation! :))

Thanks a lot!

PS. (For those who might read it in the future) By the way, ISO8601 format in fact specify letter 'T' between date and time, I replaced it with minus sign to simplify the string appearance. However, answer provided is absolutely right.
0

Featured Post

What does it mean to be "Always On"?

Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.

  • 3
Tackle projects and never again get stuck behind a technical roadblock.
Join Now