第一次用jmail 出错，求救

baikaishui_0825 2005-02-22 02:43:26
过程如下：
运行：regsvr32 jmail.dll
执行
<%
function SendMail(SMTPServer,sender,mailto,subject,msg)'这个是一个函数，在程序中可以直接调用。
dim JMail
'on error resume next
'等待功能扩充
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.LazySend = true '这个属性是将邮件放入缓冲直至发出为止，的不到任何的错误信息
JMail.Charset = "euc-kr" '设定邮件的字符集，默认为"US-ASCII" 一般中文用"gb2312"
JMail.ContentType = "text/html" '这个邮件的头设置， 默认为 "text/plain" 能设置成你需要的任何情况。 '你想发送HTML信息,改这个头文件为 "text/html"
JMail.ServerAddress =SMTPServer 'SERVER的地址。可以有很多的SERVER地址，后可跟端口号
JMail.Sender = sender'邮寄的地址
JMail.Subject = subject'邮件的标题。

JMail.AddRecipient mailto'加入一个收件者

JMail.Body = msg 'UBBCode(htmlencode(MSG))E-Mail的主体

JMail.Priority = 1'邮件的优先级，可以范围从1到5。越大的优先级约高，比如，5最高，1最低,一般设置为3


JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")'addheader加入一个头信息
'remote_addr发出请求的机器的IP地址
JMail.Execute'执行邮件发送到SERVER
set jMail=nothing
if err then '检测
SendMail=err.description
err.clear
else
SendMail="OK"
end if
end function
%>
<%
'调用说明：
strHTML = "<table width=""80%"" border=""1"">" &chr(13) &chr(10) '这里需要加上两个"
strHTML = strHTML & " <tr>" &chr(13) &chr(10) 'chr(13)硬回车chr(10)软回车
strHTML = strHTML & "<td align=""center"" valign=""middle"">HELLO~!</td>" &chr(13) &chr(10)
strHTML = strHTML & "</tr>" &chr(13) &chr(10)
strHTML = strHTML & "</table>"
email="baikaishui20000@163.com"
SMTPServer="192.168.18.104:25"
sender="baikaishui20000@163.com"
subject="HEY!"
msg="<HTML><BODY><CENTER>" & strHTML & "</CENTER></BODY></HTML>"
mailto=email'收信人email

call SendMail(SMTPServer,sender,mailto,subject,msg)'调用函数
%>
错误如下：
Microsoft VBScript 编译器错误 错误 '800a03f6'

缺少 'End'

/iisHelp/common/500-100.asp，行242

jmail.SMTPMail 错误 '8000ffff'

Win32 Error. Code: 87. 参数错误。

/jmail.asp，行23

...全文
353 27 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
27 条回复
切换为时间正序
请发表友善的回复…
发表回复
baikaishui_0825 2005-03-01
  • 打赏
  • 举报
 回复
up
butcher2002 2005-02-28
  • 打赏
  • 举报
 回复
要指定smtp服务器。。

SMTPServer="192.168.18.104:25"

你指定的这个smtp服务器是否存在？是否服务器已经启动？
baikaishui_0825 2005-02-28
  • 打赏
  • 举报
 回复
up
baikaishui_0825 2005-02-28
  • 打赏
  • 举报
 回复
常见的其他组件 组 件 名 称 支持及版本
SoftArtisans.FileUp (SA-FileUp 文件上传) ×
SoftArtisans.FileManager (SA-FM 文件管理) ×
JMail.SMTPMail (JMail 邮件发送) √ 4.4
CDONTS.NewMail (CDONTS 邮件发送 SMTP Service) √ 1.2
Persits.MailSender (ASPEmail 邮件发送) ×
LyfUpload.UploadFile (LyfUpload 文件上传) ×
Persits.Upload (ASPUpload 文件上传) ×

baikaishui_0825 2005-02-28
  • 打赏
  • 举报
 回复
自己再up
mymyal123 2005-02-28
  • 打赏
  • 举报
 回复
up
baikaishui_0825 2005-02-28
  • 打赏
  • 举报
 回复
The message was undeliverable. All servers failed to receive the message
.execute()
{
Trying server mail:192.168.18.104:25
192.168.18.104:25 failed with the message: "WSAGetLastError() returned 10061, Connection refused"
No socket for server. ConnectToServer()
1 of 1 servers failed
}



baikaishui_0825 2005-02-28
  • 打赏
  • 举报
 回复
set msg = Server.CreateOBject( "JMail.Message" )


msg.Logging = true
msg.silent = true

msg.From = "test@mydomain.com"
msg.FromName = "My Realname"
msg.AddRecipient "baikaishui20000@163.com"
msg.Subject = "How you doin?"
msg.Body = "Hello Jim" & vbCrLf & vbCrLf & "How's it going? ..."


if not msg.Send( "192.168.18.104" ) then
Response.write "<pre>" & msg.log & "</pre>"
else
Response.write "Message sent succesfully!"
end if

%>
bananasmiling 2005-02-28
  • 打赏
  • 举报
 回复
要指定smtp服务器。。
JMail.Send ("smtp.sina.net")
baikaishui_0825 2005-02-28
  • 打赏
  • 举报
 回复
Simple Mail Transport Protocol (SMTP)这个服务已经启动
192.168.18.104:25
是本机的ip和端口
baikaishui_0825 2005-02-24
  • 打赏
  • 举报
 回复
up
yjb136 2005-02-23
  • 打赏
  • 举报
 回复
学习中
baikaishui_0825 2005-02-23
  • 打赏
  • 举报
 回复
up
baikaishui_0825 2005-02-23
  • 打赏
  • 举报
 回复
smtp服务器要怎么设置？
baikaishui_0825 2005-02-23
  • 打赏
  • 举报
 回复
呵呵，偶是第一次用这个，哈
我在另外一台电脑上运行这jmail没问题
但是就在偶的电脑，同样的东西，就是出错
错误如下：
Microsoft VBScript 编译器错误 错误 '800a03f6'

缺少 'End'

/iisHelp/common/500-100.asp，行242

jmail.SMTPMail 错误 '8000ffff'

The message was undeliverable. All servers failed to receive the message

/jmail1.asp，行13
bananasmiling 2005-02-23
  • 打赏
  • 举报
 回复
晕..怎么这个你都不会啊...上面是要用到邮件发送服务器的地址..用户名和密码 的..不然对方是收不到你的信的..

知道了吧..

比如:
JMail.MailServerUserName = "liuixao" '输入smtp服务器验证登陆名 （邮局中任何一个用户的Email地址） -----改
JMail.MailServerPassword = "649" '输入smtp服务器验证密码 （用户Email帐号对应的密码） -----改
JMail.Send ("smtp.sina.net") 'smtp服务器地址（mail.您的域名）-----改
mymyal123 2005-02-23
  • 打赏
  • 举报
 回复
学习
kellyrong 2005-02-22
  • 打赏
  • 举报
 回复
這應該是郵局中某個郵箱的帳戶和密碼
baikaishui_0825 2005-02-22
  • 打赏
  • 举报
 回复
再up
baikaishui_0825 2005-02-22
  • 打赏
  • 举报
 回复
JMail.MailServerUserName = "liuixao" '输入smtp服务器验证登陆名 （邮局中任何一个用户的Email地址） -----改
JMail.MailServerPassword = "649" '输入smtp服务器验证密码 （用户Email帐号对应的密码） -----改
这些在那里设置的？
加载更多回复（7）
PowerBuilder调用JMail实例
PB9调用JMail发送邮件的实例,JMail版本为4.5，需要最新JMail可到官方网下载http://www.dimac.net/
用Jmail发邮件
VC+jmail4.4组件发邮件，可以发多个附件，发邮件要密码认证
Jmail使用方法大全
现在越来越流行的Jmail使用方法介绍，Jmail的学习非常简单，但功能却十分强大。
jmail发送邮件 asp.net使用jmail
jmail　　jmail是一种服务器端的邮件发送组件，和个人用的客户端邮件软件不一样的。jmail是在服务器上给程序用来发邮件用的，除了软件编程人员，其他人一般平常用不上。 　　jmail是一个第三方邮件操作组件，通常位于web服务器端，和站点程序紧密配合来接收及提交邮件到邮件服务器的控件，让网站拥有发送邮件既接收邮件的功能 　　与此相同的还有CDONTS.NewMail,Persits.MailSender,IISmail.Iismail等等，他们唯一区别就是jmail只需要注册一个dll组件即可被调用，而其他则需要在iis上设置发布smtp服务器 　　（1）Body（信件正文） : 字符串 　　如：JMail.Body = "这里可以是用户填写的表单内容，可以取自Form。" 　　（2）Charset（字符集，缺省为"US-ASCII"） : 字符串 　　如：JMail.Charset = "US-ASCII" 　　（3）ContentTransferEncoding : 字符串 　　指定内容传送时的编码方式，缺省是"Quoted-Printable" 　　如：JMail.ContentTransferEncoding = "base64" 　　（4）ContentType（信件的contentype. 缺省是"text/plain"） : 字符串 　　如果你以HTML格式发送邮件, 改为"text/html"即可。 　　如：JMail.ContentType = "text/html" 　　（5）Encoding : 字符串 　　设置附件编码方式（缺省是"base64）。 可以选择使用的是"base64", "uuencode" or "quoted-printable" 如：JMail.Encoding = "base64" 　　（6）Log（Jmail创建的日志，前提loging属性设置为true，见下面） : 字符串 　　如：使用Response.Write( JMail.Log )语句列出日志信息。 　　（7）Logging（是否使用日志） : 布尔型 　　如：JMail.Logging = true 　　（8）Recipients : 字符串 　　只读属性，返回所有收件人 　　如：Response.Write( "" + JMail.Recipients + "" ); 　　（9）ReplyTo（指定别的回信地址） : 字符串 　　如：JMail.ReplyTo = "qiao198@hotmail.com" 　　（10）Sender（ 发件人的邮件地址） : 字符串 　　如：JMail.Sender = "qiao198@21cn.com" 　　（11）SenderName（发件人的姓名） : 字符串 　　如：JMail.SenderName = "一克" 　　（12）ServerAddress（邮件服务器的地址） : 字符串 　　你可以指定多个服务器，用分号点开。可以指定端口号。 　　如果serverAddress保持空白，JMail会尝试远程邮件服务器，然后直接发送到服务器上去。 　　如：JMail.ServerAddress = "mail.21cn.net.cn" 　　（13）Subject（设定邮件的标题，可以取自Form。）：字符串 　　如：JMail.Subject = "客户反馈表单" 　　（14）添加文件附件到邮件 　　如：JMail.AddAttachment( "c:anyfile.zip" ) 　　（15）AddCustomAttachment( FileName, Data ) 　　添加自定义附件. 　　如：JMail.AddCustomAttachment( "anyfile.txt", "Contents of file" ); 　　（16）AddHeader( Header, Value ) 　　添加用户定义的信件标头。 　　如：JMail.AddHeader( "Originating-IP","192.158.1.10" ); 　　（17）AddRecipient（收件人）：字符串 　　如：JMail.AddRecipient( "qiao198@hotmail.com" ); 　　（18）AddRecipientBCC( Email )，密件收件人： 　　如：JMail.AddRecipientBCC( "qiao198@hotmail.com" ); 　　（19）AddRecipientCC( Email ) ，抄送收件人： 　　如：JMail.AddRecipientCC( "" ) 　　（20）AddURLAttachment( URL, 文档名) 　　下载并添加一个来自url的附件. 第二个参数"文档名", 用来指定信件收到后的文件名。 　　如：JMail.AddURLAttachment( "http://www.chinabs.net/jmail.zip", "jmail" ) 　　（21）AppendBodyFromFile( 文件名) ，将文件作为信件正文： 　　如：JMail.AppendBodyFromFile( "c:anyfile.txt" ) 　　(22)AppendText( Text ) 　　追加信件的正文内容，比如增加问候语或者其它信息。 　　如：JMail.AppendText( "欢迎访问本站！" ) 　　（23）Close() ，强制JMail关闭缓冲的与邮件服务器的连接： 　　如：JMail.Close() 　　（24）发送【调用格式：objJMail.Send(SMTPServerAddress[:Port])】 　　例：JMail.Send("smtp.163.com") 　　Jmail具有以下特点： 　　（1）可以发送附件； 　　（2）详细日志能力，便于你查看问题所在； 　　（3）设置邮件发送的优先级； 　　（4）支持多种格式的邮件发送，比如说以HTML或者TXT的方式发送邮件。这是个免费的组件。 　　（5）密件发送/(CC)抄送/紧急信件发送能力； 　　（6）最关键的就是--免费的组件，不必花钱，所以非常值得使用。
jmail组件，jmail组件
jmail组件 ，最新版 ，我现在在使用
ASP

28,409

社区成员

356,971

社区内容

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages，是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章