Error Creating SMTP Server Access 97

[myouth]

Set PDFPrinter = PDFPFactory.Printer("", "PDF-XChange 4.0", "Key1", "Key2")
PDFPrinter.SetAsDefaultPrinter
'[Routine works up to here and pdf's can be created]

PDFPrinSServerApp = PDFPrinter.AddSMTPServer("192.168.6.27", 25, -1, "UserID", "Password", -1)

Compile Error:
Expected Function of Variable.

The user ID and password are entered as well as the liscence keys.
Using Microsoft Access 97

Do you see anything wrong with this?

Thanks

[Ivan - Tracker Software]

Maybe the reason is because AddSMTPServer is a sub without a return value?

Code: Select all

Sub AddSMTPServer(sName As String, nPort As Long, bNeedAuth As Long, sUser As String, sPassword As String, bSecureConnection As Long)
    Member of PXCComLib.CPXCPrinter
    Add definition of SMTP server

[myouth]

I tried that as well, since it is a sub, but I receive the error "Compile Error: Expected =".

PDFPrinter.AddSMTPServer("192.168.6.27", 25, -1, "UserID", "Password", -1)
and
PDFPrinter.AddSMTPServer("192.168.6.27", 25, True, "UserID", "Password", True)

[Ivan - Tracker Software]

Please check (and send me screenshot) of how this function is represented into Access object inspector.

[myouth]

Here is the screen shot of the Object Viewer.
Thanks
Marc

[Ivan - Tracker Software]

So, it is a Sub without a return value and you cannot use the syntax
PDFPrinSServerApp = PDFPrinter.AddSMTPServer("192.168.6.27", 25, -1, "UserID", "Password", -1)

You need to use
PDFPrinter.AddSMTPServer "192.168.6.27", 25, -1, "UserID", "Password", -1