|
dragonamd
中级用户
积分 209
发帖 100
注册 2008-8-1
状态 离线
|
『楼 主』:
telnet 192.168 如何自动输入用户密码，第三方软件也可
telnet 192.168 如何自动输入用户密码，第三方软件也可以，只要能满足就行，有的话给代码，
|
|
 2010-2-3 00:30 |
|
|
qinchun36
高级用户
据说是李先生
积分 609
发帖 400
注册 2008-4-23
状态 离线
|
『第
2 楼』:
我这里没有可用的主机没法测试，你可以手工执行一遍，把控制台的输出原样地贴出来（当然可以把IP或者用户名密码以大家理解的方式屏蔽掉），我写了一个东西还从来没真正用过呢，试试看行不行
|
┏━━━━━━┓
┃据说是李先生┃
┠──────┨
┃＊ｎｔＲＳＳ┃
┗━━━━━━┛ |
|
|
2010-2-3 11:02 |
|
|
bbsphixy
初级用户
积分 27
发帖 13
注册 2009-9-1
状态 离线
|
|
|
2010-2-3 11:46 |
|
|
HAT
版主
积分 9023
发帖 5017
注册 2007-5-31
状态 离线
|
『第
4 楼』:
用VBS的SendKeys可以
|
 |
|
|
2010-2-3 13:04 |
|
|
dato
高级用户
积分 916
发帖 377
注册 2004-3-8
状态 离线
|
『第
5 楼』:
偶那天也为这个烦，网上有vbs的实例最后采用的是autoit。这段代码仿老外的写法
; Run Telnet
Run("telnet 192.168.1.1 61174")
; Rename window
$WinTitle="Telnet (ZXDSL 831) <<- F9-Private Deny / F10-Private Accept / CTRL+d to exit ->>"
WinWait("Telnet 192.168.1.1","")
WinSetTitle("Telnet 192.168.1.1","",$WinTitle)
WinActivate($WinTitle,"")
; Login and change to export directory
xSend($WinTitle,"username{ENTER}")
xSend($WinTitle,"password{ENTER}")
Changeset1()
runwait(@ComSpec & ' /C "c:\windows\system32\ipconfig.exe" /renew')
; Main loop
while WinExists($WinTitle,"")
if WinActive($WinTitle,"") then
HotKeySet("{F9}", "changeset1")
HotKeySet("{F10}", "changeset2")
else
HotKeySet("{F9}")
HotKeySet("{F10}")
endif
Sleep(20)
wend
Exit
; Extended send function
func xSend($aWinTitle,$aString)
Sleep(500)
WinActivate($aWinTitle,"")
Send($aString)
endfunc
func Changeset1()
xSend($WinTitle,"modify zipb cfg enable{ENTER}")
; xSend($WinTitle,"modify zipb cfg disable{ENTER}")
; xSend($WinTitle,"modify ipf global seclevel high pubdefact accept pvtdefact accept{ENTER}")
xSend($WinTitle,"modify ipf global seclevel high pubdefact accept pvtdefact deny{ENTER}")
; xSend($WinTitle,"modify nat global tcpidletimeout 1800 tcpclosewait 120 tcptimeout 120 udptimeout 15 defnatage 120 portend 50380 disable{ENTER}")
; xSend($WinTitle,"quit{ENTER}")
endfunc
func Changeset2()
xSend($WinTitle,"modify zipb cfg enable{ENTER}")
; xSend($WinTitle,"modify zipb cfg disable{ENTER}")
xSend($WinTitle,"modify ipf global seclevel high pubdefact accept pvtdefact accept{ENTER}")
xSend($WinTitle,"modify nat global tcpidletimeout 1800 tcpclosewait 120 tcptimeout 120 udptimeout 15 defnatage 120 portend 50380 disable{ENTER}")
; xSend($WinTitle,"modify ipf global seclevel high pubdefact accept pvtdefact deny{ENTER}")
; xSend($WinTitle,"quit{ENTER}")
endfunc
|
http://dato.ys168.com
google search bot
http://dato.minidns.net/ |
|
|
2010-2-3 16:34 |
|
|
dragonamd
中级用户
积分 209
发帖 100
注册 2008-8-1
状态 离线
|
『第
6 楼』:
没有成功,可否写一个, 192.168.1.1 用户名 root 密码 admin 进路由器用的
|
|
|
2010-2-3 23:20 |
|
|
dragonamd
中级用户
积分 209
发帖 100
注册 2008-8-1
状态 离线
|
『第
7 楼』:
dd-wrt login : 用户名
password : 密码
|
|
|
2010-2-3 23:27 |
|
|
bbsphixy
初级用户
积分 27
发帖 13
注册 2009-9-1
状态 离线
|
『第
8 楼』:
上面不是有我发的工具吗？？你都不下载来试试..
工具是进Telnet的
[ Last edited by bbsphixy on 2010-2-3 at 23:31 ]
|
|
|
2010-2-3 23:30 |
|
|
dragonamd
中级用户
积分 209
发帖 100
注册 2008-8-1
状态 离线
|
|
|
2010-2-3 23:32 |
|
|
bbsphixy
初级用户
积分 27
发帖 13
注册 2009-9-1
状态 离线
|
『第
10 楼』:
什么提示？？你先使用“”更改Telnet配置.bat“”设置下你的信息，然后再用“自动登陆Telnet.bat” 连接就是啦！！
如果你设置没问题，那就是你的 Telnet 没打开
你可以连接自己本机（自己电脑）试下就知道了。
如果提示23端口没打开的话，也就是你电脑没启动Telnet服务
[ Last edited by bbsphixy on 2010-2-3 at 23:37 ]
|
|
|
2010-2-3 23:35 |
|
|
dragonamd
中级用户
积分 209
发帖 100
注册 2008-8-1
状态 离线
|
『第
11 楼』:
设置过了,能tel进入,用户和密码不行 手工可以进入
|
|
|
2010-2-3 23:36 |
|
|
bbsphixy
初级用户
积分 27
发帖 13
注册 2009-9-1
状态 离线
|
『第
12 楼』:
提示用户名密码错误？？？？那你的用户名和密码没输对吧，请确认用户和密码正确
重新“更改Telnet配置.bat” 要确认清楚。。
先拿自己本机来试。。
[ Last edited by bbsphixy on 2010-2-3 at 23:40 ]
|
|
|
2010-2-3 23:39 |
|
|
dragonamd
中级用户
积分 209
发帖 100
注册 2008-8-1
状态 离线
|
|
|
2010-2-3 23:40 |
|
|
hhh246
初级用户
积分 74
发帖 31
注册 2006-8-26
状态 离线
|
『第
14 楼』:
set sh=WScript.CreateObject("WScript.Shell")
iReturn=Sh.Run("cmd.exe /c start telnet.exe", 1, TRUE)
WScript.Sleep 300
sh.SendKeys "open 192.168.1.1"
WScript.Sleep 300
sh.SendKeys "{ENTER}"
WScript.Sleep 300
sh.SendKeys "root{ENTER}"
WScript.Sleep 300
sh.SendKeys "123456{ENTER}"
WScript.Sleep 300
sh.SendKeys "{ENTER}"
|
|
|
2010-2-4 09:10 |
|
|
dragonamd
中级用户
积分 209
发帖 100
注册 2008-8-1
状态 离线
|
『第
15 楼』:
上面的代码好用,感谢,对了,怎么在下面填入自己需要输入的命令
|
|
|
2010-2-4 21:45 |
|
