中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 用VbScript 实现自动发送邮件

uditx
新手上路

积分 1
发帖 1
注册 2010-9-10
状态离线

『楼主』: 用VbScript 实现自动发送邮件

用VbScript 实现自动发送邮件...

1. 打开记事本或者其它文本编辑软件，输入如下代码：

Set OLA=CreateObject("Outlook.Application")

on error resume next

Set Mail= OLA.CreateItem(0)

Mail.To=" testing@163.com "

Mail.Subject="邮件标题 ..."

Mail.Body="邮件详细内容..."

'c:\Send Mail\testing.Xls 为附件路径

Mail.Attachments.add("c:\Send Mail\testing.xls")

Mail.Send

Set OLA=Nothing

OLA.Quit

2. 将文件另存为SendMail.vbs 文件.

3. 打开记事本或者其它文本编辑软件，输入如下代码：

@echo off

wscript SendMail.vbs

4. 将文件另存为SendMail.bat 文件.

5. 将批处理文件SendMail.bat在控制面板的任务管理里面设定定时执行的时间.

6. 完成了上面的步骤你还需要下载一个软件: ClickYesSetup.exe ,使之处于运行状态...

一切OK!!!

2010-9-13 21:58

请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。

可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题

论坛跳转: