0

特定の送信者からの未読メールのメールアドレスを取得したい.次のコードを試しましたが、うまくいきませんでした

Set olApp=CreateObject("Outlook.Application")
Set olMAPI=olApp.GetNameSpace("MAPI") 
Set oFolder = olMAPI.GetDefaultFolder(6)
Set allEmails = oFolder.Items

For Each email In oFolder.Items


If email.Unread = True Then
If email.SenderEmailAddress="Kalyanam.Raghuram@xxxx.com" Then

MsgBox email.Subject


End If
End If
Next

それで、このコードを挿入して、実際に「email.SenderEmailAddress」が検証しているものを確認しました

For Each email In oFolder.Items

If email.Unread = True Then

MsgBox email.Subject
MsgBox email.SenderEmailAddress


End If
Next

理解できないが読みやすい出力が得られました。解決策があれば教えてください。

4

2 に答える 2

0

あなたが投稿したコードは私にとってはうまくいきました.私はOutlook 2007でWindows Vistaを使用しています.

私が変更する1つのことはこれです

        LCase(email.SenderEmailAddress) = LCase("Kalyanam.Raghuram@xxxx.com") の場合
          wscript.echo メール.件名
        終了条件
于 2013-05-08T19:17:04.097 に答える