objfaxserver = createcomobject("FaxComEx.FaxServer")
objfaxserver~connect("atl-dc-02")
objfaxactivity = objfaxserver~activity()
SAY "Incoming messages:" objfaxactivity~incomingmessages
SAY "Outgoing messages:" objfaxactivity~outgoingmessages
SAY "Queued messages:" objfaxactivity~queuedmessages
SAY "Routing messages:" objfaxactivity~routingmessages |