用vbs登录163邮箱

dim user,pw
user =inputbox("请输入你的邮箱用户名")
pw = inputbox("请输入邮箱密码")
Set ie = CreateObject("internetexplorer.application")

ie.navigate "http://mail.163.com/"

ie.Visible = true

While ie.busy Or ie.readystate <> 4

Wend

ie.document.login163.username.Focus

ie.document.login163.username.value=user

ie.document.login163.password.Focus

ie.document.login163.password.value=pw

ie.document.login163.seltype.options.selectedIndex=2

ie.document.login163.btn1.click
原文来自:http://jzjk.cn/bbs/viewthread.php?tid=12443

关键词:vbs邮箱

转载原创文章请注明,转载自晴天博客,原文地址:http://www.qt06.com/post/99/

上一篇:一盆眼泪

下一篇:千千静听5.2晴天特别版

评论: