vbs实现web自动登录网站

背景:我们的电脑需要开机登录一个网址输入信息才能够上网,这样对远程的话,很不友好。因此查了查vbs可以进行开机在网页上自动登录,实现开机联网。(不同的网页使用的登录方法是不同的,下面的仅作参考)
环境:window10专业版

一,编写vbs
网页其中DDDDD是账号的位置,upass为密码,我在网上看的一些方法对于我这个并不适用,因此就结合他们的自己改了改。(有些代码是猜的之前没接触过vbs)
在这里插入图片描述
在上面的情况下使用如下的代码登录(可以先创建一个txt文件之后将后缀改为vbs,如果看不到后缀,需要打开查看中的文件拓展名,就像本文的最后一个图一样)

Dim username,password,IE,dom,form,Shell
username = "*****"
password = "*****"
Set IE =CreateObject("InternetExplorer.Application")
ie.FullScreen=0
IE.Visible = True
IE.Navigate "http://10.20.3.2/"
Do while IE.ReadyState<> 4 or IE.busy
wscript.sleep 2000
loop
IE.document.f3.DDDDD.value=username
IE.document.f3.upass.value=password
IE.document.f3.onsubmit

其中http://10.20.3.2/是你要登录网站的网址,其中的f3是form的name,f3.DDDDD是在form表下面的账号的name,f3.upass是form下面的密码的name。(我一直想用f3.0MKKey表示那个登录按钮,但是不知道怎么用,后来试着发现onsubmit也可以当作提交登录)
如果想让它自动退出,可以在最后加两句

wscript.sleep 2000
IE.quit

二,配置为开机自启
这个比较简单,只需要将这个vbs文件放到下面目录中就可以了。
C:\ProgramData\Microsoft\Windows\Start Menu\Programs\StartUp
(注意ProgramData是个隐藏文件夹,想要显示隐藏文件夹可以打开查看中的隐藏的项目,如下图所示)
在这里插入图片描述

评论 7
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值