求教怎样引用cdosys.dll 来读取本地eml文件中的信息到数据库 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

我想求教下，怎样在foxtable 中引用cdosys.dll，msado15.dll 来读取本地eml文件中的发件人，收件人信息？这两个dll应该是系统自带的com组件吧？怎么引用？

怎样让下面的代码能够运行？

' 读取邮件内容

Private Sub ReadEML(ByVal emailPath As String)

Dim file As String = emailPath

Dim oMsg As CDO.Message = New CDO.Message()

Dim stm As ADODB.Stream = Nothing

'读取EML文件到CDO.MESSAGE，做分析的话，实际是用了下面的部分

Try

stm = New ADODB.Stream()

stm.Open(System.Reflection.Missing.Value,

ADODB.ConnectModeEnum.adModeUnknown,

ADODB.StreamOpenOptionsEnum.adOpenStreamUnspecified,

"", "")

stm.Type = ADODB.StreamTypeEnum.adTypeBinary'二进制方式读入

Dim '将EML读入数据流 As stm.LoadFromFile(file)

Dim '将EML数据流载入到CDO.Message，要做解析的话，后面就可以了。 As oMsg.DataSource.OpenObject(stm,"_stream")

'发件人

Me.lblFrom.Text = oMsg.From

MsgFrom = oMsg.From

'收件人

Me.lblTo.Text = oMsg.To

MsgTo = oMsg.To

Finally

stm.Close()

End Try

End Sub

主题：求教怎样引用cdosys.dll 来读取本地eml文件中的信息到数据库