[网络连接] [已解决]DOS命令在WIN7无法运行

adfs945

大家好：

经过近期的学习，写了一些bat程序：循环自动将指定文件夹内文件移动到其他位置。

问题点：在WIN10系统运行正常，在WIN7系统运行会导致系统卡死
请大神指点迷津。
代码如下(set "folder2=S:\DMNSPZJC" 为映射地址)

if "%1"=="hide" goto CmdBegin
start mshta vbscript:createobject("wscript.shell").run("""%~0"" hide",0)(window.close)&&exit
:CmdBegin

@echo off

set INTERVAL=10

:Again

rem 批处理保存为ansi编码格式
set "folder1=C:\Users\dmns25163\Desktop\AAA"
set "folder2=S:\DMNSPZJC"
for %%a in ("%folder1%\*.*") do (
	if not exist "%folder2%\%%~nxa" (
		move "%%a" "%folder2%"
	) else (
		set n=1
		call :1 "%%a"
	)
)
timeout %INTERVAL%
goto Again

pause
exit

	:1
	set /a n+=1
	if not exist "%folder2%\%~n1(%n%)%~x1" (
		move "%~1" "%folder2%\%~n1(%n%)%~x1"
		exit /b
	) else (
		goto :1
	)
复制代码

adfs945

谢谢各位指导，最终确认是 第二句代码win7系统环境不能运行导致。
start mshta vbscript:createobject("wscript.shell").run("""%~0"" hide",0)(window.close)&&exit

Five66

所以到底是哪里的出问题

adfs945

回复 6# LTSC1809


好的，非常感谢

adfs945

回复 7# czjt1234

谢谢指导，试了一下，第一个是要按回车，后面的好像还是会自动运行。

adfs945

回复 6# LTSC1809


    谢谢指导，测试中

adfs945

回复 4# 77七


    好的，谢谢指导，尝试中。

adfs945

回复 3# Five66


    好的，谢谢指导，正在逐句确认中

qixiaobin0715

排查代码错误其实没那么复杂。
1.将bat文件中的@echo off那一行删掉并保存；
2.在cmd窗口中执行cd命令，定位到bat文件所在目录；
3.在光标处输入批处理文件名（包括扩展名），回车；
错误提示下一行即是错误位置。

jszw666

回复 6# LTSC1809


    期待，，，，学习中.....

czjt1234

同6楼
在每一行下面加一个pause，执行一步按一下

LTSC1809

回复 5# adfs945 请在每一行下面加一个pause，执行一步按一下，来确定，或者嫌麻烦我待会儿给你写个bat把你的bat每一行输出都保存到一个文件，你观察最后一行输出就行

adfs945

回复 2# Batcher


     大佬，谢谢指导，我目前的水平还不会排查具体是哪一行。
不过我学继续学习的，谢谢。

77七

论坛内另找一段管理员启动的代码，试试。
隐藏运行吗...不了解

Five66

不知道是不是第23行跟第32行的问题