中国DOS联盟论坛

中国DOS联盟

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

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

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
作者:
标题: 求一个收163信箱附件的vbs 上一主题 | 下一主题
xswdong
中级用户





积分 216
发帖 129
注册 2007-2-14
状态 离线
『楼 主』:  求一个收163信箱附件的vbs

在论坛搜了许久,没有发现类似的帖子,清高手帮忙做一个,相信很多人会赶感兴趣的,在此先谢谢了

2007-5-1 21:43
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
bjsh
银牌会员





积分 2000
发帖 621
注册 2007-1-1
状态 离线
『第 2 楼』:  

vbs没想过..
不过用批处理倒是可以实现...

2007-5-2 10:57
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
xswdong
中级用户





积分 216
发帖 129
注册 2007-2-14
状态 离线
『第 3 楼』:  

自己先顶以下,批处理也行啊,这个脚本很难实现吗?咱们论坛高手如云,相信有人可以做出来.我的vbs不是很熟,只能做到登陆
set ws=wscript.createobject("wscript.shell")
ws.run "C:\Progra~1\Intern~1\iexplore.exe mail.163.com"  
wscript.sleep 2000
ws.sendkeys("{BKSP 18}")
wscript.sleep 200
ws.sendkeys("邮箱名")
wscript.sleep 100
ws.sendkeys("{tab}")
wscript.sleep 100
ws.sendkeys("密码")
ws.sendkeys("{enter}")

2007-5-3 10:45
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
xswdong
中级用户





积分 216
发帖 129
注册 2007-2-14
状态 离线
『第 4 楼』:  

真的没人会做吗

2007-5-4 11:09
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
bjsh
银牌会员





积分 2000
发帖 621
注册 2007-1-1
状态 离线
『第 5 楼』:  

放五一了吧;人们都不在呢;
对vbs不大熟悉...
觉得只是类似代替手工的 sendkeys 实在没什么技术含量..

批处理看了下倒是可以写出来..
不过最近没多少时间..不能去写了...

只在这里 贴出点材料  根据需要自行去写吧;;

以后论坛也会经常 贴出些有用的材料 ..根据 "材料" 写 批处理..

这个收邮件附件的就用 pop3 来做了;
根据pop3的材料 写一个 "文本" 用nc > pop.163.com 的110端口
当然就是获取到 附件的base64编码然后分离出来 然后 解码 了;
文件名也可以取得并重命名;
至于判断新邮件的问题可以把 邮件的 ID 保存在本地以备对比..

关于pop3有以下材料..

  Quote:
→→→→→→→telnet收邮件

注意:所有响应+OK (ok) or -ERR (no)   

1.连接→telnet pop.163.com 110

2.用户名→user ****

3.密码→pass ****

4.验证ok后,终端会显示如下信息:
+OK 60 message(s) [72208371 byte(s)]
数字60表示有60封邮件,72208371表示这60封邮件总的字节数(即72208371B)

这时可使用的命令如下:

1.stat命令 格式:stat 无需参数

stat命令,查看统计,执行后,POP3服务器会响应一个正确应答,它以“+OK”开头,接着是两个数字,第一个是邮件数目,第二个是邮件的大小

2.list命令 格式:list [n] 参数n可选,n为邮件编号

list命令,查看邮件列表,可以利用不带参数的list命令,获得各邮件的编号,并且每一封邮件均占用一行显示,前面的数为邮件的编号,后面的数为邮件的大小

3.uidl命令 格式:uidl [n] 参数n可选,n为邮件编号   后面的内容什么意思???

uidl命令,与list同,不过显示邮件的信息比list更详细,更具体

4.retr命令 格式:retr n 参数n不可省,n为邮件编号

retr命令,查看邮件的内容

5.dele命令 格式:dele n 参数n不可省,n为邮件编号

dele命令,删除指定的邮件(注意:dele n命令只是给邮件做上删除标记,只有在执行quit命令之后,邮件才会真正删除)

6.top 命令 格式:top n m 参数n,m不可省,n为邮件编号,m为行数

top命令,读取指定邮件正文的行数,如果m=0,则只读出邮件的邮件头部分

7.noop命令 格式:noop 无需参数

noop命令,该命令发出后,POP3服务器不作任何事,仅返回一个正确响应"+OK"

8.quit命令 格式:quit 无需参数

quit命令,该命令发出后,telnet断开与POP3服务器的连接,系统进入更新状态



--------------------------------------------------------------------------------

[ Last edited by bjsh on 2007-5-4 at 12:13 PM ]

2007-5-5 01:12
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
xswdong
中级用户





积分 216
发帖 129
注册 2007-2-14
状态 离线
『第 6 楼』:  

telnet,我用过,可看到正文,附件为乱码,而我要的是附件.还是谢谢斑竹提供的思路

2007-5-5 22:04
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
bjsh
银牌会员





积分 2000
发帖 621
注册 2007-1-1
状态 离线
『第 7 楼』:  

上面已经说过了;
附件不是乱码;而是附件的base64编码;
获取附件就是先获取那堆 你所谓的 "乱码";
然后用 base64 来解码;
后缀取自 所获得的 附件名 ..

2007-5-5 22:42
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
sonicandy
中级用户





积分 273
发帖 91
注册 2007-5-7
状态 离线
『第 8 楼』:  

是要下载所有的附件吗?还是可以用列表选择的?

2007-5-7 19:00
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
xswdong
中级用户





积分 216
发帖 129
注册 2007-2-14
状态 离线
『第 9 楼』:  

是下载某个附件,当然用列表更好了.

2007-5-9 22:41
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
vkill
金牌会员





积分 4103
发帖 1744
注册 2006-1-20
来自 甘肃.临泽
状态 离线
『第 10 楼』:  

用bat完全可以~bjsh兄的那样做可以~我试了

不过写不出通用的,因为每个发信器发出的邮件正文都不规则,很不好找规律,只有对症下药

[ Last edited by vkill on 2007-5-11 at 12:58 PM ]

2007-5-11 12:18
查看资料  发送邮件  访问主页  发短消息 网志   编辑帖子  回复  引用回复

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


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



论坛跳转: