自己开发的email组件及说明、源文件（一上午没说话，终于搞定）

myemail 1.0版使用说明

    myemial是我自己写的一个email组件，说实话，叫1.0版有点惭愧，因为有些

功能还未完善，现在的缺点是还不支持html格式，抄送及密送只能支持一个邮件

地址，不过我将在一两天内完成这些功能。

这个组件包括以下属性及方法：

属性：
mailserver : 你的邮件服务器，也可以是ip形式。
to:          收件人
from:        发件人
cc:          抄送
bcc:         密送
subject:     邮件标题
body:        邮件内容
attachment:  附件     （目前只能发送一个附件）
ishtml    :  是否html格式（目前不支持)
ifsuccess :  是否成功
errtext :    出错原因

方法：
send()   :   发送邮件

下面是一个在asp里使用这个组件的例子。
<%@ language=vbscript %>
<%

   dim m_objmail    
   set m_objmail        = server.createobject ("myemail.email")  
   m_objmail.mailserver = "server1.domain"                
   m_objmail.from       = "lyp@domain"
   m_objmail.to         = "lyp@domain"
   m_objmail.subject    = "hello , just test my own email com "
   m_objmail.body       = "just a text "
   m_objmail.attachment = "d:/bizen/getcategory.sql"
   m_objmail.cc         = "lyp@domain"
   m_objmail.bcc        = "lyp@domain"

   //发送
   m_objmail.send ()
   

   
   if m_objmail.ifsuccess  then
      response.write "发送成功！"
   else   
      response.write m_objmail.errtext
   end if
   
   set m_objmail = nothing
%>         

下载地址：http://homepage.qdcatv.com.cn/bigeagle/myemail.zip

bigeagle

bigeagle@163.net
http://bigeagle.yeah.net