TheDate = Cursor.GetString("DatePlayed") '28 Aug 2013
DateTime.DateFormat= "dd MMM yyyy"
Dim t As Long = DateTime.DateParse(TheDate)
DateTime.DateFormat = "yyyy-MM-dd"
TheNewDate= DateTime.Date(t) 'will allow you to store the date as 2013-08-28 in the new SQLDatePlayed