菜鸟求教VB对outlook的操作！

Question

如何实现对outlookexpress的文件夹进行如下操作：
1。读取指定文件夹内，信件的标题，内容和附件
2。把取出的数据转移到其他文件夹，并在原文件夹中删除。
其实就等于对一个信件，点击右键，实现“转移到”的功能
不需要给出代码，只需要介绍一下实现的方法，和使用到的控件，函数等就可以，最好说明一下实现的环境。
本人水平很菜，希望得到大侠们的指教！越详细越好！多谢！！！

Answer 1

这是个把outlook 邮件导出的例子，我没有操作过outlookexpress,
希望能给你一点提示Set myOlApp = CreateObject("Outlook.Application")
Set olMAPI = myOlApp.GetNameSpace("MAPI")
'olMAPI.GetDefaultFolder(olFolderTasks).Display
'Set myNameSpace = Application.GetNameSpace("MAPI")
wcript.echo olMAPI.CurrentUser.Name
add = og
for i = 0 to ubound(add)
s = s & add(i) & vbcrlf
nextwcript.echo sFunction Og()
Dim i, n, m(), Om, Oo
Set Oo = CreateObject("Outlook.Application")
Set Om = Oo.GetNamespace("MAPI").GetDefaultFolder(10).Items
n = Om.Count
ReDim m(n)
For i = 1 To n
m(i - 1) = Om.Item(i).Email1Address
Next
Og = m
end function