中国DOS联盟

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

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

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 可从外部调用参数执行的批处理脚本，能否精减内容？

ZULGMG
新手上路

积分 9
发帖 9
注册 2007-5-22
状态离线

『楼主』: 可从外部调用参数执行的批处理脚本，能否精减内容？

以下第一个是网上找到的脚本，后面那个是我改的，能在其它脚本中用参数调用此脚本所指定的命令参数！

此脚本名为：ddd.cmd 在命令提示符中执行：ddd -h 能看到执行参数后的参数结果！
执行：ddd -h -b -d 能逐个执行所指定的参数！

如果按下面的来写好像要重复很多内容，搞了好久脑子转不过弯，不知道该如何改写能精减些？
另外，同问下有没有其它的写法？最终效果与此脚本相同？

大家帮看下，谢谢！此脚本内容如下：

这个是网上找到的：
@ECHO off

if "%1"=="" goto :DSa
if "%1"=="/" goto :DSa
if "%1"=="?" goto :DSa
if "%1"=="/?" goto :DSa
if "%1"=="-h" goto :DSa
if "%1"=="/h" goto :DSa

:DSa
ECHO.yes
pause>nul
#################

下面这个是我参照其它例子改的，为方便测试加入数字：

@ECHO off

:: =========================
:: 参数1
if ""=="%1" goto enda
if "%1"=="/" goto DSa
if "%1"=="?" goto DSa
if "%1"=="/?" goto DSa
if "%1"=="-h" goto DSa
if "%1"=="/h" goto DSa
if "%1"=="b" goto BSa
if "%1"=="-b" goto BSa
if "%1"=="/b" goto BSa
if "%1"=="-d" goto DS2a
if "%1"=="/d" goto DS2a
If not ""=="%1" goto NONO1

goto enda

:DSa
ECHO.帮助参数 1
pause>nul
goto enda

:BSa
ECHO.备份参数 1
pause>nul
goto enda

:DS2a
ECHO.清空参数 1
pause>nul
goto enda

:NONO1
set err="%1"
echo.没有 %err% 这个参数！ 1
pause>nul

:enda

:: =========================
:: 参数2
if ""=="%2" goto endb
if "%2"=="/" goto DSb
if "%2"=="?" goto DSb
if "%2"=="/?" goto DSb
if "%2"=="-h" goto DSb
if "%2"=="/h" goto DSb
if "%2"=="-b" goto BSb
if "%2"=="/b" goto BSb
if "%2"=="-d" goto DS2b
if "%2"=="/d" goto DS2b
If not ""=="%2" goto NONO2
goto endb

:DSb
ECHO.帮助参数 2
pause>nul
goto endb

:BSb
ECHO.备份参数 2
pause>nul
goto endb

:DS2b
ECHO.清空参数 2
pause>nul
goto endb

:NONO2
set err="%2"
echo.没有 %err% 这个参数！ 2
pause>nul

:endb

:: =========================
:: 参数3
if ""=="%3" goto endc
if "%3"=="/" goto DSc
if "%3"=="?" goto DSc
if "%3"=="/?" goto DSc
if "%3"=="-h" goto DSc
if "%3"=="/h" goto DSc
if "%3"=="-b" goto BSc
if "%3"=="/b" goto BSc
if "%3"=="-d" goto D3Sc
if "%3"=="/d" goto D3Sc
If not ""=="%3" goto NONO3
goto endc

:DSc
ECHO.帮助参数 3
pause>nul
goto endc

:BSc
ECHO.备份参数 3
pause>nul
goto endc

:D3Sc
ECHO.清空参数 3
pause>nul
goto endc

:NONO3
set err="%3"
echo.没有 %err% 这个参数！ 3
pause>nul

:endc

[ Last edited by ZULGMG on 2009-6-19 at 08:51 ]

2009-6-19 03:19

Hanyeguxing
银牌会员

正在学习中的菜鸟...

积分 1039
发帖 897
注册 2009-3-1
来自在地狱中仰望天堂
状态离线

『第 2 楼』:

你可以只使用1个传递参数，即示例中的参数1。

批处理之家 http://bbs.bathome.net/forum-5-1.html

2009-6-19 03:30

ZULGMG
新手上路

积分 9
发帖 9
注册 2007-5-22
状态离线

『第 3 楼』:

谢谢Hanyeguxing，如果只使用1个传递参数，执行 ddd -h -d -b 后面的 -d -b将不能正常显示

[ Last edited by ZULGMG on 2009-6-19 at 04:20 ]

2009-6-19 03:46

Hanyeguxing
银牌会员

正在学习中的菜鸟...

积分 1039
发帖 897
注册 2009-3-1
来自在地狱中仰望天堂
状态离线

『第 4 楼』:

相同的部分用call

例如：
if "%1"=="/" goto DSa

改成

if "%1"=="/" call :DSa

这样下面就可以使用一个:DSa了

