$Outlook = CreateObject("Outlook.Application")
        $NS      = $Outlook.GetNamespace("MAPI")
        $Fldr    = $NS.GetDefaultFolder(6)
        $Unread  = $Fldr.UnReadItemCount
        $Outlook = 0
        if $unread
                $=sendmessage(@wksta,"You have $unread unread email messages")
                endif