中国DOS联盟

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

此脚本名为：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 ]

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

谢谢Hanyeguxing，如果只使用1个传递参数，执行 ddd -h -d -b 后面的 -d -b将不能正常显示<img src="images/smilies/face-sad.png" align="absmiddle" border="0">

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

相同的部分用call

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

改成

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

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

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

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

感谢 Hanyeguxing ，刚才改时太忙，有地方没改对，这样的精减方式对了，不过判断用户输入的参数又错了<img src="images/smilies/face-sad.png" align="absmiddle" border="0">

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

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 ]

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

@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 ]

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

@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 ]

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

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

没时间了不想这么多了，先用上 Hanyeguxing 兄弟7楼的吧,有空再来看看，加了 Hanyeguxing 兄弟QQ，请兄弟验证,<img src="images/smilies/face-smile-big.png" align="absmiddle" border="0">谢谢！

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

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

@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 ]

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