Hi
It would be easier to stick it in a table
I will assume you have teh userLogin Id and PC Id extracted into globals gUser and gPC
Private Sub cmdappend_Click()
On Error GoTo Err_cmdappend_Click
(I have a few things here obviously, but didnt want to copy the entire cod)
Exit_cmdappend_Click:
Exit Sub
Err_cmdappend_Click:
MsgBox Err.Description, vbCritical, ("ARCHIVE UNSUCCESSFUL, CONTACT YOUR SYSTEMS ADMINSTRATOR"

Resume Exit_cmdappend_Click
strSQL = "INSERT INTO tblErrors (lngErr, ErrDesc,strUser,strPC) VALUES (" & Err.Number & ",'" & err.Description & "','" & gUser & "','" & gPC & "');"
docmd set warnings false
docmd.runSQl strSQl
docmd.setwarnings true
End Sub
Regards
Ken Reay
Freelance Solutions Developer
Boldon Information Systems Ltd
Website needs upgrading, but for now -
UK