Asp环境下,用 C 写一个邮件发送组件如此简单[附源代码]

类别:编程语言 点击:0 评论:0 推荐:

   以前使用别人的组件,如 Jmail 等,总是这样那样的受到限制或者遇到问题,而且在受到限制和遇到问题的时候也不能得到最终的解决方案,现在好了,我们有了免费的开放源代码的邮件发送组件,希望能给大家带来提高的机会和使用的便利。
    明日网 XingerAspMail 1.0.0.0 组件是用 C++ 语言编写的高效率基于 Windows 服务器 COM 接口的开放源代码的邮件发送组件,此组件代码简单易懂。
    本组件版权归明日网(XingWorld.Net)所有,转载请著名出处。
    主要功能:发送邮件
    适用范围:Windows 服务器上运行的任何脚本程序、应用程序
    注册方法:在组件所在目录下,使用 regsvr32 XingerAspMail.dll 即可
    主要使用方法如下:

<%
'--------------------------------------------------
' XingerAspMail.Control 邮件发送组件使用示例
'--------------------------------------------------
dim xmail, bRet, strError

strError = ""
set xmail = Server.CreateObject("XingerAspMail.Control") 
        if IsObject(xmail) then
                xmail.SmtpHost  = "smtp.263.net"                ' 配置 SMTP 邮件服务器
                xmail.From      = "[email protected]"                ' 邮件发送者地址
                xmail.FromName  = "刘其星"                       ' 邮件发送人姓名
                xmail.To        = "[email protected]"                ' 发送目标
                xmail.Subject   = "网站开通通知[明日自助]!"        ' 邮件标题
                xmail.IsHtml    = true                          ' 邮件格式,是否使用 HTML 格式
                xmail.Body      = "尊敬的XX:<br><br>    你好," & _
                                  "这里是<a href=http://tt15.com target=_blank>明日自助建站系统</a>" & _
                                  "发出的通知邮件。<br><br>    " & _
                                  "<font color=blue face=verdana>This mail was sent by " & _
                                  "<a href=http://XingWorld.Net target=_blank>XingerAspMail!</a>" & _
                                  "</font><br><br><br><br>"
                xmail.Charset   = "gb2312"                      ' 字符集,默认是 "gb2312"
                if xmail.Send(strError) then                    ' 发送邮件
                        response.write "successfully.."
                else
                        response.write "failed: " & strError
                end if
        else
                response.write "请先注册 XingerAspMail.dll 组件"
        end if
set xmail = nothing

%>


    下载完整安装包(组件和源代码):http://xingworld.net/help/XingerAspMail/InsXMail.exe [推荐]
    下载组件及示例代码:http://XingWorld.Net/help/XingerAspMail/XingerAspMailExp1.0.0.0.rar
    下载组件 C 源代码:http://xingworld.net/help/XingerAspMail/XingerAspMailSrc1.0.0.0.rar

    如果您有任何意见或者建议请登陆明日网站(http://XingWorld.Net),我们会及时给予回答。

本文地址:http://com.8s8s.com/it/it22927.htm