易截截图软件、单文件、免安装、纯绿色、仅160KB

如何利用ASP程序来使用JMail发邮件的例子

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
if Request("MailtoAddress") <> "" then
    msg = SendMail
(Request("SMTPServer"),Request("SMTPServerUserName"),Request("SMTPServerPassword"),
Request("MailDomain"),Request("MailtoAddress"),Request("MailtoName"),Request("Subject"),
Request("MailBody"),Request("fromName"),Request("Mailfrom"),Request("Priority"))
    if msg then Response.Write("发送成功") else Response.Write("发送不成功")
    Response.End()
end if
function
SendMail(SMTPServer,SMTPServerUserName,SMTPServerPassword,MailDomain,MailtoAddress,MailtoName,
Subject,MailBody,fromName,Mailfrom,Priority)
    dim JMail, msg
    set JMail=Server.CreateObject("JMail.Message")
    JMail.Charset="gb2312" '编码
    JMail.silent=true '设置为true,JMail不会抛出例外错误.
    JMail.ContentType = "text/plain" '邮件正文格式
    'JMail.ServerAddress = SMTPServer '用来发送邮件的SMTP服务器(无效)
    '指定邮件服务器的地址。可以指定多个服务器,用分号点开。可以指定端口号。
    '如果serverAddress保持空白,JMail会尝试解决远程邮件服务器,然后直接发送到服务器上去。???
    '如:JMail.ServerAddress = &tquo;mail.mydom.net; mail2.mydom.net:2500"
    JMail.MailServerUserName = SMTPServerUserName ' 登录用户名
    JMail.MailServerPassWord = SMTPServerPassword ' 登录密码
    JMail.MailDomain = MailDomain '域名(如果用 “name@domain.com”这样的用户名登录时,请指明domain.com
    JMail.AddRecipient MailtoAddress,MailtoName '收信人
    JMail.Subject = Subject '主题
    JMail.Body = MailBody '邮件正文(纯文本格式)
    JMail.fromName = fromName '发信人姓名
    JMail.from = Mailfrom '发信人Email
    JMail.Priority = Priority '邮件等级12345
    msg = JMail.Send(


相关文档:

4、纯ASP代码生成图表函数——饼图

4、纯ASP代码生成图表函数——饼图
<%dim total(7,1)
total(1,0)="中国经营报"
total(2,0)="招聘网"
total(3,0)="51Job"
total(4,0)="新民晚报"
total(5,0)="新闻晚报"
total(6,0)="南方周末"
total(7,0)="羊城晚报"
total(1,1)=200
total(2,1)=1200
total(3,1)=900
total(4,1)=600
total(5,1)=1 ......

ASP与ActiveX控件交互实战(一)

ASP与ActiveX控件交互实战(一)  
   
  关键字:ASP,ActiveX控件,数字签名,安全    
   
  ActiveX控件运行在客户端。我们可以获得客户端的一些信息,如IC卡的信息,客户端的验证等等。但是ActiveX控件也有许多缺点:客户端的部署很困难,如客户端不能正确下载,下载了 ......

asp分页代码

 <%'开始分页
    Const MaxPerPage=25
       dim totalPut  
       dim CurrentPage
       dim TotalPages
       dim j
     ......

用ASP随机产生随机数

<%
Function gen_key(digits)
'Create and define array
dim char_array(50)
char_array(0) = "0"
char_array(1) = "1"
char_array(2) = "2"
char_array(3) = "3"
char_array(4) = "4"
char_array(5) = "5"
char_array(6) = "6"
char_array(7) = "7"
char_array(8) = "8"
char_array(9) = "9"
char_array( ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号