
No actualiza datos!!!
Publicado por anonymous (171 intervenciones) el 26/02/2013 15:55:29
Ayuda con este código amigos:
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
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


0