formatting date

Thanks Dipal. I ended up reading it into a string first like you suggested as well. And Thank you for pointing out that feeding 2 "0"s before the yr digit would be a problem after 2009! I have made a note tro address that issue in 2009...lol. kidding

cheers

Thanks James, I couldnt follow too well, but this is what I ended up doing

SMPL_DTEstr = SMPL_DTEstr.Chars(1) + SMPL_DTEstr.Chars(2) + "/" + SMPL_DTEstr.Chars(3) + SMPL_DTEstr.Chars(4) + "/" + "200" + SMPL_DTEstr.Chars(0)

Dim intDateFormat As Integer
Dim strDateFormat As String
Dim strYear As String
Dim strMonth As String
Dim strDate As String
Dim strDate1 As String
Dim strDate2 As String
Dim strprefix As String
Dim strfinal As String

intDateFormat = 80517
strDateFormat = CType(intDateFormat)

strYear = strDateFormat.Substring(0, strDateFormat.Length - 4)  'this give you value 8
strMonth = strDateFormat.Substring(1, strDateFormat.Length - 3) 'this give you value 05

strDate = strDateFormat.Substring(1, strDateFormat.Length - 1)  'this give you value 0517
strDate1 = strDate.Substring(1, strDate.Length - 1)             'this give you value 517
strDate2 = strDate1.Substring(1, strDate1.Length - 1)            'this give you value 17

strprefix = "200"

strfinal = strprefix & strYear & "/" & strMonth & "/" & strDate2

Now pass this strFinal value to database,your strfinal will contents 2008/05/17

In other words, the first digit is the year to which I have to add the prefix "200" the next 2 digits are the month and last 2, the day.

Thanks!