中国DOS联盟论坛

中国DOS联盟

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

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

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 执行1动作会执行telnet 怎么修正(已解决感谢wudixin96)
作者:
标题: 执行1动作会执行telnet 怎么修正(已解决感谢wudixin96) 上一主题 | 下一主题
canmao
初级用户





积分 42
发帖 13
注册 2007-9-5
状态 离线
『楼 主』:  执行1动作会执行telnet 怎么修正(已解决感谢wudixin96)

@echo off
title 残猫造 批处理检测器
:start
echo.
echo        1   检测是否存在主机
echo        2   telnet 远程连接
echo        3   检测远程主机用户名
echo.
color f2
set for=于
set of=的
set with=用
set in=(以
set data:=数据
set milli-seconds:=毫秒为单位)
set Approximate=大约
set times=时间:
set round=来回
set trip=行程
set Reply=应答
set from=来自
set bytes=字节
set time=时间:
set timed=时间
set out=超过
set statistics=统计
set Packets:=包:
set Sent=已发送=
set Received=已收到=
set Lost=已丢失=
set loss)=丢失)
set Minimum=最小值=
set Maximum=最大值=
set Average=平均值=
set TTL=TTL=
:set
SET a=
SET /P a=选择:
rem 设定变量"a"为用户输入的字符
IF NOT '%a%'=='' SET a=%a:~0,1%
ECHO.
IF /I '%a%'=='1' goto 1
IF /I '%a%'=='2' goto 2
IF /I '%a%'=='3' goto 3
IF /I '%a%'=='4' goto 4
IF /I '%a%'=='5' goto 5
IF /I '%a%'=='6' goto 6
rem 如果输入的字符不是1-6,将返回重新输入
echo %a%       选择无效,请重新输入:
echo.
goto set
:1
set /p input=请输入IP:
echo %input%|findstr "^[0-9]*\.[0-9]*\.[0-9]*\.[0-9]*$">nul||goto fail
set _input=%input:.= %
call :check %_input%

:check
if "%4"=="" goto fail
for %%i in (%1 %2 %3 %4) do (
    if %%i gtr 255 goto fail
)
cls
echo %input% 是正确的IP
echo.
pause
goto starta

:fail
cls
echo %input% 是错误的IP
echo.
pause
goto 1
:start1
ping %input%
pause
goto start
:2
set inputa=
set /p inputa=请输入IP:
echo %inputa%|findstr "^[0-9]*\.[0-9]*\.[0-9]*\.[0-9]*$">nul||goto faila
set _input=%inputa:.= %
call :check %_input%

:check
if "%4"=="" goto fail
for %%i in (%1 %2 %3 %4) do (
    if %%i gtr 255 goto faila
)
cls
echo %inputa% 是正确的IP
echo.
goto starta

:faila
cls
echo %inputa% 是错误的IP
echo.
pause
goto 2
:starta
telnet %inputa%

[ Last edited by canmao on 2007-9-6 at 02:27 PM ]

2007-9-6 13:57
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
wudixin96
银牌会员





积分 1928
发帖 931
注册 2007-1-6
状态 离线
『第 2 楼』:  

一个P里两个check标签

每个标签最后都有个goto starta

当然都会telnet了。

2007-9-6 14:10
查看资料  发短消息 网志   编辑帖子  回复  引用回复
Climbing
铂金会员

网络独行侠


积分 6962
发帖 2753
注册 2003-4-16
来自 河北保定
状态 离线
『第 3 楼』:  

最基本的逻辑错误。



偶只喜欢回答那些标题和描述都很清晰的帖子!
如想解决问题,请认真学习“这个帖子”和“这个帖子”并努力遵守,如果可能,请告诉更多的人!
2007-9-6 15:30
查看资料  发送邮件  访问主页  发短消息 网志  OICQ (653668)  编辑帖子  回复  引用回复

请注意:您目前尚未注册或登录,请您注册登录以使用论坛的各项功能,例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转: