程序功能:1:发邮件:填上对方的地址就可发送。2:从E-MAIL服务器读取自己的邮件列表,比如自己在新浪有一个邮箱,只要填上自己的邮箱名字和密码就可以登陆,并且权限和登陆新浪自己的邮件系统一样。现在迷惑的是 不知道用什么手段实现!请详细概括一下,谢谢!
解决方案 »
- 问一下:强制类型转换的原理
- Image组件加载图片出现错误后如何让程序继续正常的运行?
- 求两个日期时间函数
- dxDBedit控件的问题
- 真的就没人会吗?请教高手:在一个Panel里怎么显示另外一个EXE文件?或OCX文件?在线等待!
- 帮忙up也送分:CORBA开发中,irep.exe的使用——长久的困惑!!
- G.723.1播放方案征集!如果有成熟方案可以考虑商务购买问题!up有分。
- 我需要一份兼职的工作
- 又是怪事,ADOTable1、ADOTable2;设置前一个是主表,后一个是从表,Lock Type设置都为ltBatchOptimistic,运行输入数据后,执行DataModu
- 如何将EXE程序及DLL程序全部[嵌入]到“网页”中
- 郁闷,三层系统数据提交总是出错!
- 请问关于DBGrid的两个问题!(50)
基于Indy的Email发送组件源码 [下载]
用法示意如下:
<%@LANGUAGE="VBSCRIPT"%>
<%
'option explicit
dim DbConn,connstr,db
'Email配置信息
dim SmtpHost, AdminName, AdminEmail, NeedAuth, EmailAccount, EmailPW
SmtpHost="smtp.263.net"
AdminEmail="[email protected]"
NeedAuth=true '是否需要认证
EmailAccount="hubdog"
EmailPW="XXXX"
AdminName="管理员"
'发送email
function SendMail(Email, Subject, Body)
set MailSender=Server.CreateObject("IndyMail.MailSender")
MailSender.SetBody Body
MailSender.SetFrom """"+AdminName+""" <"+AdminEmail+">"
MailSender.SetHost SmtpHost
MailSender.SetAuth NeedAuth
MailSender.SetSenderName EmailAccount
MailSender.SetSenderPW EmailPW
MailSender.SetSubject Subject
MailSender.SetTo Email
SendMail=MailSender.Send
end function
%>