var msg, result;

 

msg = new ActiveXObject('AdvancedDirectRemailer.AdrMessage');

 

msg.From = ‘Alexander Gorlach <gorlach@mailutilities.com>';

msg.To = ‘Vladimir Katalov <vkatalov@elcomsoft.com>';

msg.Subject = ‘Sorry, it is test!’;

msg.Body = ‘Hello!\r\nIt is test…’;

msg.Kludges = 'X-Source: web mail\r\nX-Form: AdrMsg.html\r\n';

 

msg.Send();

 

switch (msg.LastError)

{

case 0:  result = "Message was successfully sent"; break;

case 1:  result = "Invalid sender email"; break;

case 2:  result = "Invalid recipient email"; break;

case 3:  result = "File read/write error"; break;

case 4:  result = "Not enough memory"; break;

default: result = "Unknown error";

}

 

Code samples