用cdont组件发邮件

发邮件

最近看到充许多网友要用自动发邮件的讨论, 这个东东我以前也研究过现在把它发布到这儿,希望能给大家带来用处:
<%
fromwho=request("fromwho")
frommail=request("frommail")
towho=request("towho")
tomail=request("tomail")
subject=request("subject")
content=request("content")
title=request("title")
%>
<%
'建立一个CDONTS.NEWMAIL对象

set objmail=server.createobject("cdonts.newmail")
'设置寄件人
objmail.from=fromwho
objmail.from=frommail
'设置收件人
objmail.to=towho
objmail.to=tomail
'设置邮件主题
objmail.subject=subject
'设置邮件内容
objmail.body=content&title&towho&fromwho
'将邮件格式设成HTML,若没有这两行,则默认的是txt格式
'objmail.bodyformat=0
'objmail.mailformat=0
objmail.send
%>
<%
response.write"<script language=javascript>alert('你已经成功寄出了！！！');</script>"
response.write"<script language=javascript>window.location.href='vbscript:history.back'</script>"

%>

这个程序已经测试通过的

--------------------------------------------------------------------------------
关于这篇文章的评论 [注意：这里仅仅是给大家提供了一个发表对文章本身看法的地方，如果有疑问，请到论坛提出] 我要提问!
hyijiao 2003-10-14 11:33:00

請問如何把下面的JMAIL改成用MS.Cdonts 發郵件？謝謝
--------------------------------------------------------------------------------
您好！

　　請問如何把下面的JMAIL改成用MS.Cdonts 發郵件？謝謝！

Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "mail.powercord911.com:25"
JMail.Sender = "mis@powercord911.com"
JMail.Subject = "您的登录密码"
JMail.AddRecipient(rsuserinfo.Fields.Item("useremail").Value)
JMail.Body = "尊敬的用户您好，首先感谢您使用我们的服务！." & vbCrLf & vbCrLf
JMail.Body = JMail.Body & "您的用户名是：" &(rsuserinfo.Fields.Item("user_name").Value) & vbCrLf
JMail.Body = JMail.Body & "您的注册邮箱是：" &(rsuserinfo.Fields.Item("useremail").Value) & vbCrLf
JMail.Body = JMail.Body & "您的登录密码是：" &(rsuserinfo.Fields.Item("fpassword").Value) & vbCrLf
JMail.Body = JMail.Body & "请妥善保管您的密码，如再次遗忘密码，请登录至本站取回您的密码，谢谢您使用本系统。" & vbCrLf
JMail.Body = JMail.Body & "顺祝商祺！" & vbCrLf
JMail.Body = JMail.Body & "××××××有限公司"
JMail.Priority = 3
JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
JMail.Execute

在以上代码中两句代码：
JMail.ServerAddress = "mail.powercord911.com:25"
JMail.Sender = "mis@powercord911.com"

mail.powercord911.com:25是你的发送邮件服务器，25是端口号

时间： 2024-04-16 19:27:34

用cdont组件发邮件的相关文章

cdo组件发邮件

发邮件 原来用cdonts组件来发邮件,自从服务器用了2003系统以后,发现原来的功能不灵了,页面提示说是创建对象不成功.于是我查了一下IIS的帮助,帮助里面明确的写着在2003系统中,cdonts的组件被删除了,只保留了cdo组件.CDO组件是cdonts的父级组件.但是网上很多地方说是用cdo组件发邮件的例子,其实都是cdonts组件的例子. 下面我来列一下cdo组件的例子set cdomail=server.CreateObject ("CDO.Message") 这个是关键,创

使用asp的jmail组件发邮件

JMail 组件 Dimac 公司的邮件收发组件,这是一个非常成熟和强大的邮件组件.它不但可以完成发邮件的工作,还可以POP收信,并支持收发邮件时的PGP加密,内置一个群发邮件的对象,可以使群发编程更简单. 即使是很多其他组件也都能完成的发邮件功能,JMail 的完成也可以称得上最出色的,除了常见的抄送暗送等多收件人功能外,它还支持添加嵌入式图片附件,并且可以从URL读取文件作为附件. JMail 的免费版本拥有全部完成的发邮件功能,只在收邮件和加密邮件等我们不常用到的方面进行了限制. 免费版下

