Anónimo
Contar aperturas
Que tal experto, espero que bien. Bueno ahora quiero intentar algo que he visto en algunas BD y que quizás sea complejo o tal vez no, pero iré por parte. Primero quiero almacenar en una tabla las veces que se abre un formulario determinado en access ¿có, o lograrlo?
Espero puedas ayudarme.
Espero puedas ayudarme.
1 Respuesta
Respuesta
1
Tenemos una tabla que se llama Contador con un campo numérico que llamaremos NumVeces.
En las propiedades del formulario iremos a la Acción Al Abrir ---> Procedimiento de Evento y pondremos el código:
Private Sub Form_Open(Cancel As Integer)
Dim db As Database
Dim rs As Recordset
Set db = CurrentDb
Set rs = db.OpenRecordset("Contador")
If Not rs.EOF Then
rs.Edit
rs!numVeces = rs!numVeces + 1
rs.Update
Else
rs.AddNew
rs!numVeces = 1
rs.Update
End If
End Sub
En las propiedades del formulario iremos a la Acción Al Abrir ---> Procedimiento de Evento y pondremos el código:
Private Sub Form_Open(Cancel As Integer)
Dim db As Database
Dim rs As Recordset
Set db = CurrentDb
Set rs = db.OpenRecordset("Contador")
If Not rs.EOF Then
rs.Edit
rs!numVeces = rs!numVeces + 1
rs.Update
Else
rs.AddNew
rs!numVeces = 1
rs.Update
End If
End Sub