中国DOS联盟

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

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

中国DOS联盟论坛
现在时间是 2026-08-12 02:35
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 如何用.bat实现自动telnet 查看 2,916 回复 9
楼 主 如何用.bat实现自动telnet 发表于 2007-09-13 15:59 ·  中国 浙江 宁波 联通
新手上路
积分 12
发帖 4
注册 2007-08-24 10:14
18年会员
UID 95737
性别 男
状态 离线
我想做一个bat,运行一下可以telnet到远程设备,请问高手有办法吗?
2 发表于 2007-09-13 16:52 ·  中国 北京 联通
初级用户
积分 78
发帖 34
注册 2006-12-09 05:10
19年会员
UID 73001
性别 男
状态 离线
我收藏的原咱论坛一个大哥大写的代码:

@echo ftp.exe -s:C:\jh520.mmp

在C根下建jh520.mmp 并且写入以下代码 有些东西自己改下!
CODE:
--------------------------------------------------------------------------------

open FTPSEVER
USER
PASSWORD
#bin
cd ftp数据备份
lcd F:\share\OA
put "%date%"oa
bye
3 发表于 2007-09-14 15:48 ·  中国 浙江 宁波 联通
新手上路
积分 12
发帖 4
注册 2007-08-24 10:14
18年会员
UID 95737
性别 男
状态 离线
谢谢楼上的兄弟
但是telnet好象没有类似的命令
4 发表于 2007-09-16 12:53 ·  中国 重庆 九龙坡区 电信
版主
★★★★★
积分 9,023
发帖 5,017
注册 2007-05-31 19:39
19年会员
UID 89899
性别 男
状态 离线
需要结合VBS
@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
5 发表于 2007-09-16 13:16 ·  中国 北京 联通
银牌会员
★★★
积分 1,287
发帖 634
注册 2007-05-02 15:06
19年会员
UID 87277
性别 男
来自 cmd.exe
状态 离线
貌似可以用NC
6 发表于 2007-09-16 13:20 ·  中国 重庆 九龙坡区 电信
版主
★★★★★
积分 9,023
发帖 5,017
注册 2007-05-31 19:39
19年会员
UID 89899
性别 男
状态 离线
如果我们用NC来登陆公司的服务器,会不会被老大炒鱿鱼呢?
^_^
7 发表于 2009-07-07 03:03 ·  中国 安徽 马鞍山 电信
中级用户
★★
积分 493
发帖 228
注册 2007-02-16 00:38
19年会员
UID 79596
性别 男
来自 安徽
状态 离线
@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


ping -n 10 127.1>nul有何用场???

还有:
1台机器,试验成功。

如果有几台机器,并且希望通过“批处理程序”telnet修改密码
无需人工干预,自动进行
怎么办?

自己试着写了一个,好像不行???
:(
ip.txt
192.168.53.2
192.168.54.2

bat

@echo off&setlocal enabledelayedexpansion
for /f %%a in (ip.txt) do (
set ip=%%a
goto :VBS
)

:VBS
echo Set WshShell = CreateObject("WScript.Shell")>%tmp%\TelDelphi1.vbs
echo WshShell.Run "telnet !ip!">>%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

好像不能设置第2台机器
???

[ Last edited by xycoordinate on 2009-7-7 at 03:41 ]
8 发表于 2009-07-08 22:42 ·  中国 安徽 马鞍山 电信
中级用户
★★
积分 493
发帖 228
注册 2007-02-16 00:38
19年会员
UID 79596
性别 男
来自 安徽
状态 离线
顶起来……
9 发表于 2009-07-10 05:42 ·  中国 安徽 马鞍山 电信
中级用户
★★
积分 493
发帖 228
注册 2007-02-16 00:38
19年会员
UID 79596
性别 男
来自 安徽
状态 离线
10 发表于 2009-08-01 13:58 ·  中国 上海 浦东新区 电信
中级用户
★★
积分 400
发帖 211
注册 2007-09-30 18:02
18年会员
UID 98650
性别 男
状态 离线
用PLINK.exe 比较稳定,支持telnet , SSH

PuTTY Link: command-line connection utility
Release 0.60
Usage: plink [options] [user@]host [command]
("host" can also be a PuTTY saved session name)
Options:
-V print version information and exit
-pgpfp print PGP key fingerprints and exit
-v show verbose messages
-load sessname Load settings from saved session
-ssh -telnet -rlogin -raw
force use of a particular protocol
-P port connect to specified port
-l user connect with specified username
-batch disable all interactive prompts
The following options only apply to SSH connections:
-pw passw login with specified password
-D [listen-IP:]listen-port
Dynamic SOCKS-based port forwarding
-L [listen-IP:]listen-port:host:port
Forward local port to remote address
-R [listen-IP:]listen-port:host:port
Forward remote port to local address
-X -x enable / disable X11 forwarding
-A -a enable / disable agent forwarding
-t -T enable / disable pty allocation
-1 -2 force use of particular protocol version
-4 -6 force use of IPv4 or IPv6
-C enable compression
-i key private key file for authentication
-noagent disable use of Pageant
-agent enable use of Pageant
-m file read remote command(s) from file
-s remote command is an SSH subsystem (SSH-2 only)
-N don't start a shell/command (SSH-2 only)
-nc host:port
open tunnel in place of session (SSH-2 only)
论坛跳转: