多个对象![]() ![]() ![]() |
代表“收件箱”文件夹中的邮件。
使用 CreateItem 方法创建代表新邮件的 MailItem 对象。以下示例创建并显示一个新的邮件。
Set myOlApp = CreateObject("Outlook.Application")
Set myItem = myOlApp.CreateItem(olMailItem)
myItem.Display
使用 Items (index) 从“收件箱”文件夹返回单个 MailItem 对象。其中 index 是邮件索引号或用于匹配邮件默认属性的值。
Set myOlApp = CreateObject("Outlook.Application")
Set myNamespace = myOlApp.GetNamespace("MAPI")
Set myFolder = myNamespace.GetDefaultFolder(olFolderInbox)
myFolder.Display
Set myItem = myFolder.Items(2)
myItem.Display