![]() |
中国DOS联盟-- 联合DOS 推动DOS 发展DOS --联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum |
| 游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟 |
|
中国DOS联盟论坛 现在时间是 2026-08-12 00:44 |
共 47,811 主题排行 / 349,897 发帖 / 今日 0 篇 / 48,256 会员排行 |
| DOS批处理 & 脚本技术(批处理室) » [已解决]网页表单密码破解的脚本编写问题 |
| 可打印版本 1,144 / 4 |
| 第1楼 churui007 | 发表于 2010-08-06 18:07 |
| 新手上路 发帖 12 积分 12 | |
|
[已解决]网页表单密码破解的脚本编写问题 因为批处理解决不了,所以就用脚本了,但是由于刚接触,很多问题无法解决,希望高手能指点下。
下面是以路由器为范例的登陆脚本。 Set ie = CreateObject("InternetExplorer.Application") ie.Navigate "http://192.168.1.1/" ie.Visible = True While ie.Busy or ie.ReadyState <> 4:Wend ie.Document.loginData.UserName.value = "admin" ie.Document.loginData.Password.value = "admin" ie.Document.loginData.Submit While ie.Busy or ie.ReadyState <> 4:Wend ie.Document.loginData.UserName.value = "admin" ie.Document.loginData.Password.value = "admin1" ie.Document.loginData.Submit WSH.Sleep 1000 解决不了的问题: 1.脚本如何判定登陆成功? 2.登陆成功后如何实现跳转,就是goto那种,但是好像脚本不支持? 我的思路是:上面的脚本如果前一个密码尝试正确,那么下一个密码就会出现脚本错误。能否利用这个错误判断进行跳转,一出现错误,然后把上一个尝试的密码写到密码保存文本内呢? 虽然没写出来破解脚本,我还是想了想优化方面的问题,省的最后还得问: 1.脚本能不能写成命令行下运行的格式: 比如:脚本.vbs 网址 2.账号密码能不能采用字典的方式? 诚心找高手指教,谢谢! 谢谢二楼来说句话,只是我对vbs怎么实现goto很疑惑,这应该跟网络没什么关系吧。应该懂vbs就能指点了吧?谢谢谢谢了! 谢谢slore,额,但是vbs知识实在少,还是vbs+bat解决了,虽然麻烦和乱了点,功能是不缺的。 关于判断登陆成功,我还是靠我的思路解决了,毕竟靠获取ie对象对我有点难度。 用下面这两句完美解决 on error resume next if err.number <> 0 then [ Last edited by churui007 on 2010-8-8 at 10:02 ] |
|
| 第2楼 523066680 | 发表于 2010-08-06 18:11 |
| 银牌会员 发帖 1,133 积分 2,362 | |
|
哇~ 是可以用来破解 局域网管理页面的密码吗?
网络不懂。 |
|
| 第3楼 churui007 | 发表于 2010-08-06 18:15 |
| 新手上路 发帖 12 积分 12 | |
|
只是一个范例而已,不止局域网密码,只要你找好表单名字。
|
|
| 第4楼 slore | 发表于 2010-08-07 11:57 |
| 铂金会员 发帖 2,478 积分 5,212 | |
|
解决不了的问题:
1.脚本如何判定登陆成功? 2.登陆成功后如何实现跳转,就是goto那种,但是好像脚本不支持? 这2个问题你的从IE对象考虑,至少第一个问题不是问题。 虽然没写出来破解脚本,我还是想了想优化方面的问题,省的最后还得问: 1.脚本能不能写成命令行下运行的格式: 比如:脚本.vbs 网址 2.账号密码能不能采用字典的方式? 1. 能 Arguments对象 2. 能 具体看你喜欢文本就FSO,你喜欢内存中的数据就用真的“字典”("Directory"对象)或者数组处理。 |
|
| 第5楼 churui007 | 发表于 2010-08-07 12:26 |
| 新手上路 发帖 12 积分 12 | |
|
继续谢谢slore! 我查资料去了,把脚本搞出来、
|
|
|
[ 联系联盟系统管理团队 -
中国DOS联盟 -
标准版 ] Sponsored by ifanr Inc | © 2001–2023 |