Board logo

标题: [网络连接] [已解决]DOS命令在WIN7无法运行 [打印本页]

作者: adfs945    时间: 2023-8-10 12:45     标题: [已解决]DOS命令在WIN7无法运行

本帖最后由 adfs945 于 2023-8-11 14:36 编辑

大家好:

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

问题点:在WIN10系统运行正常,在WIN7系统运行会导致系统卡死
请大神指点迷津。
代码如下(set "folder2=S:\DMNSPZJC" 为映射地址)
  1. if "%1"=="hide" goto CmdBegin
  2. start mshta vbscript:createobject("wscript.shell").run("""%~0"" hide",0)(window.close)&&exit
  3. :CmdBegin
  4. @echo off
  5. set INTERVAL=10
  6. :Again
  7. rem 批处理保存为ansi编码格式
  8. set "folder1=C:\Users\dmns25163\Desktop\AAA"
  9. set "folder2=S:\DMNSPZJC"
  10. for %%a in ("%folder1%\*.*") do (
  11. if not exist "%folder2%\%%~nxa" (
  12. move "%%a" "%folder2%"
  13. ) else (
  14. set n=1
  15. call :1 "%%a"
  16. )
  17. )
  18. timeout %INTERVAL%
  19. goto Again
  20. pause
  21. exit
  22. :1
  23. set /a n+=1
  24. if not exist "%folder2%\%~n1(%n%)%~x1" (
  25. move "%~1" "%folder2%\%~n1(%n%)%~x1"
  26. exit /b
  27. ) else (
  28. goto :1
  29. )
复制代码

作者: Batcher    时间: 2023-8-10 13:50

回复 1# adfs945


    Win7里面卡在哪一步了?
作者: Five66    时间: 2023-8-10 15:21

不知道是不是第23行跟第32行的问题
作者: 77七    时间: 2023-8-10 16:11

本帖最后由 77七 于 2023-8-11 18:26 编辑

论坛内另找一段管理员启动的代码,试试。
隐藏运行吗...不了解
作者: adfs945    时间: 2023-8-11 08:54

回复 2# Batcher


     大佬,谢谢指导,我目前的水平还不会排查具体是哪一行。
不过我学继续学习的,谢谢。
作者: LTSC1809    时间: 2023-8-11 09:01

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

同6楼
在每一行下面加一个pause,执行一步按一下
作者: jszw666    时间: 2023-8-11 11:39

回复 6# LTSC1809


    期待,,,,学习中.....
作者: qixiaobin0715    时间: 2023-8-11 12:09

排查代码错误其实没那么复杂。
1.将bat文件中的@echo off那一行删掉并保存;
2.在cmd窗口中执行cd命令,定位到bat文件所在目录;
3.在光标处输入批处理文件名(包括扩展名),回车;
错误提示下一行即是错误位置。
作者: adfs945    时间: 2023-8-11 13:49

回复 3# Five66


    好的,谢谢指导,正在逐句确认中
作者: adfs945    时间: 2023-8-11 13:50

回复 4# 77七


    好的,谢谢指导,尝试中。
作者: adfs945    时间: 2023-8-11 13:51

回复 6# LTSC1809


    谢谢指导,测试中
作者: adfs945    时间: 2023-8-11 13:52

回复 7# czjt1234

谢谢指导,试了一下,第一个是要按回车,后面的好像还是会自动运行。
作者: adfs945    时间: 2023-8-11 13:53

回复 6# LTSC1809


好的,非常感谢
作者: Five66    时间: 2023-8-11 14:51

所以到底是哪里的出问题
作者: adfs945    时间: 2023-8-11 15:06

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




欢迎光临 批处理之家 (http://www.bathome.net/) Powered by Discuz! 7.2