Contents

 
Home
ASPRunner Professional 8.1 manual
Prev Page Next Page
 
 

Function runner_mail

 

Description

Function runner_mail is ASPRunnerPro wrapper for email function.

Syntax

runner_mail(params)

Arguments

params - Scripting.Dictionary object with input parameters. The following parameters are supported:

· from - sender email address. If none specified an email address from the wizard will be used.
· to - receiver email address.
· cc - email addresses of secondary recipients.
· bcc - email addresses of recipients whose addresses are not to be revealed to other recipients of the message.
· body - plain text message body.
· htmlbody - html message body (do not use 'body' parameter in this case).
· charset - html message charset. If none specified the default website charset will be used.
· attachments - attachments description.

Return value

Scripting.Dictionary with the following data:

· mailed: (True or False) indicates wheter mail sent or not.
· source: error source (Err.Source).
· number: error number.
· description: error description.
· message: formatted message with all of above.

Examples

Send simple email:

' do not forget to setup email parameters like From, SMTP server etc

' on 'Security->User login settings' dialog

set params = CreateObject("Scripting.Dictionary")

params("to")="test@test.com"

params("subject")="Sample subject"

params("body")="message"

runner_mail(params)

Send HTML email:

set params = CreateObject("Scripting.Dictionary")

params("to")="test@test.com"

params("subject")="Sample subject"

params("htmlbody")="<body><html><p>Hello<br>Best regards</p></body></html>"

params("charset")="UTF-8"

runner_mail(params)

Example with error handling:

set params = CreateObject("Scripting.Dictionary")

params("to")="test@test.com"

params("subject")="Sample subject"

params("body")="Hello there" & vbcrlf & "Best regards"

set result = runner_mail(params)

if not result("mailed"then

  response.write result("message")

  response.flush

end if

Send email with BCC and CC fields:

set params = CreateObject("Scripting.Dictionary")

params("to")="test@test.com"

params("cc")="test2@test.com"

params("bcc")="test3@test.com"

params("subject")="Sample subject"

params("body")="message"

runner_mail(params)

Send email to multiple recipients:

set params = CreateObject("Scripting.Dictionary")

params("to")="test@test.com,test2@test.com,test3@test.com"

params("subject")="Sample subject"

params("body")="message"

runner_mail(params)

Send email with attachments:

dim tmpDict

set tmpDict = CreateObject("Scripting.Dictionary")

tmpDict("to")="test@test.com"

tmpDict("subject")="Sample subject"

tmpDict("body")="Hello there" & vbcrlf & "Best regards"

set attachments = CreateObject("Scripting.Dictionary")

attachments(0) = getabspath("files/1.jpg")

attachments(1) = getabspath("files/2.jpg")

set tmpDict("attachments") = attachments

set ret=runner_mail(tmpDict)

if not ret("mailed") then

    response.write ret("message")

end if

Converted from CHM to HTML with chm2web Standard 2.85 (unicode)