万卷书   首页 > 电脑书籍 > Asp > 简单快捷实现ASP在线发邮件功能
 

   2. 将上述功能封装在一个类中

   由于ASP能使用的组件中不能存在控件,所以要通过类模块来封装上述窗体。首先在类初始化时建立一窗体:

   private sub class_initialize()

   set frm = new frmsendmail

   end sub

   把窗体的公共变量作为属性封装在类模块中。

   该窗体的函数接口为:

   public sub send()

   frm.sendstart

   end sub

   3. 注册该组件

   将上述工程编译成dll文件,通过vb注册或手工注册都可以。

   4. 在ASP中的应用

   调用方法如下:

   set smail=server.createobject("sendmailx.mail")

   smail.stmp="166.166.1.1"

   smail.logfile="e:\logs\mail.log"

   smail.mfrom = mfromname && " 〈" && mfromaddr && "〉"

   smail.mto = mtoname && " 〈" && mtoaddr && "〉"

   smail.msubject = msubject

   smail.mtext = mtext

   smail.send

   其中变量可以通过赋值,也可以来自上一个request页面。


上一页