|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
用cdonts发送邮件的两个函数,异常好用,快记录下来! <% sub sendmail(fromwho,towho,subject,body) 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@fcxx.net密送 \\\'cdo.AttachFile "" 附件 cdo.Send Set cdo=Nothing end sub sub sendattachmail(fromwho,towho,subject,body,attachfile) dim cdo set cdo=server.createobject("cdonts.newmail") cdo.From=fromwho cdo.To = towho cdo.Subject =subject cdo.Body =body cdo.MailFormat=0 cdo.BodyFormat=0 cdo.Importance=0 cdo.AttachFile attachfile cdo.Send Set cdo=Nothing end sub %> 返回类别: 教程 上一教程: ASP 3.0高级编程(四) 下一教程: ASP动态生成WBMP图片的程序 您可以阅读与"用CDONTS发送邮件的两个函数"相关的教程: · 利用CDONTS发送邮件的ASP函数 · 使用CDONTS发送邮件的几个例子 · ASP发送邮件的CLASS · 将ASP的DEBUG变得简朴的两个函数 · ASP用于分页的两个函数 |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |