设为首页
加入收藏
站内地图
旧版入口
当前位置:首页 > 站长学院 > 网络编程 > ASP

asp结合利用SQL群发简单邮件。

作者:佚名 出处:网络转载 时间:02-15 点击:

内容载入中...
华腾联合陪你一路学习 上学堂

测试环境:

1 Windows 2000 Server
2 SQL Server 2000+SP3
3 Microsoft Outlook (Office 2000)

准备一个Internet邮件帐户:
测试电子邮件帐户:test@163.com
Smtp服务器 smtp.163.com
pop3服务器 pop.163.com

步骤一: 更改电子邮件配置

1 打开Microsoft Outlook 单击“工具”菜单中的“选项”,然后单击“邮件服务”选项卡。
2 单击“重新配置邮件支持”。
3 选择“用于企业或工作组”选项
4 重新启动Microsoft Outlook

步骤二: 添加配置文件

说明:如果之前您已经通过控制面版->邮件 选项添加过配置文件(比如,配置文件名:test),可省略以下1、2、3操作步骤


1 单击“工具”菜单中的“服务”,然后单击“添加”按钮。
2 选择"Internet 电子邮件",单击“确定”。
3 下面的步骤是设置电子邮件帐号,请参考Microsoft Outlook帮助文件,这里不再赘述。
4 利用配置好的电子邮件帐号收发邮件,确认配置成功。

步骤三: 配置MSSQLSERVER服务采用邮件配置文件

1 重新启动MSSQLSERVER服务(必须的,否则MSSQLSERVER服务检测不到上一步骤添加的配置文件)
2 打开企业管理器->展开服务器->支持服务->右击"邮件"->点击下拉框,你会发现
"Microsoft Outlook Internet Settings"选项(如果您通过控制面版->邮件 选项添加过配置文件,比如:配置文件名:test,那您将会发现 test选项),选中您配置好的配置文件,点击"测试".
如果弹出表示成功的对话框,那恭喜你,已经 大功告成了.

步骤四:享受你的劳动成果

要求以MSSQLSERVER服务采用的Windows帐号登录Windows 2000 Server,即你登录计算机所采用的帐号要和MSSQLSERVER服务采用的Windows帐号相同。
1 打开SQL Server的查询分析器

2 输入下列SQL语句,执行
exec master..xp_sendmail 'test@163.com','Hello,World!'

3 好了,去你的邮箱收邮件去吧!

然后:
用asp调用

测试:User ID=test要添加对master数据库的访问权限。

<%
dim cn,rs,SQL
set cn=server.CreateObject("adodb.connection")
cn.Open "Provider=SQLOLEDB.1;Password=1234;Persist Security Info=True;User ID=test;Initial Catalog=pubs;Data Source=WOLF"
SQL ="exec master..xp_sendmail 'wolf@sohu.com','Hello,World!'"
set rs=cn.Execute(SQL)
set rs=nothing
set cn=nothing
 %>

可以创建job,对一个mail表进行群发,--结果写到网站C:\web文件里面,用asp来察看进度。

USE  testDB
DECLARE @mail varchar(50)
DECLARE wolf_Cursor CURSOR FOR SELECT  [email] FROM [testDB].[dbo].[email_TB]
OPEN wolf_Cursor


FETCH NEXT FROM wolf_Cursor into @mail
WHILE @@FETCH_STATUS = 0
BEGIN
--发email
   EXEC master..xp_sendmail @mail, '哈哈'
--结果写到网站C:\web文件里面,写网页文件或者XML参考 sp_makewebtask
 
  
FETCH NEXT FROM wolf_Cursor into @mail
END
CLOSE wolf_Cursor
DEALLOCATE wolf_Cursor

收藏本文:
】【打印页面】【推荐给朋友】【关闭窗口

站长学院

推荐信息