中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客: 注册 | 登录 | 命令行 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 建个BAT，怎样在login:后定位？

作者:

标题: 建个BAT，怎样在login:后定位？

上一主题 | 下一主题

dacheng
初级用户

积分 31
发帖 16
注册 2006-11-8
状态离线

『楼主』: 建个BAT，怎样在login:后定位？

我在实现自动telnet到设备上，建了个BAT文件，如下： start telnet.exe 192.168.1.1 怎样在login:后定位，然后自动输入用户名，在Password:后定位，自动输入密码，即一个自动登录的实现？先谢了！

2008-6-28 21:46

查看资料发送邮件访问主页发短消息网志

编辑帖子回复引用回复

HAT
版主

积分 9023
发帖 5017
注册 2007-5-31
状态离线

『第 2 楼』:

纯P无法实现可以调用VBS

2008-6-28 22:36

查看资料发短消息网志

编辑帖子回复引用回复

dacheng
初级用户

积分 31
发帖 16
注册 2006-11-8
状态离线

『第 3 楼』:

有哪位大哥肯赐教？ [ Last edited by dacheng on 2008-7-3 at 04:13 PM ]

2008-7-3 16:01

查看资料发送邮件访问主页发短消息网志

编辑帖子回复引用回复

HAT
版主

积分 9023
发帖 5017
注册 2007-5-31
状态离线

『第 4 楼』:

@echo off
rem 假设主机地址是ABC
rem 假设用户名是DEF
rem 假设密码是GHI
echo Set WshShell = CreateObject("WScript.Shell")>%tmp%\TelDelphi1.vbs
echo WshShell.Run "telnet ABC">>%tmp%\TelDelphi1.vbs
echo WScript.Sleep(5000)>>%tmp%\TelDelphi1.vbs
echo WshShell.SendKeys "DEF{enter}">>%tmp%\TelDelphi1.vbs
echo WScript.Sleep(1000)>>%tmp%\TelDelphi1.vbs
echo WshShell.SendKeys "GHI{enter}">>%tmp%\TelDelphi1.vbs
start cscript /nologo %tmp%\TelDelphi1.vbs
ping -n 10 127.1>nul
del /q %tmp%\TelDelphi1.vbs

'假设主机地址是ABC
'假设用户名是DEF
'假设密码是GHI
Set WshShell = CreateObject("WScript.Shell")
WshShell.Run "telnet ABC"
WScript.Sleep(5000)
WshShell.SendKeys "DEF{enter}"
WScript.Sleep(1000)
WshShell.SendKeys "GHI{enter}"
'需要执行什么命令就SendKeys

2008-7-3 17:56

查看资料发短消息网志

编辑帖子回复引用回复

dacheng
初级用户

积分 31
发帖 16
注册 2006-11-8
状态离线

『第 5 楼』:

谢谢！

自我介绍: dacheng.goofar.com

2008-7-6 15:04

查看资料发送邮件访问主页发短消息网志

编辑帖子回复引用回复

ywwywwjm
初级用户