I am trying to create a simple email using an example posted here (code snippet below);
mailSession mSes
mailReturnCode mRet
mailMessage mMsg
// Create a mail session
mSes = create mailSession
// Log on to the session
//mRet = mSes.mailLogon(mailNewSession!)
mRet = mSes.mailLogon()
IF mRet <> mailReturnSuccess! THEN
MessageBox("Mail", 'Logon failed.')
DESTROY mSes
RETURN
END IF
// Populate the mailMessage structure
mMsg.Subject = 'TEST'
mMsg.NoteText = 'Luncheon at 12:15'
mMsg.Recipient[1].name = 'Smith, John'
mMsg.Recipient[2].name = 'Shaw, Sue'
// Send the mail
mRet = mSes.mailSend(mMsg)
IF mRet <> mailReturnSuccess! THEN
MessageBox("Mail Send", 'Mail not sent')
DESTROY mSes
RETURN
END IF
mSes.mailLogoff()
DESTROY mSes
I am receiving a logon failure and cannot determine why. I am using Windows 8 (64 bit) with MS Office Professional (64 bit) and PB (classic) 12.5. Any help/suggestions are appreciated.
David Gauthier
mailSession mSes
mailReturnCode mRet
mailMessage mMsg
// Create a mail session
mSes = create mailSession
// Log on to the session
//mRet = mSes.mailLogon(mailNewSession!)
mRet = mSes.mailLogon()
IF mRet <> mailReturnSuccess! THEN
MessageBox("Mail", 'Logon failed.')
DESTROY mSes
RETURN
END IF
// Populate the mailMessage structure
mMsg.Subject = 'TEST'
mMsg.NoteText = 'Luncheon at 12:15'
mMsg.Recipient[1].name = 'Smith, John'
mMsg.Recipient[2].name = 'Shaw, Sue'
// Send the mail
mRet = mSes.mailSend(mMsg)
IF mRet <> mailReturnSuccess! THEN
MessageBox("Mail Send", 'Mail not sent')
DESTROY mSes
RETURN
END IF
mSes.mailLogoff()
DESTROY mSes
I am receiving a logon failure and cannot determine why. I am using Windows 8 (64 bit) with MS Office Professional (64 bit) and PB (classic) 12.5. Any help/suggestions are appreciated.
David Gauthier