| ||
| Generates an simple IAF configuration file with SLL and SPA (secure password authentication). | ||
Option Explicit
'Create account exporter object
Dim Export
Set Export = CreateObject("EmailExport.Account")
Export.AccountName = "My IMAP account"
'The IMAP server will be also connected
'using secure connection (default port)
Export.IMAPServer = "imap.my-email.com"
Export.IMAPSecureConnection = True
'IMAPSecureConnection sets IMAP port to ipIMAPSSL
'You can coose any other port using IMAPPort property.
'Export.IMAPPort = 235
'The IMAP server uses SPA
Export.IMAPUseSicily = True
'The SMTP server will be connected using
'secure connection (default port)
Export.SMTPServer = "smtp.my-email.com"
Export.SMTPSecureConnection = True
'SMTP server is using the same settings as
'IMAP server = SSL + SPA, the same password
Export.SMTPUseSicily = 02
'Save the IAF file.
Export.SaveIAFFile Export.AccountName & ".IAF" |