Insert Date into datagrid

[yzlin04]

Does anyone know how to insert date into vb.net datagrid by using INSERT INTO command?

From the code below, the error message is in cmd.ExecuteNonQuery() line.
Here is the error message:
An unhandled exception of type 'System.Data.OleDb.OleDbException' occurred in system.data.dll



Dim today As Date
today = Date.Today

Dim str As String = "Provider=Microsoft.Jet.Oledb.4.0;Data source=ALK.mdb"
Dim conn As oledbconnection = New oledbconnection(str)

'Open connection
conn.Open()

Dim strCmd As String = "INSERT INTO tableTempTransaction(transaction_Date, item_Name) VALUES('today', '" & txtItemDesc.Text & "')"
Dim cmd As OleDbCommand = New OleDbCommand(strCmd, conn)

'Execute command
cmd.ExecuteNonQuery()

'Close connection
conn.Close()

'DsTempTransaction11.Clear()
OleDbDataAdapter1.Fill(DsTempTransaction11)

[yzlin04]

Does anyone know how to insert date into vb.net datagrid by using INSERT INTO command?

From the code below, the error message is in cmd.ExecuteNonQuery() line.
Here is the error message:
An unhandled exception of type 'System.Data.OleDb.OleDbException' occurred in system.data.dll



Dim today As Date
today = Date.Today

Dim str As String = "Provider=Microsoft.Jet.Oledb.4.0;Data source=ALK.mdb"
Dim conn As oledbconnection = New oledbconnection(str)

'Open connection
conn.Open()

Dim strCmd As String = "INSERT INTO tableTempTransaction(transaction_Date, item_Name) VALUES('today', '" & txtItemDesc.Text & "')"
Dim cmd As OleDbCommand = New OleDbCommand(strCmd, conn)

'Execute command
cmd.ExecuteNonQuery()

'Close connection
conn.Close()

'DsTempTransaction11.Clear()
OleDbDataAdapter1.Fill(DsTempTransaction11)

I can insert the date into the datagrid already. Thanks