Alert user using net-send through code in dynamics ax OR Sending messages to the users in network using net-send in dynamics ax

Description:-

Microsoft Windows offers a simple method to send messages to other users or computers on the network – simple Win-popup Messages or Net Send Messages ( in Windows 95, Windows 98, Windows Me, Windows NT, Windows2000, Windows XP and Windows 2003 ).

Prerequisite: Start Messenger service from Start >> Programs >> Administrative tools >> services >> messenger. Here is the job which will send messages to the users/computers on the network.

static void netSend(Args _args)
{       
    COM      netSendCom;
    InteropPermission   permission = newInteropPermission(InteropKind::ComInterop);
    int     output;
    str computerName   =  Winapi::getComputerName();
    str message   = "Hello.. I am alerting from Dynamics AX";
    // Receiving end should start messenger service and alerter service from services.msc
    permission.assert();
    try
    {
        netSendCom = new COM("WScript.Shell");
        output = netSendCom.Run(strFmt("net %1 %2", computerName, message),0,true);
    }
    catch (Exception::Error)
    {
        CodeAccessPermission::revertAssert();
        throw Exception::Error;
    }   
    if (output != 0)
    {
        warning(strfmt("Net send Failed", computerName));
        warning("Check messenger service–Started");
    }   
    CodeAccessPermission::revertAssert();
}

Author : Umesh Patel

Related Posts