Have Access Database and "TimeStamp" field defined as Date/Time Data Type.
In my VB.Net Code I get error on ExecuteNonQuery saying that "Syntax error in INSERT INTO statement."
If I remove the code relating to TimeStamp program runs without error.
I have read that there's some problem with Access Database and OleDbType.Date but can't figure out whats wrong. Need to store Date and Time in Database as 03/16/2010 12:00:00 AM
Any Suggestions??
Lee
StrSql = "Insert into Equipment ( TimeStamp, Ident, Descr, Serial, Cost)" & _
" Values (@TimeStamp, @Ident, @Descr, @Serial, @Cost)"
oCmd = New OleDbCommand(StrSql, oConn)
oCmd.Parameters.Add(New OleDbParameter("@TimeStamp", OleDbType.Date))
oCmd.Parameters.Add(New OleDbParameter("@Ident", OleDbType.VarChar, 12))
oCmd.Parameters.Add(New OleDbParameter("@Descr", OleDbType.VarChar, 40))
oCmd.Parameters.Add(New OleDbParameter("@Serial", OleDbType.VarChar, 20))
oCmd.Parameters.Add(New OleDbParameter("@Cost", OleDbType.Double))
oCmd.Parameters("@TimeStamp").Value = Now
oCmd.Parameters("@Ident").Value = txtIdent.Text
oCmd.Parameters("@Descr").Value = txtDescr.Text
oCmd.Parameters("@Serial").Value = txtSerial.Text
oCmd.Parameters("@Cost").Value = txtCost.Text
oCmd.ExecuteNonQuery()
In my VB.Net Code I get error on ExecuteNonQuery saying that "Syntax error in INSERT INTO statement."
If I remove the code relating to TimeStamp program runs without error.
I have read that there's some problem with Access Database and OleDbType.Date but can't figure out whats wrong. Need to store Date and Time in Database as 03/16/2010 12:00:00 AM
Any Suggestions??
Lee
StrSql = "Insert into Equipment ( TimeStamp, Ident, Descr, Serial, Cost)" & _
" Values (@TimeStamp, @Ident, @Descr, @Serial, @Cost)"
oCmd = New OleDbCommand(StrSql, oConn)
oCmd.Parameters.Add(New OleDbParameter("@TimeStamp", OleDbType.Date))
oCmd.Parameters.Add(New OleDbParameter("@Ident", OleDbType.VarChar, 12))
oCmd.Parameters.Add(New OleDbParameter("@Descr", OleDbType.VarChar, 40))
oCmd.Parameters.Add(New OleDbParameter("@Serial", OleDbType.VarChar, 20))
oCmd.Parameters.Add(New OleDbParameter("@Cost", OleDbType.Double))
oCmd.Parameters("@TimeStamp").Value = Now
oCmd.Parameters("@Ident").Value = txtIdent.Text
oCmd.Parameters("@Descr").Value = txtDescr.Text
oCmd.Parameters("@Serial").Value = txtSerial.Text
oCmd.Parameters("@Cost").Value = txtCost.Text
oCmd.ExecuteNonQuery()