使用 VB.Net 讀取 Outlook Express 信件
參考來源:http://topic.csdn.net/t/20040806/00/3247242.html
方法一:
Dim   olApp   As   Outlook.Application
dim   olApp   as   New   Outlook.Application
Dim   olApp   As   Object
dim   olApp   as   CreateObject(”Outlook.Application”)
方法二:
regsvr32   msmapi32.ocx
——————————————-
Dim   mapisession   As   New   MSMAPI.MAPISession
Dim   mapimessage   As   New   MSMAPI.MAPIMessages
mapisession.SignOn()
mapisession.DownLoadMail   =   True
mapimessage.SessionID = mapisession.SessionID
mapimessage.FetchSorted   =   True
mapimessage.FetchUnreadOnly   =   False
mapimessage.FetchMsgType   =   “”
mapimessage.Fetch()
Dim   size   As   Integer   =   mapimessage.MsgCount
Dim   i   As   Integer
Dim   c   As   Integer   =   0
For i = 0 To (size - 1)
mapimessage.MsgIndex   =   i
”””””””””””””’
Next