Convert String to Date to String back using vb

Question

0.00/5 (No votes)

See more:

Hye all!

Can anyone solve my problem?? I want to convert ID in varchar to Date, then back to string to save in varchar type.

Straight to the point, here is the example:
ID(varchar) - 891217

I want to convert the 89 part to 1989. so if any ID starting with 00, it will convert to 2000.(of course this needs the date to be in Date format, right?)

ID (891217) --> BirthDate = 17/12/1989

17/12/1989 --> I want to convert this back to string to save into database which is in varchar datatype.

Posted 17-Oct-11 18:25pm

snamyna

Add a Solution

2 solutions

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Abhinav S · Answer 1 · 2011-10-17T18:36:00

Solution 1

Have a look at the TryParseExact method[^].

You can provide the exact format as one of the parameters of the function as describer here[^].

Posted 17-Oct-11 18:36pm

Abhinav S

Comments

snamyna 19-Oct-11 21:59pm

Thanks for your response.

raj ch · Answer 2 · 2011-10-17T19:58:00

Function for converting to string from date format

VB

'Convert Date to DateString
    Function DateYYYYMMDD(ByVal pDate As Date) As String

        Dim Date_str As String = Nothing
        'For Year Concatnation
        Date_str = pDate.Year()

        'For Month Concatnation
        If (pDate.Month().ToString().Length > 1) Then
            Date_str = Date_str & pDate.Month()
        Else
            Date_str = Date_str & "0" & pDate.Month()
        End If

        'For Day Concatnation
        If (pDate.Day().ToString().Length > 1) Then
            Date_str = Date_str & pDate.Day()
        Else
            Date_str = Date_str & "0" & pDate.Day()
        End If

        Return Date_str

    End Function

Function for converting from string to date

Function Date_convert(ByVal strDate As String) As Date
     DateTime dt = (DateTime)(TypeDescriptor.GetConverter(new   DateTime(1990,5,6)).ConvertFrom(strDate));
 End Function