Sending an email when a User is deactivated
This script, named EmailInactiveUser.vbs will send an email when a User is deactivated:
<?xml version="1.0" ?>
- <MEDMLDATA xmlns="PhaseForward-MedML-Inform4">
<EXECUTIONPLAN REFNAME="EMAILINACTIVE" SCRIPTTYPE="SERVERRULE" SCRIPTFILE="EmailInactiveUser.vbs" />
- <EVENT REFNAME="DeActivate User" UUID="PF_EVENT_UUID_DEACTIVATE_USER">
<EXECUTIONPLANREF REFNAME="EMAILINACTIVE" />
</EVENT>
</MEDMLDATA>
This is the execution plan with the refname of EMAILINACTIVE:
Dim strMsg
strMsg = "User: " & Global.GetNamedValue("PF_EVENT_USERNAME")
strMsg = strMsg & " has been inactivated."
Global.EMailToInternetUser "user@phaseforward.com", strMsg, strMsg