C#利用CDOSYS组件发邮件的一些小结

发邮件 建立 ASP.NET WEB项目. using System.Web.Mail; 首先看看利用Inter网上的SMTP服务器来发邮件,现在普遍是登陆SMTP需要验证的.这里我们使用的是网易的邮件服务器. private void SendMailBySMTP(){ // 使用一个SMTP的服务器,并且通过验证 MailMessage mailobj = new MailMessage(); mailobj.From = "username@126.com"; mailobj.T

Windows 2003下不注册组件用ASP发邮件

window|发邮件|注册组件 其实ASP可以做很多事,只是大家不知道怎么用而以.微软为asp提供了非常多的现成有用的组件,而这些组件却没有人知道,如用CDO.Message发送邮件. 什么是CDO.Message?在winnt和win2k下发送邮件要用CDONTS.NewMail,CDONTS.NewMail组件是需要注册的,很简单,只要在服务器上运行命令行regsvr32Cdonts.dll,在弹出的对话框中确定即可,使用CDONTS.NewMail服务还需安装有iis自带的smtp.到了w

Windows 2003下不注册组件用CDO.Message发邮件

window|发邮件|注册组件     其实ASP可以做很多事,只是大家不知道怎么用而以.微软为asp提供了非常多的现成有用的组件,而这些组件却没有人知道,如用CDO.Message发送邮件. 什么是CDO.Message?在winnt和win2k下发送邮件要用CDONTS.NewMail,CDONTS.NewMail组件是需要注册的,很简单,只要在服务器上运行命令行regsvr32 Cdonts.dll,在弹出的对话框中确定即可,使用CDONTS.NewMail服务还需安装有iis自带的smt

使用CDO通过外部邮件服务器发邮件 (免安装其他邮件组件)

使用CDO通过外部邮件服务器发邮件 (免安装其他邮件组件)John Peterson [ hooke 编译 ] WIN2K下的CDO或CDONTS被默认配置成只能通过本地的Microsoft SMTP服务来发送邮件,如果要用外部的邮件服务器,一般要安装第三方组件.以下代码教你如何利用CDO通过外部邮件服务器发送邮件.(译者win2000下测试通过.)<%Const cdoSendUsingMethod="http://schemas.microsoft.com/cdo/configurat

简单快捷实现ASP在线发邮件功能

发邮件|在线 简单快捷实现ASP在线发邮件功能 -------------------------------------------------------------------------------- 在编写网上应用程序时,经常碰到需要在线发送邮件的问题,邮件内容是由程序动态决定的,如果你采用的是ASP方式来编写网上应用程序,如何简单.快捷地实现这一功能呢? 笔者在实践中利用ASP的com组件功能,在vb中实现了一个发邮件的小组件,在ASP中只通过轻松调用,就可以实现该功能.所有邮件处理

实现ASP文件在线发邮件

笔者在实践中利用ASP的COM组件功能,在VB中实现了一个发邮件的小组件,在ASP中只通过轻松调用,就可以实现该功能.所有邮件处理机制都被封装在这个组件中,使用起来极为方便.下面将详细介绍该组件的基本开发原理以及在ASP中的应用. 1． 利用Winsock控件与发送邮件的SMTP联系 和SMTP的联系包括握手.发送数据以及关闭等全过程,主要程序如下: 建立一个frmsendmail 的窗体,其中包含一个Winsock控件,有以下几个公共变量: Public mSTMP As String //发

asp.net发邮件的几种方法汇总

 .net中发送邮件方法有很多,如MailMessage,SmtpMail等下面我来给大家利用这些方法来实现在.net中邮件发送吧,希望此方法对各位同学会有所帮助 MailMessage 提供属性和方法来创建一个邮件消息对象.通常可以先构建好MailMessage对象,然后设置它的属性的方式来构建邮件程序.   常用的属性: From -- 发送邮件的地址 To -- 接受邮件的地址 Subject -- 邮件的标题 Priority -- 邮件的优先级(有效值为High,Low,Normal)