Opens an email client window for composing and sending an
Email.
Use this command when you wish to overwrite default mail
server settings and sender email data.
This EmailOpen command
takes 11 paramters to prefill the window with default data before it is
displayed to the user.
Parameters:
Name |
Type |
Description |
eSubject |
String |
Subject (title) of the email |
eContent |
String |
Default body text of the email |
eSenderEmail |
String |
Email address of sender |
eSenderName |
String |
Full name of sender |
eRecipientEmail |
String |
Email address of the recipient |
eRecipientName |
String |
Full name of the recipient |
eServer |
String |
IP address or DNS name of mailserver
(like "mail.example.com") |
eUsername |
String |
sender email account user name |
ePassword |
String |
sender email account user password |
eFileboxName |
String |
The name of the filebox control (like
"imFB_inf_Files ") from where selected
files are copied to the email window. These files are sent as attachments
with the email. |
eLogText |
String |
Text to be added to the logging
section |
Available in:
WindowMain |
WindowLink |
YES |
YES |
Used
in:
XojoScript Name |
GUID |
Send Info by Email |
DF78F654-7776-40C8-9F25-2DBC1E1FD2F7 |
Hint: You can
find references to XojoScripts which make use of this function by sending the
following SQL statement to the database:
Select id,GUID, ScriptName,ScriptCode from
im_scripts where ScriptCode Like '%EmailOpen%'
Example XojoScript:
Dim
eLogText As String
= ""
// Set Email Text
Dim
eSubject As String
= Gettext("imTF_inf_Title") // subject
Dim
eContent As String
= GetText("imTA_inf_Description")
Dim
eRecipientEmail As String
= "" // recipient
email
Dim
eRecipientName As String
= "" //
recipient name
// Set Filebox containing attachment files
Dim
eFileboxName As String
= "imFB_inf_Files" // filebox name with attachments files
// Set Email Configuration
Dim
eSenderEmail As String
= "my.name@mailserver.com" // sender email
Dim
eSenderName As String
= "John Doe"
// sender name
Dim
eServer As String
= "mail.server.ch"
// mail server address
Dim
eUsername As String
= "maillogin"
// mail server username
Dim
ePassword As String
= "mailpassword"
// mail server password
// Use 11 Parameters to overwrite default mail server settings
EmailOpen(eSubject,eContent,eSenderEmail,eSenderName,
_
eRecipientEmail,eRecipientName,eServer,eUsername,ePassword,eFileboxName,eLogText)