What error message do you get?
Does this work in your code:
Dim oConn As OleDbConnection
Dim oCmd As OleDbCommand
Dim strSQL As String
Dim myDate As Date
myDate = CDate("4.10.2008") ' Use your locale date format, like "10/4/2008"
strSQL = "INSERT INTO <mytable> (<my date field>) VALUES ('" & myDate & "')"
oConn = New OleDbConnection("<your connectionstring")
oConn.Open()
oCmd = New OleDbCommand(strSQL, oConn)
oCmd.ExecuteNonQuery()
Reputation Points: 218
Solved Threads: 201
Veteran Poster
Offline 1,024 posts
since Aug 2008
Unsolved 
