“未来的世界：方向比努力重要，能力比知识重要，健康比成绩重要，生活比文凭重要，情商比智商重要！ ”
——清华大学校长留给毕业生的一段话
妙用SendKeys自动上网并登陆博客3
上一篇 /
下一篇 2007-05-21 23:22:29
_| ~k
yl0将下面的脚本复制到一个文本文件中，并将其文件名命名为：自动登陆.vbs，然后将拨号软件及本脚本一起复制到程序——启动项中，就可以实现自动拨号上网，并登陆到博客上。
^o'?$d%^&X~ KD4E0
f:_G
?V3Ac6Xl+e[0代码如下：51Testing软件测试网3bA.aX JF%O&W
51Testing软件测试网 m
Z%[h&~#_%lSet wshshell=CreateObject("wscrīpt.shell")51Testing软件测试网6l(RM ph-\ B-L
wshshell.AppActivate "连接 MAE-301U 拨号连接"
-l l4_RRb%{(N?4v0wscrīpt.Sleep 2000051Testing软件测试网b Tc
U
o
wshshell.SendKeys "{enter}"51Testing软件测试网D#N.BmXyY
wshshell.Run "iexplore"51Testing软件测试网/?4`$K)u#Hg!B1\'ux
Wscrīpt.Sleep 2000
}6H*QoL P7y0wshshell.AppActivate "hao123网址之家---实用网址,搜索大全,尽在www.hao123.com - Microsoft Internet Explorer" '引号中的内容修改为你的浏览器打开后标题栏中的内容
a_+]1AF,m:f
`z0wshshell.SendKeys "%d"
n|,Dqp3D0wshshell.SendKeys "http://passport.baidu.com/?login"51Testing软件测试网/cvDX"`4cX
wshshell.SendKeys "{enter}"51Testing软件测试网 u(t-i E g]v
r
Wscrīpt.Sleep 2000
'p{Q1i/u1y%F0wshshell.SendKeys "此处修改为博客帐号"51Testing软件测试网A!A7l9I5e1A^
e6Or
wshshell.SendKeys "{tab}"
"p-b'M)i
I;xlz0wshshell.SendKeys "此处修改为博客密码"
V];hy'nYxQ0wshshell.SendKeys "{enter}"
J l6v*XY2`9i O0'wshshell.SendKeys "%d"51Testing软件测试网V0K/h|T
收藏
举报
TAG:
