OutLook的VBA基本对象及操作

1)在OutLook中创建应用对象为：dim otlApplication as OutLook.application
set otlApplication=CreateObject("Outlook.appliction")
2)在OutLook中创建命名空间： dim nameSpace1 as namespace
set nameSpace1=application.getNamespace("MAPI")'这里的MAPI是指支持 的唯一数据源是 MAPI，允许访问存储在用户的邮件存储区中的所有Outlook 数据。
3)接着创建Folder文件： dim folder1 as folder dim folder2 as folder
set folder1= nameSpace1.getDefaultFolder(olFolderInbox)'获取跟文件夹
4)可以根据folder1.folders.count可以得到所有的子文件夹的个数，然后利用循环进行遍历，去的各个文件，如下遍历求出各个子文件夹的名字：
for k=0 to folder1.folders.count
set folder2 = folder1.folders(k)
msgbox folder2.name'直接使用弹出对话框来显示
debug.print folder2.name'使用本地窗口进行输出
next
5)在OutLook中创建邮件：可以直接为邮件赋值，也可以通过Application对象进行创建：
第一种：dim mailItem1 as MailItem
set mailItem1=folder1.items(n)'n必须小于或等于folder1.items.count
第二种：set mailItem1=application.createitem("olMailItem")
6)在OutLook中的Explorers集合对象，代表打开的主窗体对象
Msgbox Application.activeExplorer.Selction.count'这里的count是显示你选择的主窗体
7)在OutLook中的Inspectors
Msgbox Application.inspectors.count'这里的count是显示你打开的子窗体的个数

8) 当然以上全是基本操作，如果想知道各个的属性和方法，可以直接定义变量后加.自动显示属性方法。