Buenos días emmax, las conexiones las realizo desde una clase, cuando hago una consulta ya sea un insert o un select siempre pongo la conección antes, algo así.
Cita: BD.Rellena("SELECT MAX(Id) FROM coleccion", "IDF")
Pero si lo hago aquí.
Cita: BD.Cm = New OleDbCommand("SELECT * FROM coleccion WHERE Id = '" & TbIDBusca.Text & "'")
Me tira lo siguiente.
Lo he puesto de mil maneras, me tiene la cabeza loca ya :S
Gracias por tu respuesta.
EDITO
En la clase tengo lo siguiente
Cita: 'Carga ComboBox y TextBox
Public Sub CargaCbTb(ByVal b As ComboBox, ByVal t As TextBox, ByVal a As String)
ClassConecta.Conecta()
Cm = New OleDbCommand(a, ClassConecta.Cs)
Dr = Cm.ExecuteReader
While Dr.Read
b.Items.Add(Dr.GetValue(0))
t.Text = CStr((Dr.GetValue(1)))
End While
Cm.Dispose()
Dr.Close()
ClassConecta.Desconecta()
End Sub
Debería llamarlo así, "creo"
Cita: BD.CargaCbTb("SELECT * FROM coleccion WHERE Id = '" & TbIDBusca.Text & "'")
Pero me da otros errores.
Un saludo