qt1982

将如下代码保存成“163邮箱快捷登录入口.vbs”

复制内容到剪贴板

代码:

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

宇尘

呵呵，感谢分享，可惜没看懂哦。

qt1982

根据提示操作就是了。