Hello,
I get the following error "Conversion failed when converting date and/or time from character string." when I run the code below:
The funny thing is that this code works on my pc at work.
Same country settings and same sql server settings.
What am I doing wrong???
Thanks in advance!!!
I get the following error "Conversion failed when converting date and/or time from character string." when I run the code below:
Code:
Private Sub SaveGegevens()
Dim sql As String = String.Format("UPDATE XX_OHC_KAMER_PLANNING " & _
"SET Medewerker_ID = @Medewerker_ID,Kamer_ID = @Kamer_ID,Relatie_ID = @Relatie_ID ,Datum = @Datum,BeginTijd = @BeginTijd," & _
"EindTijd = @EindTijd,Onderwerp = @Onderwerp,Opmerkingen = @Opmerkingen " & _
"WHERE Planning_ID = {0}", Geselecteerde_ID)
Using connection As New SqlConnection(_ConnectionstringSQL),
cmdUpdate As New SqlCommand(sql, connection)
cmdUpdate.Parameters.AddWithValue("@Medewerker_ID", CInt(Me.cboMedewerker.SelectedValue))
cmdUpdate.Parameters.AddWithValue("@Kamer_ID", CInt(Me.cboKamer.SelectedValue))
cmdUpdate.Parameters.AddWithValue("@Relatie_ID", CInt(Me.cboRelatie.SelectedValue))
cmdUpdate.Parameters.AddWithValue("@Datum", CStr(Me.txtDatum.Text)) 'This is a date entered in format dd-MM-YYYY
cmdUpdate.Parameters.AddWithValue("@BeginTijd", CStr(Me.txtBeginTijd.Text)) 'this is time entered in format HH:MM
cmdUpdate.Parameters.AddWithValue("@EindTijd", CStr(Me.txtEindTijd.Text)) 'this is time entered in format HH:MM
cmdUpdate.Parameters.AddWithValue("@Onderwerp", CStr(Me.txtOnderwerp.Text))
cmdUpdate.Parameters.AddWithValue("@Opmerkingen", CStr(Me.txtOpmerkingen.Text))
connection.Open()
cmdUpdate.ExecuteNonQuery()
cmdUpdate.Dispose()
connection.Close()
End Using
End SubSame country settings and same sql server settings.
What am I doing wrong???
Thanks in advance!!!