|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
<% dim cdo set cdo=server.createobject("cdonts.newmail") cdo.From=fromwho "发件人信箱 cdo.To = towho "收件人信箱 cdo.Subject =subject "主题 cdo.Body =body "邮件正文 cdo.MailFormat=0 "说明是以MIME发送 cdo.BodyFormat=0 "可以包含html代码 cdo.Importance=0 "邮件的优先级别0-1-2 cdo.cc=xx@xx.net "抄送 cdo.Bcc=xx@sf.net "密送 cdo.AttachFile attachfile "附件 cdo.Send Set cdo=Nothing %> 下面我们看一个实例: dim str str=str&"您好!" str=str&" 由中国学生网所提供的劣质服务(ASP服务器瘫痪),导致本站连继两天不能访问。" str=str&"站长向这段时间不能访问本站的朋友深表歉意!本工作室也正在考虑更换网络提供商!<br>" str=str&" 本站主要面向B/S技术兴趣者。<br>" str=str&" 建站的目的是为B/S兴趣者提供一个学习交流的平台,同时也为商家建立企业上网平" str=str&"台,企业内部B/S应用提供解决方案。<br>" str=str&" 主要内容包括:ASP,ASP.NET,JSP,PHP,C#,Java,JavaScript,XML学习文章,B/S技术" str=str&"交流论坛及一些本工作室开发的一些B/S应用。<br>" str=str&" 本站的发展离不开大家的支持!<br>" str=str&" 谢谢!<br>" str=str&" 站长:追风<br>" str=str&" 深圳比艾思工作室<br>" filename="test.gif" "附件文件名 path=Server.MapPath("jefenetimages" & filename) "附件的路径 Set theMail=Server.CreateObject("CDONTS.NewMail") theMail.From="chinabs@263.net" "发件人信箱 theMail.To ="jeffzb@21cn.com" "收件人信箱 theMail.Subject ="电子邮件功能测试!" "主题 theMail.BodyFormat=0 "定义以Html的格式发送邮件 theMail.MailFormat=0 "定义以Mime的格式发邮件 theMail.Body=Str "邮件正文 On Error Resume Next "假如找不到附件,则跳过 theMail.AttachFile path,filename theMail.Send set theMail=nothing 返回类别: 教程 上一教程: ASP服务器组件编程心得 下一教程: ASP制作多用户版计数器 您可以阅读与"用CDONTS.NEWMAIL实现发送EMAIL"相关的教程: · CDONTS.NEWMAIL可以选用HTML格式发送EMAIL · WEBEMAIL免费邮件发送组件属性与方式 · 利用SMTP和ASP发送CDONTS电子邮件 · asp+发送email · CDONTS.NEWMAIL |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |