Yo tengo puesto esto pero no hace nada, aver si tu sabes el porque:
Código vb:
Ver originalSet cnPrueba = New ADODB.Connection
cnPrueba.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\prueba.mdb;Persist Security Info=False"
cnPrueba.Open
cnPrueba.Execute "update tbl_direccion set Nombre = Nombre, Apellidos = Apellidos, Ciudad = Ciudad, Provincia = Provincia, Telefono = Telefono, CP = CP WHERE id = " & MSFlexGrid1.TextMatrix(MSFlexGrid1.Row, 0)
cnPrueba.Close
Set cnPrueba = Nothing
'Se actualiza el registro del msflexgrid
MSFlexGrid1.Refresh