ASPJpeg 组件/JMail组件下载

ASPJpeg 组件/JMail组件下载的下载地址 最新更新ASP Jpeg 下载地址:http://www.oioj.net/down/AspJpegv1.5.0.0.rar 最新更新JMAIL组件下载地址: http://www.ajiang.net/products/download/coms/jmail44_free.zip 同时附上JMAIL4的使用手册 JMail(4.3)中文手册 w3 JMail 是 Dimac 公司(www.dimac.net)推出的ASP发信组件,可以在ASP、VC、VB、Delphi等开发工具中调用。和其他发信组件相比,它具有支持HTML、多收件人、抄送、暗送等特点。4.0以上版本除了具备以上特点外,还有以下优点: 1、支持需要发信认证的SMTP服务器(现在多数免费邮箱都需要SMTP发信认证)。 2、当服务器支持SMTP发信时,JMail可以将信件加入SMTP发信队列(速度很快)。 3、支持在HTML邮件中嵌入附件中的图片。 4、支持POP3收信(不支持WEB收发信的信箱也可以自己搞定了)。 5、支持PGP加密邮件。 6、支持邮件合并(群发邮件,每封信可以不同。) 下载: 英文原版:http://www.ajiang.net/luntan/w3jmail4.pdf 翻译后的:http://www.ajiang.net/luntan/w3jmail4_cn.pdf V3.7中文:http://www.ajiang.net/luntan/w3JMial37.pdf 在Asp程序中用Jmail发邮件的比较多,主要是因为多数虚拟主机支持他,其它的支持的较少。下面是一个Jmail发邮件的例子代码: 如果您在自己的机器上试,请下载Jmail.dll,下载解压后,双击Setup.bat 即可完成安装! <% On error resume next Dim JMail, contentId Set JMail = Server.CreateObject("JMail.Message") JMail.Charset = "gb2312" ' 邮件字符集,默认为"US-ASCII" ' JMail.ISOEncodeHeaders = False ' 是否进行ISO编码,默认为True ' 发送者信息(可用变量方式赋值) JMail.From = "Cavien@cavien.com" ' 发送者地址 JMail.FromName = "Cavien" ' 发送者姓名 JMail.Subject = "邮件主题" ' 邮件主题 ' 身份验证 JMail.MailServerUserName = "myusername" ' 身份验证的用户名 JMail.MailServerPassword = "mypassword" ' 身份验证的密码 ' 设置优先级,范围从1到5,越大的优先级越高,3为普通 JMail.Priority = 3 JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR") ' 加入一个收件人【变量email:收件人地址】可以同一语句重复加入多个 JMail.AddRecipient("someone@somehost.com") ' 加入附件【变量filename:附件文件的绝对地址,确保用户IUSR_机器名有访问的权限】 ' 【参数设置是(True)否(False)为Inline方式】 'contentId = JMail.AddAttachment (Server.MapPath("jmail.asp"), True) ' 邮件主体(HTML(注意信件内链接附件的方式)) JMail.HTMLBody = "<html><head><META content=zh-cn http-equiv=Content-Language><meta http-equiv=""Content-Type"" content=""text/html; charset=gb2312""><style type=text/css>A:link { FONT-SIZE: 9pt; TEXT-DECORATION: none; color: #000000}A:visited {FONT-SIZE: 9pt; TEXT-DECORATION: none; color: #666666}A:hover {COLOR: #ff6600; FONT-SIZE: 9pt; TEXT-DECORATION: underline}BODY {FONT-SIZE: 9pt} --></style></head><body><font color=red>邮件正文</font><br><font color=green>邮件正文</font><br><b>邮件正文</b></body></html>" ' 邮件主体(文本部分) JMail.Body = "我们的邮件采用了HTML格式,但是您的邮件查看软件可能不支持。。。邮件正文,邮件正文,邮件正文" ' 发送【调用格式:objJMail.Send([username:password@]SMTPServerAddress[:Port])】 JMail.Send("smtp.163.com") ' 关闭并清除对象 JMail.Close() Set JMail = Nothing if err.number<>0 then response.write "发送发送失败!" else response.write "邮件发送成功!" end if %> jmail用法实例2 附件 抄送 秘送 <% Set JMail = Server.CreateObject("JMail.Message") '是否将信头编码成iso-8859-1字符集. 缺省是True JMail.ISOEncodeHeaders = True '如果JMail.silent设置为true,ErrorCode包含的是错误代码 JMail.Silent = True '设置标题和内容编码,如果标题有中文,必须设定编码为gb2312 JMail.Charset = "gb2312" 'JMail.ContentType = "text/html" '如果发内嵌附件一定要注释掉这行,重要! JMail.From = "web@mail.skyhe.com" ' 发送者地址 JMail.FromName = "Skyhe System" ' 发送者姓名 JMail.MailServerUserName = "web" ' 身份验证的用户名 JMail.MailServerPassword = "123456" ' 身份验证的密码 '加入新的收件人 JMail.AddRecipient "kittow@mail.skyhe.com", "Mr.Example" 'JMail.AddRecipientBCC Email '密件收件人的地址 'JMail.AddRecipientCC Email '邮件抄送者的地址 JMail.Subject = "图片测试!!!" JMail.Body = "A nice picture if you can read HTML-mail." '增加一个普通附件 JMail.AddAttachment(Server.MapPath("images/email.gif")) '增加一个嵌入式附件 ' The return value of AddAttachment is used as a ' reference to the image in the HTMLBody. 'contentId = JMail.AddAttachment(Server.MapPath("images/email.gif")) Dim contentId contentId = JMail.AddAttachment("E:imagesemail.gif") '只有HTML格式支持嵌入图片附件,我们采用HTML格式的邮件内容 ' As only HTML formatted emails can contain inline images ' we use HTMLBody and appendHTML JMail.HTMLBody = "<html><body><font color=""red"">Hi, here is a nice picture:</font><br>" JMail.appendHTML "<img src=""cid:" & contentId & """>" JMail.appendHTML "<br><br> good one huh?</body></html>" '如果对方信箱不支持HTML格式邮件,我们仍需要给他一个友善的提示 ' But as not all mailreaders are capable of showing HTML emails ' we will also add a standard text body JMail.Body = "Too bad you can't read HTML-mail." JMail.appendText " There would have been a nice picture for you" JMail.Send( "mail.skyhe.com" ) http://www.xieguang133.com/

posted on 2009-08-13 10:17  xieguang133  阅读(229)  评论(0)    收藏  举报

导航