vbajmail代理服务器
Ⅰ ASP中Jmail组件可以设置代理服务器吗
如果是设置邮箱服务器是没问题的
Ⅱ excel问题：VBA用qq邮箱可以发送邮件吗求代码
应该可以调用qq邮箱发送邮件。
我知道的有两种方法，一种是你用outlook配置好qq邮箱，然后用excelVBA调用就可以发送邮件了。
另一种下载jmail，然后excel VBA引用jmail再使用qq邮箱发送邮件。
Ⅲ jmail vba在win7中能正常发邮件，在win10中提示 ActiveX部件不能创建对象
环境：win7 64位 IIS7
接手一个01年的asp老项目，想用json死活用不起，折腾了半天。网上的方法基本都试过了，都没用。
如果你试了网上所有方法都不行 你不妨试试这个
IIS-应用程序池-你部署的asp项目-右键-高级设置-启用32为应用程序-重跑-完成。
Ⅳ PHP+JMail怎么通过代理发送邮件
需要配置一个smtp、服务器
Ⅳ 常用的服务器软件有哪些
系统相关 · Windows 2003 Sp2(微软win2003官方Sp2升级包)</A> · Windows 2000 Sp4(微软win2000官方Sp4升级包)</A> >> 服务器调试环境 · Apache v2.2.11 for windows(最好的WEB服务器之一)</A> · IIS(Internet信息服务管理器) IIS v6.0(不需要使用光盘)</A> · IIS(Internet信息服务管理器) IIS v5.0(适用win2000)</A> · .NET Framework v2.0 多国语言版(.NET环境安装)</A> · .NET Framework v3.5 简体中文版(.NET环境安装)</A> · PHP v5.3.0 for windows(独立服务器推荐使用)</A> · PHP v4.4.8 for windows(广泛用于虚拟主机)</A> · Zend Optimizer v3.3.3 for windows(运行Zend环境必备)</A> >> 常用组件 · AspEMail v5.0.0.4 特别版(ASP发信组件)</A> · Jmail Pro v4.4 特别版(ASP发信组件)</A> · AspJpeg v1.9.0.1(ASP图片水印组件) </A>· GD v2.0.34(PHP图片组件)</A> >> 数据库服务器 · SQL Server 2005 SP2 简体中文版</A> · MySQL v4.1.22 for windows 解压安装版(配合php4最稳定)</A> · MySQL v5.1.44 for windows 解压安装版(配合php5最佳)</A> >> FTP服务器 · Serv-U FTP Server v9.4.0.2 多国语言</A> · Serv-U FTP Server v8.2.0.3 多国语言官方安装版 · Serv-U FTP Server v7.4.0.1 多国语言特别版(界面变化很大)</A> · Serv-U FTP Server v6.4.0.6 汉化特别版(使用最广泛的FTP服务器)</A> >> 邮件服务器 · WinWebMail(WebEasyMail) v3.8.0.1 企业版(建立小型邮件服务器)</A> >> 代理服务器 · 遥志代理服务器(CCProxy)2010 Build 20100308(中文代理服务器)</A> >> 远程控制 · 2003 远程桌面连接</A> · windows终端连接器加强版(解决终端人数过多问题)</A> · Vista远程桌面连接</A> · PCAnyWhere v12.1 特别版(著名的远程控制软件)</A> · SecureCRT v5.5.2 特别版(可Telnet控制远程系统)</A> · WinSCP v4.2.5 多国语言版(Linux常用的FTP工具)</A> · F-Secure SSH Client v5.4.56 特别版(可远程管理win/linux)</A> · PuTTy v0.6.0(免费的telnet和ssh客户端)</A> >> Linux常用软件 · Apache v2.2.11 For Linux </A>· PHP v4.4.8 For Linux</A> · PHP v5.3.1 Released For Linux</A> · MySQL v5.1.33 For Linux</A> · Vsftp v2.0.6 For Linux(Unix/Linux安全稳定的FTP服务器)</A> >> 其它相关 · WinRAR v3.93 32Bit 汉化特别版(最常用的压缩/解压缩工具)</A> · 360安全卫士 v7.0.0.1033(将360实时保护中的ARP防火墙的主动防御改为始终启用)</A> · ARP防火墙 v4.1.1 特别版(防范ARP攻击)</A> · DU Meter v4.01 汉化特别版(服务器流量监测)</A> · LeapFTP v2.7.6.613 汉化特别版(最简单易用的FTP工具)</A> · FlashFXP v3.8 Beta1(3.7.9 Build 1348) 简体中文绿色特别版(可FXP互传的FTP工具)</A> · Recover4all Professional v3.14 汉化特别版(恢复被删除的文件)</A> · EVEREST Ultimate Edition v5.50.2109 Beta 多国语言绿色测试版(测试软硬件系统信息) · HD Tune Pro v4.01 汉化特别版(硬盘性能诊断测试) · 阿江ASP探针 v1.93</A> · phpMyAdmin v3.3.2 For Windows 官方多国语言版(WEB页面管理MySQL数据库) · 3389端口更改器 · EditPlus v3.12.540 烈火汉化绿色版 · CurrPorts v1.80 官方简体中文版
Ⅵ jmail发送大量邮件问题
当你使用自己的程序发送邮件时，pop那段会检查你的信件内容，如果大量发送相同的邮件，会把你的邮件当成垃圾抛弃。
解决方法：
1，自己做程序时每发送1条邮件时切换账户，更改ip，清空cookies，延时发送，这样可以避规。
2，联系邮件服务商，选择付费服务。
3，直接使用它们服务里自带的邮件群发服务。
祝你好运！
Ⅶ ASP表单提交 内容发送到邮箱代码
安装个Jmail组件吧，收发电子邮件很方便(目前常用的邮件收发组件)
给你个基础发信代码，记住修改部分信息（发信验证信息，你使用哪个信箱代理发信，填写好该信箱的用户名密码） 命名为sent.asp
<%response.charset="gb2312"%>
<HTML>
<BODY>
<form action="sent.asp?go=sent" method="post">
<table>
<tr><td>用户名:</td><td><input type="text" name="name" id="name" value=""></td></tr>
<tr><td>邮箱:</td><td><input type="text" name="email" id="email" value="***@msn.com"></td></tr>
<tr><td>主题:</td><td><input type="text" name="subject" id="subject" value="Jmail中文邮件发送测试" ></td></tr>
<tr><td>反馈信息:</td><td width="650">
<TEXTAREA NAME="content" ROWS="5" COLS="50"></TEXTAREA>
</td></tr>
<tr><td colspan="2" align="center"><INPUT TYPE="submit" value="提交"></td></tr>
</table>
</form>
<%
If request("go")<>"sent" Then response.End
dim CLStr,msg,mailserver,username,password,receive
CLStr=Chr(13) & Chr(10)
'请在此修改相关信息
mailserver="smtp.163.com" '邮局服务器地址（smtp服务器地址）
username="***@163.com" 'smtp服务器验证登陆名（用来做为代发邮件的地址）
password="*****" 'smtp服务器验证密码 （信箱密码）
receive="***@qq.com" '接受反馈信息的email地址（用来接收邮件的信箱）
'修改结束
Set msg = Server.CreateObject("JMail.Message")
msg.Charset = "gb2312"
msg.logging = true '启用邮件日志
msg.silent=True'屏蔽例外错误，返回False或True
'msg.ContentType = "text/html"'邮件的格式为HTML格式
msg.Priority = 1 '邮件等级，1为加急，3为普通，5为低级
msg.MailServerUserName = username
msg.MailServerPassword = password
msg.From = username
msg.FromName = username
msg.AddRecipient (receive)
'msg.AddURLAttachment " http://192.168.159.1/Jmail/1.xls","毕业设计论文目录.xls",True
msg.Subject = "网站在线反馈:"&Request.Form("subject")
msg.HTMLBody = "网站在线反馈"&CLStr&CLStr
msg.HTMLBody = msg.HTMLBody&"<br>对方姓名:"&Request.Form("name")&CLStr
msg.HTMLBody = msg.HTMLBody&"<br>对方信箱:"&Request.Form("email")&CLStr
msg.HTMLBody = msg.HTMLBody&"<br>留言内容:<br>"
msg.HTMLBody = msg.HTMLBody&"<div style='font:9pt;background-color:#eeeeee'>"&Request.Form("content")&CLStr
msg.HTMLBody = msg.HTMLBody&"</div>"
If msg.Send (mailserver) Then
Response.Write(" <script language=javascript>alert('发送成功');location='sent.asp'</script>")
else
Response.Write(" <script language=javascript>alert('发送失败，请仔细检查邮件服务器的设置是否正确！') </script>")
End If
msg.close
set msg = nothing
%>
<p>邮件发送成功，谢谢使用</p>
</BODY>
</HTML>
Ⅷ excel,vba,邮件
Excel里发邮件试试 Jmail 这个组件吧，最新版为4.5，完全免费，只有314K大，功能比Outlook强大，而且好用，不会出错。有兴趣的话可以给你一个Excel做好的邮件发送程序。
Function JmailSend(Subject, Body, isHtml, HtmlBody, MailTo, RecipientCC, RecipientBCC, From, FromName, Smtp, Username, Password, IsAF, AttachFile1, AttachFile2, AttachFile3, AttachFile4, AttachFile5)
'=================================================
'函数名：JmailSend
'作 用：用Jmail发送邮件
'参 数：Subject 邮件标题
' Body 邮件内容
' isHtml 是否发送Html格式邮件 (True 是)
' HtmlBody Html格式邮件内容
' MailTo 收件人Email
' From 发件人Email
' FromName 发件人姓名
' Smtp Smtp服务器
' Username 邮箱用户名
' Password 邮箱密码
' IsAF 是否有附件,逻辑值
' AttachFile 附件路径
'返回值：JmailSend="N" 发送失败 JmailSend="Y" 发送成功
'=================================================
Dim JmailMsg
'Set JmailMsg = server.CreateObject("jmail.message")
Set JmailMsg = New jmail.Message
JmailMsg.MailServerUserName = Username '如果是在局域网中可以不要验证
JmailMsg.MailServerPassWord = Password
JmailMsg.Logging = True '是否使用日志
Arymailto = Split(MailTo, ",")
For i = 0 To (UBound(Arymailto) - 1) / 2
JmailMsg.AddRecipient Trim(Arymailto(i * 2 + 1)), Trim(Arymailto(i * 2)) '添加收件人
Next
If RecipientCC <> "" Then
AryCC = Split(RecipientCC, ",")
For i = 0 To (UBound(AryCC) - 1) / 2
JmailMsg.AddRecipientCC Trim(AryCC(i * 2 + 1)), Trim(AryCC(i * 2)) '添加抄送地址
Next
End If
If RecipientBCC <> "" Then
AryBCC = Split(RecipientBCC, ",")
For i = 0 To (UBound(AryBCC) - 1) / 2
JmailMsg.AddRecipientBCC Trim(AryBCC(i * 2 + 1)), Trim(AryBCC(i * 2)) '添加密送地址
Next
End If
JmailMsg.From = From
JmailMsg.FromName = FromName
JmailMsg.Encoding = "base64" '设置编码
JmailMsg.Charset = "gb2312"
JmailMsg.Priority = 1 '设置邮件的优先级
JmailMsg.Silent = True '安静模式
JmailMsg.Subject = Subject
JmailMsg.Body = Body
If IsAF Then '邮件是否有附件
If AttachFile1 <> "" Then
JmailMsg.AddAttachment (AttachFile1) '附件
End If
If AttachFile2 <> "" Then
JmailMsg.AddAttachment (AttachFile2) '附件
End If
If AttachFile3 <> "" Then
JmailMsg.AddAttachment (AttachFile3) '附件
End If
If AttachFile4 <> "" Then
JmailMsg.AddAttachment (AttachFile4) '附件
End If
If AttachFile5 <> "" Then
JmailMsg.AddAttachment (AttachFile5) '附件
End If
End If
If isHtml = True Then JmailMsg.HtmlBody = HtmlBody
If Not JmailMsg.Send(Smtp) Then
JmailSend = "N"
Else
JmailSend = "Y"
End If
JmailMsg.Close
Set JmailMsg = Nothing
'MsgBox (JmailSend) '测试时可以用
End Function