Windows被锁定时触发Outlook VBA

时间:2016-12-08 10:41:07

标签: vba vbscript outlook task schedule

我使用VBA代码(联机)在触发提醒时通过Outlook发送电子邮件。 Windows被锁定时无法触发。当Windows被锁定时,有没有办法调用它(可能使用VBScript或批处理)?

这是“http://www.slipstick.com/developer/send-email-outlook-reminders-fires/

中的代码
Private Sub Application_Reminder(ByVal Item As Object)
    Dim objMsg As MailItem
    Set objMsg = Application.CreateItem(olMailItem)
    If Item.MessageClass <> "IPM.Appointment" Then
        Exit Sub
    End If
    If Item.Categories <> "Away Time Alert" Then
        Exit Sub
    End If
    objMsg.To = Item.Location
    objMsg.Subject = Item.Subject
    objMsg.Body = Item.Body
    objMsg.Send
    Set objMsg = Nothing
End Sub

我不知道这个编程。

终极目标 -

我希望任务计划程序在超过60分钟的Windows被锁定(登录然后锁定)时运行脚本,这将运行Outlook宏向我发送电子邮件(当Windows仍处于锁定状态时)。 / p>

1 个答案:

答案 0 :(得分:0)

当Windows被锁定时,Outlook无法进行身份验证。请尝试使用针对远程服务器的身份验证的CDO消息。您必须知道您使用的SMTP服务器的端口。

http://www.paulsadowski.com/wsh/cdo.htm