Visual Basic - No actualiza datos!!!

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil

No actualiza datos!!!

Publicado por anonymous (171 intervenciones) el 26/02/2013 15:55:29
Ayuda con este código amigos:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
TablaMovimientos
     Rs.MoveFirst
     Do While Not Rs.EOF
        MsgBox "voy a vaciar al grupo de: " & Rs!grupo
        Rs.Edit
        Rs!inschomb = 0
        Rs!inscmuj = 0
        Rs!altashomb = 0
        Rs!altasmuj = 0
        Rs!bajashomb = 0
        Rs!bajasmuj = 0
        Rs!insctotal = 0
        Rs!totalexist = 0
        Rs.MoveNext
        Rs.Update
     Loop
     Rs.Close
'''''' en un modulo:
Public Sub TablaMovimientos()
    direccion = "\\subdireccion\est22\est22.mdb"
    Set BaseDatos = OpenDatabase(direccion)
    Tira = "Select * From movimientos"
    Set Rs = BaseDatos.OpenRecordset(Tira)
End Sub


no pone en ceros ningún campo de la tabla movimientos, ya puse afuera del loop el edit y update, ya los puse juntos y nada, recorre bien cada registro pero al final dice que "Update o CancelUpdate sin Addnew o Edit", no le encuentro ni solución ni explicación, por eso recurro a su ayuda. GRACIAS
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder