Recent content by Gareth Newman

The AuditTrail code is: Option Compare Database Const cDQ As String = """" Public Sub AuditTrail(frm As Form, RecordId As Control) ' Track changes to data ' Identifies the pk field's corresponding control in frm, in order to id record Dim ctl As Control Dim varBefore As Variant Dim varAfter...

Tried that with the same code bar the primary key which is "index" in the subform. >Private Sub Form_BeforeUpdate(Cancel As Integer) >Call AuditTrail(Me, Index) >End Sub When this line executes, I get a run time error 13 "Type mismatch". While the line is highlighted yellow however, if i...

Hi, I am using a module called "AuditTrail" for recording changes made to records. It works fine on primary forms with the code: Private Sub Form_BeforeUpdate(Cancel As Integer) Call AuditTrail(Me, Job_number) End Sub with job_number being the primary key index in the linked table. The form...