Insert into MySql using vb.net

[fresh1207]

I am trying to insert items into MySQL db using parameters but I keep getting this error message:

Failed to convert parameter value from a String to a DateTime.

Here is some sample code:
Dim myConnString AsString = "DRIVER={MySQL ODBC 3.51 Driver};" & _
"SERVER=192.168.1.27;" & _
"DATABASE=testship;" & _
"USER=;" & _
"PASSWORD=;" & _
"OPTION=3;"
Dim MyConnection AsNew Odbc.OdbcConnection(myConnString)
MyConnection.Open()
Dim MyCommand AsNew Odbc.OdbcCommand
MyCommand.Connection = MyConnection

MyCommand.CommandText = "INSERT INTO ls_orderitems (OrderDate, OrderCustomer, OrderAcctNum, OrderType, OrderSoNum, OrderItemPartNum, OrderItemPartDesc, OrderItemQty, OrderItemQtyRec, OrderItemQtyDtRec, OrderItemBO, OrderItemBODt,OrderItemCanceled, OrderItemCanceledDt, OrderItemNotes, OrderItemPONum, OrderItemRetailPrice, OrderItemSalePrice, Status, InsertDate) VALUES (@OrderDate, @OrderCustomer, @OrderAcctNum, @OrderType, @OrderSoNum, @OrderItemPartNum, @OrderItemPartDesc, @OrderItemQty, @OrderItemQtyRec, @OrderItemQtyDtRec, @OrderItemBO, @OrderItemBODt, @OrderItemCanceled, @OrderItemCanceledDt, @OrderItemNotes, @OrderItemPONum, @OrderItemRetailPrice, @OrderItemSalePrice, @Status, @InsertDate)"
MyCommand.Parameters.Add(New Odbc.OdbcParameter("@OrderDate", OdbcType.Date)).Value = OrderDate
MyCommand.Parameters.Add(New Odbc.OdbcParameter("@OrderCustomer", OdbcType.VarChar)).Value = OrderCustomer
MyCommand.Parameters.Add(New Odbc.OdbcParameter("@OrderAcctNum", OdbcType.VarChar)).Value = OrderAcctNum
MyCommand.Parameters.Add(New Odbc.OdbcParameter("@OrderType", OdbcType.VarChar)).Value = OrderType
MyCommand.Parameters.Add(New Odbc.OdbcParameter("@OrderSoNum", OdbcType.Int)).Value = OrderSoNum


Any advice or sample code would help!


Thanks

 

[Morn]

can you post the variables that you are using to store the data

 

[fresh1207]

The data that is being stored are text files.

 

[fresh1207]

Private Sub InsertItems(ByVal OrderDate As String, ByVal OrderCustomer As String, ByVal OrderAcctNum As String, ByVal OrderType As String, ByVal OrderSoNum As String, ByVal OrderItemPartNum As String, ByVal OrderItemPartDesc As String, ByVal OrderItemQty As String, ByVal OrderItemQtyRec As String, ByVal OrderItemQtyDtRec As String, ByVal OrderItemBO As String, ByVal OrderItemBODt As String, ByVal OrderItemCanceled As String, ByVal OrderItemCanceledDt As String, ByVal OrderItemNotes As String, ByVal OrderItemPONum As String, ByVal OrderItemRetailPrice As String, ByVal OrderItemSalePrice As String, ByVal Status As String, ByVal InsertDate As String)

 

[Paszt]

Try stepping through the code. Most probably the error is occuring on the line:

[SIZE=2][SIZE=2]MyCommand.Parameters.Add([/SIZE][SIZE=2][COLOR=#0000ff]New[/COLOR][/SIZE][SIZE=2] Odbc.OdbcParameter([/SIZE][SIZE=2][COLOR=#800000]"@OrderDate"[/COLOR][/SIZE][SIZE=2], OdbcType.Date)).Value = OrderDate[/SIZE][/SIZE]

While stepping through the code execution, look at the value of OrderDate. Does it look like a valid date? Is the variable OrderDate declared as a Date or string?