[系统相关] [已解决]如何将当前批处理变量的值，传递到通过more命令生成的bat文件里面？谢谢

ygqiang

[已解决]bat批处理命令，如何将当前变量的值，传递到新生成的bat文件里面？谢谢

@echo off

------------------------------------------------------------------------------------
for /f "tokens=15 delims= " %%i in ('ipconfig ^| find /i "IP Address"') do set i=%%i
for /f "tokens=1,2,3 delims=." %%i in ("%i%") do (set a=%%i.%%j.%%k)

echo %a%

set ipp=10

------------------------------------------------
if "%a%" == "192.168.9"   goto :next9
goto :next

------------------------------
:next9
set ipp=20

------------------------------
:next
echo %ipp%

echo 如何将这里的ipp变量值，传送到zcom.bat文件里面？


------------------------------------------------------------------------------------
for /f "delims=:" %%i in ('findstr /n "^:zcom-copy$" "%~f0"') do (
    more +%%i "%~f0" > c:\zcom.bat
)


copy /y c:\zcom.bat "%userprofile%\「开始」菜单\程序\启动"
ping 127.0.0.1 -n 5 >nul 2>nul


exit






——————————————————————————————————————————————
:zcom-copy
@echo off
if "%1" == "h" goto begin
mshta vbscript:createobject("wscript.shell").run("%~fs0 h",0)(window.close)&&exit
:begin
rem 下边开始写批处代码了

ping 127.0.0.1 -n %ipp% >nul 2>nul

echo 如何将最开始的ipp变量值，传送到这里来？
。。。。其他bat代码。。。。
复制代码

更新下：——————————————————————————

bat代码，实现的功能就是：
1、判断ip地址段，如果是192.168.9，ipp变量赋值20；否则ipp变量赋值10
2、bat代码自动生成bat文件c:\zcom.bat，并且复制到"%userprofile%\「开始」菜单\程序\启动"目录下。
3、倒计时5秒自动退出bat代码。
4、zcom.bat文件内容如下：
@echo off
if "%1" == "h" goto begin
mshta vbscript:createobject("wscript.shell").run("%~fs0 h",0)(window.close)&&exit
:begin
rem 下边开始写批处代码了
ping 127.0.0.1 -n %ipp% >nul 2>nul

bbaa

可以把其他bat代码的%ipp%变成%~1
在之前的代码用
bat文件名 %ipp%
来启动其他bat

ygqiang

可以把其他bat代码的%ipp%变成%~1
在之前的代码用
bat文件名 %ipp%
来启动其他bat
bbaa 发表于 2015-12-2 21:52

    你好。如何在1楼bat代码基础上修改？谢谢

要求：不能改变1楼这个bat代码的基本功能，自动生成/运行另一个bat文件。

bbaa

没注意有个 if %1......

ygqiang

回复 4# bbaa


   
    不能解决吗？谢谢

pcl_test

/*&cls
@echo off
set test=测试
for /l %%a in (1 1 5) do set /a n+=%%a
echo;-----------------------------------------------------------------
(for /f "delims=:" %%囧 in ('findstr /n "^:ExtraCodes$" "%~f0"') do (
    rem 调用js"传参" %test%和%n%
    more +%%囧 "%~f0"|cscript -nologo -e:jscript "%~f0" "%%test%%|%test%" "%%n%%|%n%"
))>"生成.bat"
exit
*/
var battxt = WScript.StdIn.ReadAll();
for(var i=0; i<WScript.Arguments.length; i++)
{
    var tmp = WScript.Arguments(i).split('|');
    var reg = RegExp(tmp[0],'g');
    battxt = battxt.replace(reg, tmp[1]);
}
WSH.echo(battxt);
/*
----------------------------------------------------------------------
:ExtraCodes
@echo off
echo %test%
echo %n%
pause
rem */
复制代码

flyinnet9

@echo off
call xxx.bat
echo.%ipp%
复制代码

ygqiang

回复 6# pcl_test   

win7 64系统，生成.bat，文件内容如下：

@echo off
echo 测试
echo 15
pause
rem */


要求：不能改变1楼这个bat代码的基本功能，自动生成另一个bat文件。这个bat文件内容，就包含在bat代码里面。。

ygqiang

回复 7# flyinnet9


   

    要求：不能改变1楼这个bat代码的基本功能，自动生成另一个bat文件。

pcl_test

回复 8# ygqiang

不就是这样做的吗？还是你没把问题说明白

ygqiang

回复  ygqiang

不就是这样做的吗？还是你没把问题说明白
pcl_test 发表于 2015-12-2 23:41

bat代码，实现的功能是：
1、判断ip地址段，如果是192.168.9，ipp变量赋值20；否则ipp变量赋值10
2、bat代码自动生成bat文件c:\zcom.bat，并且复制到"%userprofile%\「开始」菜单\程序\启动"目录下。
3、倒计时5秒自动退出bat代码。
4、zcom.bat文件内容如下：
@echo off
if "%1" == "h" goto begin
mshta vbscript:createobject("wscript.shell").run("%~fs0 h",0)(window.close)&&exit
:begin
rem 下边开始写批处代码了
ping 127.0.0.1 -n %ipp% >nul 2>nul

pcl_test

回复 11# ygqiang

你的代码我知道呀，可是你可看懂6楼的代码？把你相应的代码套进6楼的代码不就是了？

ygqiang

回复 12# pcl_test


    6楼的代码？看不懂啊。。。麻烦你了。。

pcl_test

回复 13# ygqiang


/*&cls
@echo off
for /f "tokens=15 delims= " %%i in ('ipconfig ^| find /i "IP Address"') do set i=%%i
for /f "tokens=1,2,3 delims=." %%i in ("%i%") do (set a=%%i.%%j.%%k)
echo %a%
set ipp=10
if "%a%" == "192.168.9" goto :next9
goto :next
:next9
set ipp=20
:next
echo %ipp%
echo 如何将这里的ipp变量值，传送到zcom.bat文件里面？
echo;---------------------------------------------
(for /f "delims=:" %%靠 in ('findstr /n "^:ExtraCodes$" "%~f0"') do (
    more +%%靠 "%~f0"|cscript -nologo -e:jscript "%~f0" "%%ipp%%|%ipp%"
))>c:\zcom.bat
copy /y c:\zcom.bat "%userprofile%\「开始」菜单\程序\启动"
ping 127.0.0.1 -n 5 >nul 2>nul
exit
*/
var battxt = WScript.StdIn.ReadAll();
for(var i=0; i<WScript.Arguments.length; i++)
{
    var tmp = WScript.Arguments(i).split('|');
    var reg = RegExp(tmp[0],'g');
    battxt = battxt.replace(reg, tmp[1]);
}
WSH.echo(battxt);
/*
---------------------------------------------
:ExtraCodes
@echo off
if "%1" == "h" goto begin
mshta vbscript:createobject("wscript.shell").run("%~fs0 h",0)(window.close)&&exit
:begin
rem 下边开始写批处代码了

ping 127.0.0.1 -n %ipp% >nul 2>nul

echo 如何将最开始的ipp变量值，传送到这里来？
。。。。其他bat代码。。。。
rem */

依山居

5 - 6年的伸手党~