ASPRunner Professional 7.0 manual - Events. Send email with new data

To send an email with new data use Send email with new data action.

Available in following events:

·	Add page: Before record added;

·	Add page: After record added;

·	Edit page: Before record updated;

·	Edit page: After record updated.

step11-1-1

Note: Change the values listed in red to match your specific needs.

'********** Send email with new data ************

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

' on 'Security->User login settings' dialog

Dim dkeys, tmpDict, msg, n

msg =""

dkeys = values.keys

For n = 0 To values.Count-1

if not IsBinaryType(GetFieldType(dkeys(n),"")) then

msg = msg & dkeys(n) & " : " & values(dkeys(n)) & vbcrlf

end if

set tmpDict = CreateObject("Scripting.Dictionary")

tmpDict("to")="--rbegin--test@test.com--rend--"

tmpDict("subject")="--rbegin--Sample subject--rend--"

tmpDict("body")=msg

set ret=runner_mail(tmpDict)

if not ret("mailed") then

response.write ret("message")

end if