Resulta que tengo este codigo en un formulario:
Cita: Private Sub Form_Load()
On Error GoTo ErrorEliminar
Do While Not Me.adoProveedores.Recordset.EOF
cboProveedores.AddItem Me.adoProveedores.Recordset.Fields(1).Value
Me.adoProveedores.Recordset.MoveNext
Loop
Me.adoProveedores.Recordset.MoveFirst
Exit Sub
ErrorEliminar:
MsgBox Err.Description, vbOKOnly, "ERROR"
End Sub
Es muy simple, se supone que tiene que leer los nombres de los proveedores de la base de datos, y volcarlos en un combo, hasta que sea final de fichero.
El problema esta en que lo hace, pero cuando vas a mirar la base de datos, los nombres que ha puesto en el combo se borraron de la BD.Alguien me puede decir que pasa?¿no hay nada para que cambie el valor del registro, solo leer y mostrarlo en el combo.A ver si me podeis ayudar.Gracias