“未来的世界：方向比努力重要，能力比知识重要，健康比成绩重要，生活比文凭重要，情商比智商重要！ ”
——清华大学校长留给毕业生的一段话
妙用SendKeys自动上网并登陆博客3
上一篇 /
下一篇 2007-05-21 23:22:29
51Testing软件测试网*\!B,}
E e8y:\-}将下面的脚本复制到一个文本文件中，并将其文件名命名为：自动登陆.vbs，然后将拨号软件及本脚本一起复制到程序——启动项中，就可以实现自动拨号上网，并登陆到博客上。51Testing软件测试网v$e;U { S.f
51Testing软件测试网A wtG$h`'p:h d e代码如下：51Testing软件测试网a_"UO{8O
51Testing软件测试网F
F ]0zg vSet wshshell=CreateObject("wscrīpt.shell")
Q
A?8DC(r&h:Da
M1q0wshshell.AppActivate "连接 MAE-301U 拨号连接"51Testing软件测试网
l]d1XxS
wscrīpt.Sleep 2000051Testing软件测试网-V2l:Q+r#S%yT5mn
wshshell.SendKeys "{enter}"51Testing软件测试网,n:v!C6E3YG j'm0\+z
wshshell.Run "iexplore"
4ah7}(\U6](O Q0Wscrīpt.Sleep 200051Testing软件测试网Wb
h.k |W9z
wshshell.AppActivate "hao123网址之家---实用网址,搜索大全,尽在www.hao123.com - Microsoft Internet Explorer" '引号中的内容修改为你的浏览器打开后标题栏中的内容
-\8t-_2n\ w%Gn"y3_4?0wshshell.SendKeys "%d"
e Lk+n6Ie0wshshell.SendKeys "http://passport.baidu.com/?login"51Testing软件测试网^
r(aE1D ]7Vu b4wl
wshshell.SendKeys "{enter}"51Testing软件测试网 gb-i8?%bkX}
Wscrīpt.Sleep 200051Testing软件测试网^ l(K]I2V
wshshell.SendKeys "此处修改为博客帐号"51Testing软件测试网 Cws V&@*l
wshshell.SendKeys "{tab}"51Testing软件测试网^P1Y3Xg
wshshell.SendKeys "此处修改为博客密码"51Testing软件测试网:T3d%[;Hy Xc:i ~ b
wshshell.SendKeys "{enter}"51Testing软件测试网$d%}2^[:n {4_
'wshshell.SendKeys "%d"
/b [].C,|E @!Q g0
收藏
举报
TAG:
