Hello! Our system outputs transaction dates in the following format CYYMMDD (C = Century, which is always 1). I would like to convert CYYMMDD to MM/DD/YYYY. How can I do this? Thank you so very much!!
Hello! Our system outputs transaction dates in the following format CYYMMDD (C = Century, which is always 1). I would like to convert CYYMMDD to MM/DD/YYYY. How can I do this? Thank you so very much!!
Code:Public Function FixDate(ByVal pvSysDate) Dim Y, m, d dim vDat Y = Mid(pvSysDate,2,2) m = Mid(pvSysDate, 4, 2) d = Mid(pvSysDate, 6, 2) vDat = m & "/" & d & "/" & y FixDate=format( vDat ,"mm/dd/yyyy") End Function
ranman256, Thank you! Could you tell me where I write that into my database? Sorry for my ignorance. I know enough to get myself stuck all the time.