|
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
状态 离线
|
|
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 |
|
|