① 我用CDO做了个发邮件的,但发送不成功,只是在发送者的垃圾邮件里有,这是为什么
有没有试过换过邮箱地址试试。发送者的垃圾箱里是发出去了还是没有发出去哦。好像没有邮件服务器的地址啊。
msg.Send ("smtp.163.com") ?
② JMAIL发送邮件错误为什么急求高手帮忙解答,mail:[email protected]
环境说明100%OK了
那就是JMAIL或WEB服务器的问题
你是 SERVER 08 64位吗?
如果是64位机器
在IIS7里面把 网站所在进程池 设置为强制使用32位运行
③ 关于asp下的jmail发送邮件的问题
有关stmp服务器,如果你是想用你自己的服务器来做一个STMP服务器,请参阅下面的文章进行设置:
http://www.360doc.com/content/09/0924/12/32573_6370328.shtml
如果你只想用你的普通邮箱(比如163的,yahoo的,163的其实很好用)来发邮件,按下面的函数中相关设置修改一下就可以了。
下面是我以前用过的一个JMAIL邮件发送函数,有关你想知道的参数都作了示例:
'===============================
'SendSGMail:Sgiy邮件发送(Jmail)
'ToEMail/收信人地址
'ToName/收信人姓名
'ToSubject/主题(HTML/文本)
'ToHtmlBody/信件内容
'===============================
Function SendSGMail(ToEMail,ToName,ToSubject,ToHtmlBody)
Dim SendMail_Mail,SendSmtp_Name,SendLogin_Name,SendSave_EmailPass
SendMail_Mail = "[email protected]"'回复地址示例
SendSmtp_Name = "sptp.123.com"'SMTP服务器(smtp.abc.com)
SendLogin_Name = "[email protected]"'登录用户名示例
SendSave_EmailPass = "123456"'登录密码示例
Dim JMail
Set JMail=Server.CreateObject("JMail.Message")
If Err Then
SendMail= "<br><li>没有安装JMail组件</li>"
Err.Clear
Exit Function
End if
JMail.Charset="GB2312"
JMail.silent=true
JMail.ContentType = "text/html"
'JMail.ServerAddress=""'发送邮件的SMTP服务器(不需STMP验证时)
'如果服务器需要SMTP身份验证则还需指定以下参数
JMail.MailServerUserName = SendLogin_Name
JMail.MailServerPassWord = SendSave_EmailPass
'JMail.MailDomain = ""'若以[email protected]式用户名登录时请指明domain.com
JMail.AddRecipient ToEMail,ToName
JMail.Subject = ToSubject
JMail.HMTLBody = ToHtmlBody
JMail.Body = ToHtmlBody
JMail.FromName = "我的名字"'发信人名
JMail.From = SendMail_Mail'回复地址
JMail.Priority = 1'优先级/1/3/5
JMail.Send(SendSmtp_Name)
SendMail = JMail.ErrorMessage
JMail.Close
Set JMail = Nothing
End Function
④ mymail.dll 怎么给多个邮箱发邮件
申明Local External Functions:
function int MyUtil_SMTP_Connect(string host,int port,string UserId,string PassWord) library "MyMail.dll"
function int MyUtil_SMTP_Disconnect() library "MyMail.dll"
function int MyUtil_SMTP_Msg_Init() library "MyMail.dll"
function int MyUtil_SMTP_Msg_SetInfo(int i_type,int i_sub_type,string as_text) library "MyMail.dll"
function int MyUtil_SMTP_Msg_Send() library "MyMail.dll"
发送代码:
//使用例程:
string ls_host,ls_user,ls_pwd,ls_mail_to,ls_mail_cc,&
ls_subject,ls_text,ls_mail_fr,ls_attach
int li_port,li_ret
ls_host=trim(sle_host.text) //服务器名
ls_user=trim(sle_user.text) //发件人登陆发件服务器时的用户名
ls_pwd=trim(sle_password.text) //发件人登陆发件服务器时的密码
li_port=integer(sle_port.text) //发送服务器的smtp端口号,没改的话一般是25
ls_mail_to=trim(sle_mail_to.text)//接收人email地址
ls_mail_cc=trim(sle_mail_cc.text)//抄送,好像有点问题,我没有成功
ls_subject=sle_subject.text //主题
ls_mail_fr=trim(sle_mail_fr.text) //发件人
ls_text=mle_text.text //正文
ls_attach=trim(sle_attach.text) //附件,多个的话要分开
setpointer(hourglass!)
//邮件初始化:
if MyUtil_SMTP_Msg_Init()<0 then
MessageBox("info","初始化失败!!!");
end if
if MyUtil_SMTP_Msg_SetInfo(1,1,ls_mail_fr)<0 then
MessageBox("info","设置发送者信息出错!!!")
end if
if MyUtil_SMTP_Msg_SetInfo(1,2,ls_user)<0 then
MessageBox("info","设置发送者名称出错!!!")
end if
if MyUtil_SMTP_Msg_SetInfo(2,1,ls_mail_to)<0 then
MessageBox("info","设置接收者地址出错!!!")
end if
//if MyUtil_SMTP_Msg_SetInfo(2,1,ls_mail_cc)<0 then
//
MessageBox("info","设置接收者地址出错!!!")
//end if
if MyUtil_SMTP_Msg_SetInfo(3,1,ls_subject)<0 then
MessageBox("info","设置主题出错!!!")
end if
if MyUtil_SMTP_Msg_SetInfo(5,1,ls_text)<0 then
MessageBox("info","设置正文失败!!!")
end if
if MyUtil_SMTP_Msg_SetInfo(6,1,ls_attach)<0 then
MessageBox("info","设置附件名称出错!!!")
end if
if MyUtil_SMTP_Connect(ls_host,li_port,ls_user,ls_pwd)<0 then
messageBox("info","连接失败!")
end if
if MyUtil_SMTP_Msg_Send()<0 then
MessageBox("info","发送失败!")
else
Messagebox('Info','发送成功!')
FileDelete ( ls_attach )
end if
if MyUtil_SMTP_Disconnect()<0 then
MessageBox("info","断开失败!!!")
end if
setpointer(arrow!)
⑤ 我的网站是ASP的,别人在网站上留言后,我在后台回复后,让别人邮箱能收到邮件提醒的这个功能,要怎么弄
可以自动实现,有那种asp发邮件的程序包,可以调用。会自动发邮件给他留下的邮箱里面。以前弄过的,不过好像忘了,嘿嘿,得自己找找啦。度娘有