:DSa
ECHO.帮助参数
pause>nul
goto :eof

批处理之家 http://bbs.bathome.net/forum-5-1.html

2009-6-19 08:49

ZULGMG
新手上路

积分 9
发帖 9
注册 2007-5-22
状态离线

『第 5 楼』:

感谢 Hanyeguxing ，兄弟这就试试！谢谢！

2009-6-19 08:56

ZULGMG
新手上路

积分 9
发帖 9
注册 2007-5-22
状态离线

『第 6 楼』:

感谢 Hanyeguxing ，刚才改时太忙，有地方没改对，这样的精减方式对了，不过判断用户输入的参数又错了

以下这个改与不改一样，还有没别的办法？

If not ""=="%2" goto NONO2
也改为：
If not ""=="%2" call :NONO
也是不行

@ECHO off

:: =========================
:: 参数1
if ""=="%1" goto enda
if "%1"=="/" goto ASa
if "%1"=="?" goto ASa
if "%1"=="/?" goto ASa
if "%1"=="-h" goto ASa
if "%1"=="/h" goto ASa
if "%1"=="-b" goto BSa
if "%1"=="/b" goto BSa
if "%1"=="-d" goto AS2a
if "%1"=="/d" goto AS2a
If not ""=="%1" goto NONO1
goto enda

:ASa
ECHO.帮助参数
pause>nul
goto enda

:BSa
ECHO.备份参数
pause>nul
goto enda

:AS2a
ECHO.清空参数
pause>nul
goto enda

:NONO1
set err="%1"
echo.没有 %err% 这个参数!
pause>nul
goto enda

:enda

:: =========================
:: 参数2
if ""=="%2" goto endb
if "%2"=="/" call :ASa
if "%2"=="?" call :ASa
if "%2"=="/?" call :ASa
if "%2"=="-h" call :ASa
if "%2"=="/h" call :ASa
if "%2"=="-b" call :BSa
if "%2"=="/b" call :BSa
if "%2"=="-d" call :AS2a
if "%2"=="/d" call :AS2a
If not ""=="%2" goto NONO2
goto endb

:NONO2
set err="%2"
echo.没有 %err% 这个参数!
pause>nul
goto endb

:endb

:: =========================
:: 参数3
if ""=="%3" goto endc
if "%3"=="/" call :ASa
if "%3"=="?" call :ASa
if "%3"=="/?" call :ASa
if "%3"=="-h" call :ASa
if "%3"=="/h" call :ASa
if "%3"=="-b" call :BSa
if "%3"=="/b" call :BSa
if "%3"=="-d" call :AS2a
if "%3"=="/d" call :AS2a
If not ""=="%3" goto NONO3
goto endc

:NONO3
set err="%3"
echo.没有 %err% 这个参数!
pause>nul
goto endc

:endc

--------------------------------------------------------------------------------------------
执行后命令显示：

G:\>001 -h
帮助参数

G:\>001 -b
备份参数

G:\>001 -d
清空参数

G:\>001 -d -h
清空参数
帮助参数
没有 "-h" 这个参数!

G:\>001 -d -h -d
清空参数
帮助参数
没有 "-h" 这个参数!
清空参数
没有 "-d" 这个参数!

G:\>

[ Last edited by ZULGMG on 2009-6-19 at 10:54 ]

2009-6-19 10:05

Hanyeguxing
银牌会员

正在学习中的菜鸟...

积分 1039
发帖 897
注册 2009-3-1
来自在地狱中仰望天堂
状态离线

『第 7 楼』:

如果要求批处理不开变量延迟，可以这样写

@ECHO off

set han1=%1

set han2=%2

set han3=%3

:gu1:参数1

set ye=2

if ""=="%han1%" call :xing %ye%

if "%han1%"=="/" call :ASa %ye%

if "%han1%"=="?" call :ASa %ye%

if "%han1%"=="/?" call :ASa %ye%

if "%han1%"=="-h" call :ASa %ye%

if "%han1%"=="/h" call :ASa %ye%

if "%han1%"=="-b" call :BSa %ye%

if "%han1%"=="/b" call :BSa %ye%

if "%han1%"=="-d" call :AS2a %ye%

if "%han1%"=="/d" call :AS2a %ye%

If not ""=="%han1%" call :err %ye% %han1%

:gu2:参数2

set ye=3

if ""=="%han2%" call :xing %ye%

if "%han2%"=="/" call :ASa %ye%

if "%han2%"=="?" call :ASa %ye%

if "%han2%"=="/?" call :ASa %ye%

if "%han2%"=="-h" call :ASa %ye%

if "%han2%"=="/h" call :ASa %ye%

if "%han2%"=="-b" call :BSa %ye%

if "%han2%"=="/b" call :BSa %ye%

if "%han2%"=="-d" call :AS2a %ye%

if "%han2%"=="/d" call :AS2a %ye%

If not ""=="%han2%" call :err %ye% %han2%

