Getting error: Conversion from string "" to type 'Date' is not valid

Question

If anyone can rewrite this for me I'd really appreciate it. I'm trying to change stored date if null. I've tried Me.vipEndDate ="0000-00-00" and much more.

            If DR("vipEndDate") Is Nothing Then
              Me.vipEndDate = "0"
            Else
              Me.vipEndDate = DR("vipEndDate").ToString
            End If

I've set it up in database as DATE not DATETIME.

Eggybread
– Eggybread

2015-08-06 00:27:06 +00:00
Commented Aug 6, 2015 at 0:27 — Eggybread
– Eggybread, Commented Aug 6, 2015 at 0:27

OneFineDay · Accepted Answer · 2015-08-06 00:48:21Z

1

Well you could add some error protection. The TryParse attempts to convert a string to a date, if it does not convert it returns false so you code will not execute with an error.

Dim dt As Date
If Date.TryParse(DR("vipEndDate").ToString, dt) Then
  'this part only executes if string convert
  Me.vipEndDate = dt
End If

edited Aug 6, 2015 at 0:48

answered Aug 6, 2015 at 0:32

OneFineDay

9,0344 gold badges28 silver badges37 bronze badges

Sign up to request clarification or add additional context in comments.

2 Comments

Eggybread Over a year ago

Wow, that didn't throw any errors. Thanks. Not sure completely what it's doing, can you please explain ? Thanks again,

Eggybread Over a year ago

I like it ! Just starting out and doing well but this caught me out. Won't forget it. Thank you. You have no idea how much you've helped me out this end. :-)

Collectives™ on Stack Overflow

Getting error: Conversion from string "" to type 'Date' is not valid

1 Answer 1

2 Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

2 Comments

Your Answer

Sign up or log in

Post as a guest

Related