Gracias por tu respuesta Luciano, lo he probado pero por desgracia me hace una cosa muy extraña, me blanquea al completo el formulario, introduciéndome en la BD un registro nuevo totalmente en blanco.
Por suerte he encontrado la forma de hacerlo mediante un ADO y con el si me funciona a las mil maravillas.
Ahora el problema me ha surgido en otra conexión distinta, y es un problema bastante mas extraño para mi.
Tengo creado otro formulario, que se encargara de hacer una búsqueda en la BD mediante una conexión ADO, esta búsqueda puede ser por nombre, matricula o fecha, y debería mostrar todos los resultados en una lista ordenados por fecha.
hasta ahora he escrito el siguiente código:
Código:
Private Sub cmBusc_Click()
If bucom.ListIndex = 2 Then
tip = "Nombre"
Else
If bucom.ListIndex = 0 Then
tip = "fecha"
Else
If bucom.ListIndex = 1 Then
tip = "Matricula"
End If
End If
End If
Adoreparaciones.RecordSource = "Select * from reparaciones where " & tip & " = " & txtbusqueda.Text
Adoreparaciones.Refresh
With Adoreparaciones.Recordset
'si no encontro, lanza el mensaje
If .RecordCount = 0 Then
MsgBox "No se encuentran resultados para esta busqueda.", vbInformation, "informacion"
Exit Sub
Else
'Si encontro, muestra la fecha en una lista
listresul.Text = listresul.Text & !fecha
End If
End With
End Sub
El problema es que me da el siguiente error:"no se han especificado valores para alguno de los parámetros requeridos"
Error en el método "refresh" del objeto "IAdodc"
no tengo ni idea de como solucionarlo, y si quito el refresh me salta con que la variable de tipo object o la variable del bloque with no esta establecida.
Agradezco tu ayuda y cualquiera que pueda sacarme de este embrollo Xd
mil gracias