:gu3:参数3

set ye=4

if ""=="%han3%" call :xing %ye%

if "%han3%"=="/" call :ASa %ye%

if "%han3%"=="?" call :ASa %ye%

if "%han3%"=="/?" call :ASa %ye%

if "%han3%"=="-h" call :ASa %ye%

if "%han3%"=="/h" call :ASa %ye%

if "%han3%"=="-b" call :BSa %ye%

if "%han3%"=="/b" call :BSa %ye%

if "%han3%"=="-d" call :AS2a %ye%

if "%han3%"=="/d" call :AS2a %ye%

If not ""=="%han3%" call :err %ye% %han3%

exit

:ASa

ECHO.帮助参数

pause>nul&goto :xing

:BSa

ECHO.备份参数

pause>nul&goto :xing

:AS2a

ECHO.清空参数

pause>nul&goto :xing

:err

set xinxi=%2

echo.没有 %xinxi% 这个参数!

pause>nul

:xing

goto gu%1

:gu4

exit

[ Last edited by Hanyeguxing on 2009-6-19 at 14:04 ]

批处理之家 http://bbs.bathome.net/forum-5-1.html

2009-6-19 13:38

Hanyeguxing
银牌会员

正在学习中的菜鸟...

积分 1039
发帖 897
注册 2009-3-1
来自在地狱中仰望天堂
状态离线

『第 8 楼』:

如果允许使用变量延迟，并忽略错误的参数，可以这样写

@ECHO off

set han1=%1

set han2=%2

set han3=%3

setlocal ENABLEDELAYEDEXPANSION

for /L %%i in (1 1 3) do (

if "!han%%i!"=="/" call :ASa

if "!han%%i!"=="?" call :ASa

if "!han%%i!"=="/?" call :ASa

if "!han%%i!"=="-h" call :ASa

if "!han%%i!"=="/h" call :ASa

if "!han%%i!"=="-b" call :BSa

if "!han%%i!"=="/b" call :BSa

if "!han%%i!"=="-d" call :AS2a

if "!han%%i!"=="/d" call :AS2a

)

exit

:ASa

ECHO.帮助参数

pause>nul&goto :eof

:BSa

ECHO.备份参数

pause>nul&goto :eof

:AS2a

ECHO.清空参数

pause>nul

错误的参数，将自动不被执行。。。

[ Last edited by Hanyeguxing on 2009-6-19 at 14:42 ]

批处理之家 http://bbs.bathome.net/forum-5-1.html

2009-6-19 14:37

ZULGMG
新手上路

积分 9
发帖 9
注册 2007-5-22
状态离线

『第 9 楼』:

谢谢 Hanyeguxing 兄弟，在我意识中还有一种写法，现在有了点想法，不过还没着手，一时之间头绪不是很清楚，得重新学习学习，唉……几年没摸电脑，都快退化回人猿人了……
Hanyeguxing 兄弟一定搞了很晚，谢谢兄弟了，兄弟注意休息，身体要紧啊……

[ Last edited by ZULGMG on 2009-6-19 at 23:04 ]

2009-6-19 23:01

ZULGMG
新手上路

积分 9
发帖 9
注册 2007-5-22
状态离线

『第 10 楼』:

没时间了不想这么多了，先用上 Hanyeguxing 兄弟7楼的吧,有空再来看看，加了 Hanyeguxing 兄弟QQ，请兄弟验证,

谢谢！

[ Last edited by ZULGMG on 2009-6-19 at 23:40 ]

2009-6-19 23:34

netbenton
银牌会员

批处理编程迷

积分 1916
发帖 752
注册 2008-12-28
来自广西
状态离线

『第 11 楼』:

可处理多个参数，多种错误结果
维护选项方便

@echo off&setlocal enabledelayedexpansion

::选项定义

set "Asa= / ? /? -h /h "

set "Bsa= -b /b "

set "As2a= -d /d "

set menu=Asa Bsa As2a

::选项定义

:loop

if ""=="%~1" goto :eof

set sub=NONO1

for %%a in (!menu!) do if "!%%a: %~1 =!" neq "!%%a!" set sub=%%a

call :%sub% "%~1"

SHIFT

goto :loop

:ASa

ECHO.帮助参数

pause>nul

goto :eof

:BSa

ECHO.备份参数

pause>nul

goto :eof

:AS2a

ECHO.清空参数

pause>nul

goto :eof

:NONO1

echo.没有 "%~1" 这个参数!

pause>nul

goto :eof

[ Last edited by netbenton on 2009-6-19 at 23:01 ]

精简
[你的+我的+他的]=>[大家的] 个人

网志

2009-6-20 00:50

(37659560)

ZULGMG
新手上路

积分 9
发帖 9
注册 2007-5-22
状态离线

『第 12 楼』:

谢谢 netbenton 就是这样了！谢谢！

2009-6-21 23:02

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

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

论坛跳转: