Hello,
I’ve customized the mailbox template so that users can send emails as the application ID rather than their own ID, without having to manually switch ID’s every time. It’s working fine, but I’m having an issue when it comes to spell checking. In a few places in the Declarations section of the CoreEmailClasses script library, I have code that looks like this:
====================
'Added by developer - replaced uidocument send with custom feature
'Call Me.m_noteUIMemo.Send()
If IsFlagSet(MEMO_SPELLCHECK) Then
Call Me.m_noteUIMemo.SpellCheck
End If
Call CustomSend(rti_body, Me.m_noteUIMemo.Document)
'End added code
==================
As you can see, rather than using the given .Send() command – which is internal in Lotus’ proprietary mailbox code – I’m using my own CustomSend routine to control who emails appear to come from (as well as internal fields that need to be set on the memo form). I’m also calling the UIDocument method .SpellCheck() if the mailbox preference is set to automatically spell check email.
And this does spell check the document, as expected. However, the Spell Checker dialog box that appears does not contain buttons to ‘Send As Is’ or ‘Cancel Send’, as it does when called internally within the proprietary .Send() command. To see what I mean, check out these screen shots:
As a result, once the user clicks Send to send the email, no matter what the Spell Checker returns, they are unable to cancel the send action (even if they close the dialog box entirely).
So how do I get these buttons to appear in my own code? Is there an undocumented parameter (or parameters) I need to include? Is there an alternate way of writing this to get the desired effect? Any help you can give would be very much appreciated.