利用CDONTS发送邮件的ASP函数

转载 2004年07月19日 17:25:00

<%
“Last Updated By Recon On 05/14/2001
“On Error Resume Next

“利用CDONTS组件在Win2k上发送邮件

“发送普通邮件
SendMail "admin@ny.com", "iamchn@263.net", "Normal Mail!",
"Please check the attatchment!", 2, 0, "C:/Love.txt"

“发送HTML邮件
Dim m_fso, m_tf
Dim m_strHTML

Set m_fso = Server.CreateObject("SCRIPTING.FILESYSTEMOBJECT")
Set m_tf = m_fso.OpenTextFile("C:/Mail.htm", 1)
m_strHTML = m_tf.ReadAll

“Write m_strHTML
Set m_tf = Nothing
Set m_fso = Nothing

SendMail "admin@ny.com", "iamchn@263.net", "HTML Mail!",
m_strHTML, 2, 1, Null

“参数说明
“strFrom : 发件人Email
“strTo : 收件人Email
“strSubject : 信件主题
“strBody : 信件正文
“lngImportance : 信件重要性
“ : 0 - 低重要性
“ : 0 - 中等重要性(默认)
“ : 0 - 高重要性
“lngAType : 信件格式
“ : 为1时将邮件正文作为HTML(此时可以发送HTML邮件)
“strAttach : 附件的路径
Sub SendMail(strFrom, strTo, strSubject, strBody,
lngImportance, lngAType, strAttach)
Dim objMail

Set objMail = Server.CreateObject("CDONTS.NEWMAIL")
With objMail

.From = strFrom
.To = strTo
.Subject = strSubject
.Body = strBody
.Importance = lngImportance

If lngAType = 1 Then
.BodyFormat = 0
.MailFormat = 0
End If

If IsEmpty(strAttach) = False And IsNull(strAttach) = False
Then
.AttachFile strAttach
End If

.Send
End With
Set objMail = Nothing
End Sub
%>

php脚本中利用mail函数发送邮件及问题归纳

最近在学php脚本语言,书中有一个实例:服务器端将浏览器发送的信息通过php脚本,利用mail函数发送到一个邮箱。自己讲书中实例代码上传至服务器,在浏览器上填写表单,并提交后,邮箱迟迟收不到邮件。 ...
  • XIAOWEI_JIN
  • XIAOWEI_JIN
  • 2016年01月19日 20:22
  • 1673

php发送邮件二种方法 php使用smtp发送邮件

原文:http://www.jbxue.com/php/25502.html 本文介绍了php发送邮件的两种方法,分别是使用PHP内置的mail()函数发送邮件,使用封装SMTP协议的邮件类发送...
  • lorielei
  • lorielei
  • 2015年08月11日 13:55
  • 1271

asp.net使用smtp协议实现简单的发送邮件(支持附件)

引入下面两个名称空间 using System.Net.Mail; using System.Net; 前台页面代码 发送人:...
  • lee_tianya
  • lee_tianya
  • 2013年03月25日 02:22
  • 3402

asp.net利用Jmail发送邮件和接收全部代码

利用Jmail发送邮件: private void SendMailByJmail() { /**////建立发邮件类 jmail.MessageClass oJmailMessage = n...
  • huajinx
  • huajinx
  • 2012年11月22日 17:27
  • 407

asp.net 利用 Global.asax 定时发送邮件

创建Global.asax void Application_Start(object sender, EventArgs e) { /...
  • anihasiyou
  • anihasiyou
  • 2014年08月05日 16:31
  • 896

ASP.NET C# 邮件发送一:利用Jmail组件发送邮件

最近刚好在整理自己的代码·以便review 所以刚好把以前列出来此文说下用Jmail组件的邮件发送基于B/S架构的邮件发送,讲下最常用最流行的一种方法,利用jmail  组件,Google搜索下载安...
  • gd2008
  • gd2008
  • 2011年01月31日 14:50
  • 1167

asp发送邮件(email)方法集合

  • 2011年03月27日 11:48
  • 14KB
  • 下载

asp中發送郵件與上傳文件

  • 2011年06月08日 13:09
  • 3.25MB
  • 下载

asp.net ajax发送邮件

  • 2011年12月06日 16:38
  • 2.93MB
  • 下载

asp.net 发送邮件 smtp 源码

  • 2009年05月07日 19:54
  • 7KB
  • 下载
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:利用CDONTS发送邮件的ASP函数
举报原因:
原因补充:

(最多只允许输入30个字)