Add Certifier Document (LS Agent)

For some reason, one of our OU certifier documents is missing. Our server is reminding us of the fact! What is wrong with the following LS agent? I want to use the agent to access the OU certifier ID and create a new document in the names.nsf. When I run it, it pops up a "required registration argument not provided. I’m not sure what’s missing!?! Thanks in advance.

Sub Initialize

Dim session As New NotesSession

Dim reg As New NotesRegistration

reg.RegistrationServer = "TESTSERV"

reg.StoreIDInAddressBook = True

Call reg.AddServerToAddressBook( _

"c:\users\sample\test.id", _ ' ID file

"password here", _ ' certifier password

"", _ ' location field

"") ' comment field

End Sub

Subject: Adding Server or Certifier?

You said OU is missing so use this:

variant = notesRegistration.AddCertifierToAddressBook(idfile$ [, certpw$ [, location$ [, comment$]]])