Dim CommandEinfuegen As String = "select * from t_Dateien where id = '" & id & _
  "'"
 
            Dim conString As String = "Provider=Microsoft.Jet.OLEDB.4.0; Data" & _
              "Source=" & mdbDatei & "testdb.mdb"
            Dim connection As OleDb.OleDbConnection = _
                New OleDb.OleDbConnection(conString)
            Dim command As OleDb.OleDbCommand = _
                New OleDb.OleDbCommand(CommandEinfuegen, connection)
            command.Connection.Open()
            command.ExecuteNonQuery()
            command.Connection.Close()

Ich nutze Visual Basic 2005 Express Edition auf W2KP und XP