ASP.NET 用JAMIL组件发布电子邮件

   ASP NET 网站开发邮件发送用的比较多的是用JAMIL组件 下面我来说说具体的用法     首先 我们要从网上下载Jamil dll的组件 然后添加引用using jmail 然后再本机或者服务器上注册一下    将jmail dll拷贝到服务器的system 目录下 开始 运行 cmd 输入regsvr jmail dll     protected void sendMail(String sender String senderMail String receiver String subject String content)    {    jmail MessageClass jmMessage = new jmail MessageClass()    //设置字符集    jmMessage Charset = gb     //信件的contentype 缺省是 text/plain ） : 字符串如果你以HTML格式发送邮件 改为 text/HTML 即可     Jmail ContentType = text/HTML     //发件人邮箱地址    jmMessage From = senderMail    //发件人姓名    jmMessage FromName = sender    //设置主题    jmMessage Subject = subject    //设置内容    jmMessage Body = content    // 设置收件人邮箱    jmMessage AddRecipient(receiver )    // string[] arraymail = MailTo Split( )    // for (int i = i <arraymail Lengthi++)    // {    //Jmail AddRecipientBCC(arraymail[i] )    //  }    // 设置登陆邮箱的用户名和密码    jmMessage MailServerUserName =     jmMessage MailServerPassWord = ******     //设置 *** tp服务器地址    if (jmMessage Send( false))    {    Response Write( <script>alert( 发送成功 )</script>)    }    else    Response Write( <script>alert( 发送失败 )</script>)    }    好的OK了！ lishixinzhi/Article/program/net/201311/11624

1、ASP中没有自带的smtp函数可以发邮件

2、ASP要发邮件必须服务器端安装了发信组件，如：jmail

如下代码是我自己写的ASP发邮件程序，服务器发信组件为：jmail4.5

<%

'作者：凌陈亮www.lingchenliang.com（QQ：57404811）

'函数名：gw_sendmail()

'作用：利用Jmail4.5组件发送EMail

'参数：

'tomail：收件人email邮箱地址。

'subject：邮件标题。

'body：邮件内容。

'如果发送成功，函数将返回True，否则返回False

function gw_sendmail(tomail,subject,body)

    dim jmail,smail,smail_pwd,fromname

    smail = "57404811@qq.com" '设定发件人邮箱帐号

    smail_pwd = "***" '设定发件人邮箱密码

    fromname = "**网站" '指定发件人，可为email（如：57404811@qq.com），也可为名称（如：**网站）

    set jmail = Server.createobject("jmail.message") '创建JMAIL对象

    jmail.silent = true '屏蔽例外错误，true表示邮件发送会忽略错误，不将错误信息返回给操作系统。

    jmail.logging = true '使用日志

    jmail.charset = "gb2312"

    jmail.contentType = "text/html" 

    jmail.from = smail '设定发件人邮箱

    jmail.fromname = fromname '指定发件人

    jmail.mailserverusername = smail '设定发件人邮箱帐号

    jmail.mailserverpassword = smail_pwd '设定发件人邮箱密码

    jmail.addRecipient tomail '设定收件人邮箱帐号

    jmail.subject = subject '设定邮件的标题

    jmail.body = body '设定邮件的内容

    jmail.returnreceipt=true '当对方收到邮件后发回收条

    'smtp发信服务器名称如：mail.qq.com、smtp.163.com、smtp.163vip.net、smtp.126.com、smtp.sina.com.cn、smtp.gmail.com、smtp.china.com、smtp.sohu.com

    if jmail.send("mail.qq.com")=false then '开始发信并判断发信结果

        gw_sendmail=false '发信失败

    else

        gw_sendmail=true '发信成功

    end if

end function

'用户意见/网站留言发送邮件示例

dim name1,mobile,content,body

name1=trim(request.form("name1"))

mobile=trim(request.form("mobile"))

content=trim(request.form("content"))

body=""

body=body & "<p>留言时间：" & now() & "</p>"

body=body & "<p>留言IP：" & request.ServerVariables("REMOTE_ADDR") & "</p>"

body=body & "<p>客户姓名：" & name1 & "</p>"

body=body & "<p>手机号码：" & mobile & "</p>"

body=body & "<p>留言内容：" & content & "</p>"

if gw_sendmail("57404811@qq.com","**网站留言-" & name1,body)=true then '这里填自己的邮箱

    call alert("发送成功！","/")

else

    call alert("错误：发送失败！","javascript:window.history.back()")

end if

---