Base de Datos en Access 2003

[Taribo007]

Eficaces son las dos, la diferencia es si quieres tener un historico o quieres que se inicie cada vez que abres la bd.

Optemos por la segunda opcion.
Supongo que cada registro de persona, tendra un identificador. Llamemosle Idpersona.

Crea una tabla nueva con dos campos: IdPersona, NumVisitas. Llamemos a la tabla TblContadorVisitas.

El fomrulario, tiene un evento llamado al activar registro (current), pues en ese evento, has de poner algo asi, para que se incremente en 1 cada vez que se active (se visite) ese registro.

Private Sub Form_Current()
Dim rstContador As DAO.Recordset

If Not Me.NewRecord Then 'no se trata d eun nuevo regitro
Set rstContador = CurrentDb.OpenRecordset("SELECT IdPersona,NumVisitas from TblContadorVisitas WHERE IdPersona=" & Me.Id_empleado)

If rstContador.RecordCount = 0 Then 'No esta introducido el regitro: Añadimos
rstContador.AddNew
rstContador("IdPersona") = Me.Id_empleado
rstContador("NumVisitas") = 1
rstContador.Update
Me.NumVisitas = 1
Else ''YA esta introducido el regitro: editamos
rstContador.Edit
rstContador("NumVisitas") = Nz(rstContador("NumVisitas"), 0) + 1
rstContador.Update
Me.NumVisitas = rstContador("NumVisitas")
End If

rstContador.Close
Set rstContador = Nothing
Else
Me.NumVisitas = 0
End If

End Sub

NumVisitas es un cuadro de texto, independiente, para mostrar el nuemro de visitas.
Tienes que activar la referencia Microsoft Dao x.xx object library

Vete probando, tendras errores, adaptalo a los nombres de tus campos y tablas.

Un saludo