Visual Basic 6中发送邮件的新方法

本文介绍了一种在Visual Basic 6中使用新方法发送电子邮件的技术,涵盖了如何集成.NET Framework对象来实现更现代的邮件发送功能。
摘要由CSDN通过智能技术生成
作者:陈刚
用VB6编写发送邮件的程序,有多种E-mail组件可供选择,如MAPIMessages、IIS4.0附带的CDONTS(NTS Collaboration Data Objects)以及许多第三方厂商开发的Email软件等。本文介绍用CDONTS开发VB下的邮件程序方法。

  1. 确认已安装SMTP服务器

  首先,必须确认在IIS服务器上已安装SMTP服务器,这是安装Option Pack时被缺省安装的选项。如果SMTP服务器已安装,在System32目录下会存在一个名为cdonts.dll的文件。

  2. 最简单的邮件发送程序

  以下是一个最简单的邮件发送程序,它由me@hotmail.net向abc@263.net发出一封标题为“Title”、内容为“Hello”的E-mail:

  Private Sub cmdSendMail_Click()

  Dim objMail as Object

  Set objMail=CreateObject("CDFONTS.DLL")

  ObjMail.Send "me@hotmail.net ", "abc@263.net","Title","Hello"

  Set objMail=nothing

  End Sub

  3. 发送邮件附件

  如果有附加的文件需要随同邮件传送,可以使用CDONTS的AttachFile方法:

  Private
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

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

抵扣说明:

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

余额充值