使用ASP+Jmail4.3发送邮件，随便发点感概......：）

最近帮同学写了个ASP+Jmail4.3发送邮件的程序，程序是很简单了，可是ME很久没有写过ASP了，也没有用过Jmail，在网上搜了一下，写好的程序确实不少，但也不能拿来就用，就这个小程序，也折腾我一个多小时
Jmail发邮件的写法也有两种，一种w3c Jmail标准的写法，一种是Jmail4.3版的新写法，而同学也不知道自己的空间到底是哪个版本了，晕啊，只好一个一个试了，把这个写好了的共享出来，对Jmail4.3的，也许对大家有用

'邮件发送函数
Sub  SendMail(SendAddress,MailSubject,MailContent)

On Error Resume Next
'创建Jmail实例
Set Jmail = Server.CreateObject("JMail.Message" )

'jmail.silent = true    '屏蔽例外错误，返回FALSE跟TRUE两值

'设置邮件服务器信息
JMail.MailServerUserName = "你的邮件帐号" ' 身份验证的用户名
JMail.MailServerPassword = "password" ' 身份验证的密码

JMail.CharSet  = "gb2312" '邮件编码

' My Name and Mail Address 
Jmail.From = " 发件者邮件地址"

Jmail.AddRecipient SendAddress '收件人地址
Jmail.Subject = MailSubject    '邮件主题
Jmail.Body    = MailContent    '邮件主体
' Jmail.Priority = 1 '邮件发送优先级，默认为3，即普通，1为最高级

Jmail.Send( "邮件服务器地址") '发送邮件

'错误处理
If Err <> 0 Then
  Response.Write( "发送邮件出错！" )
End If

'清理资源
Jmail.Close()
Set Jmail = Nothing
End Sub

使用方法如下了：

DIM strRecipientAddress,strMailSubject ,strMailContent 
   strRecipientAddress = Trim(Request.Form("RecipientAddress" ))
strMailSubject         = Trim(Request.Form("MailSubject" ))
strMailContent         = Trim(Request.Form("MailContent" ))

SendMail strRecipientAddress,strMailSubject,strMailContent

Response.Write("邮件发送成功！")

看完自己写的这段代码，跟以前自己写的那些ASP代码比较起来，这段代码确实工整了很多，在没有写
.NET的程序之前，写ASP代码基本上都是能实现功能就行，那管什么代码风格，用函数封状代码的那门子
事情，虽然现在.Net也学的不怎么样

联想起前些天在CSDN论坛看到一个贴子，楼主说自己在深圳面试了不少公司，大多公司只问一些脚本和基本语法等云云，在如今，面向对象，面向方面，极限编程，设计模式，单元测试，代码重构等概念满天飞的时候，不知道这个能说明什么？