Visual Basic.NET - Ayuda Update

Saludos hermanos tengo un error con un update

"An unhandled exception of type 'System.Data.OleDb.OleDbException' occurred in system.data.dll"

lo raro es que este codigo lo estoy manejando en otra aplicacion y no envia ningun error.

DS.Clear()
STRCONN = "PROVIDER=MICROSOFT.JET.OLEDB.4.0; PASSWORD=; USER ID=ADMIN; DATA SOURCE=D:\Transporte\BD_APA.MDB;"
CN.ConnectionString = STRCONN
CN.Open()
DA.SelectCommand = MICOMMAND
DA.Fill(DS, "USUARIOS")
Dim CB As New OleDbCommandBuilder(DA)
Dim DT As DataTable = DS.Tables("USUARIOS")
DR = DT.NewRow()
DR.Item("NOMBRE") = TextBox1.Text
DR.Item("PASSWORD") = TextBox2.Text
DR.Item("STATUS") = Label3.Text
DT.Rows.Add(DR)
DA.Update(DS, "USUARIOS")
CB.RefreshSchema()
CN.Close()

espero me puedan ayudar por que ya estube buscandole y no puedo encontrar en donde esta la falla.


saludos.

Aparentemente te falta el Imports System.Data
Si no es asi, vuelve a instalar el controlador.