批处理之家 - Powered by Discuz! Board

标题: [网络连接] [已解决]批处理如何自动输入宽带连接用户名和密码？ [打印本页]

作者: manhua 时间: 2010-11-18 16:22 标题: [已解决]批处理如何自动输入宽带连接用户名和密码？

每次出外网都要登录网关输入用户名和密码。很麻烦
请大家帮忙写个批处理，以后搞成计划任务，一开机就登录了。

作者: sky02 时间: 2010-11-18 18:47

用VBS方便会一点．

作者: manhua 时间: 2010-11-19 10:27

没有人可以帮忙吗？

作者: leap 时间: 2010-11-19 11:48

浏览器有自带的自动填表功能，如360浏览器在工具》自动填表

作者: manhua 时间: 2010-11-19 17:08 标题: 回复 4楼的帖子

我知道我想了解这方面的东西 IP都在上面的以后会用到这方面的

作者: broly 时间: 2010-11-19 20:08

这个是一个软件还是一个网页登陆页面？
网页登陆页面，请把源码发出来

作者: manhua 时间: 2010-11-20 19:42 标题: 回复 6楼的帖子

我已经上传上来了，在附件里面。是个WEB页面。

[ 本帖最后由 manhua 于 2010-11-20 19:50 编辑 ]

作者: broly 时间: 2010-11-20 21:17

Dim ie
Set ie = CreateObject("InternetExplorer.Application")
ie.Visible = True
 '把http:\192.168.1.1换成你的网页地址
ie.Navigate "http:\192.168.1.1"
While ie.Busy Or ie.ReadyState <> 4
  WScript.Sleep 200
Wend
'把YourName换为你的用户名
ie.Document.getElementbyId("DDDDD").value="YourName" 
'把YourPassword换成密码
ie.Document.getElementbyId("upass").value="YourPassword" 
WScript.Sleep 500
ie.Document.getElementbyId("0MKKey").click
Set ie = nothing
复制代码

作者: broly 时间: 2010-11-20 21:18 标题: 回复 7楼的帖子

注意，楼上代码的前提是默认浏览器是IE

作者: broly 时间: 2010-11-20 21:23

原帖由 sky02 于 2010-11-18 18:47 发表
用VBS方便会一点．

PS：说点题外话。2L的哥们，16帖就是少校了，牛

作者: manhua 时间: 2010-11-22 09:43 标题: 回复 10楼的帖子

谢谢看来真的只有用VB了

欢迎光临批处理之家 (http://bbs.bathome.net/)