vb.net 2005 outlook发送邮件 附件 发送箱

这篇博客介绍了如何使用VB.NET 2005结合MAPI接口发送邮件,包括添加附件,并提供了直接发送和启动Outlook界面后发送的示例代码。同时提到了解决Express版组件不全的问题,需要注册MAPI组件并进行相应设置。
摘要由CSDN通过智能技术生成

我新写了一个用mapi发邮件的例子,大家一起参考

        Dim MAPISession1 As New MSMAPI.MAPISession

        Dim MAPIMessages1 As New MSMAPI.MAPIMessages

        MAPISession1.SignOn()

        MAPIMessages1.SessionID = MAPISession1.SessionID

        MAPIMessages1.Compose()

        'MAPIMessages1.MsgIndex = -1
        MAPIMessages1.RecipAddress = "tiang@icc.co.jp"
        MAPIMessages1.MsgSubject = "Love your site"
        MAPIMessages1.MsgNoteText = "Your MAPI tutorial is great."
        MAPIMessages1.AttachmentPathName = "c:/file.txt"


        MAPIMessages1.Send()
        MAPIMessages1.Send(True)

        MAPISession1.SignOff()

这个是用MAPI写的.可以弹出outlook express窗口.并可加附件的.点发送就出去了.
但是前提是,要加进去MAPI的com组件.
地址我提供给大家

http://www.vector.co.jp/soft/dl/win95/util/se342080.html

是一个日本网站.下载之后运行.之后MAPI这个组件就出现了.因为我们用的VB.NET都是express版的,组件不全的原因.  这个做过之后.还不行,出错说MAPI没有在注册表里注册.  下载msmapi32.ocx 文件.放在C:/WINDOWS里面和system32里面,具体放在哪里好用我不太清楚.总之都放了.
在dos窗口运行 regsvr32 c:/C:/WINDOWS/msmapi32.ocx  c:/C:/WINDOWS/system32/msmapi32.ocx
再运行上面的代码,就没有问题了.

相信这个做完了,可以解决大家的许多问题.

 

 

下面的是直接发送到送信箱的代码,差不太多,但是有点细节需要主意.

 

Dim MAPISession1 As New MSMAPI.MAPISession

Dim MAPIMessages1 As New MSMAPI.MAPIMessages

MAPISess

评论 2
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值