Visual Basic - Actualizar Recordcount

Life is soft - evento anual de software empresarial
 
Vista:

Actualizar Recordcount

Publicado por Staind (39 intervenciones) el 28/09/2004 20:45:21
Quisiera saber como puedo actualizar el numero de registros contenidos en una tabla de access despues de agregar un nuevo registro.
Por ejemplo, si tengo 17 registros y agrego uno mas, y despues le pido que me diga cuantos registros tengo mediante Msgbox, me sigue mostrando 17, y deberian ser 18.
Utilizo DAO
Muchas gracias de antemano x)
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

RE:Actualizar Recordcount

Publicado por miguel (1042 intervenciones) el 29/09/2004 00:02:32
Necesitas hacer una consulta sobre esa tabla que acabas de agregar un dato, ejemplo:
Dim mibase As Database
Dim miregistro As Recordset
Dim sql As String
Private Sub Form_Load()
Set mibase = OpenDatabase("c:\Mantenimiento\Materiales.mdb")
End Sub
Sub Guardar()
sql = "Insert Into Tabla(Clave,Area,Jefe,Auxiliar) Values(5,'Sistemas','Miguel Angel Otero','N')"
mibase.Execute sql
sql = "Select * From Tabla"
Set miregistro = mibase.OpenRecordset(sql, dbOpenSnapshot)
miregistro.MoveLast
MsgBox "Registros: " & CStr(miregistro.RecordCount), vbInformation
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Actualizar Recordcount

Publicado por HeNrY (90 intervenciones) el 29/09/2004 02:26:39
Lo que podrias hacer es un : REQUERY

rsTABLA.requery
rsTABLA.recordcount

y eso creo que lo solucionaria.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar