win10VBS运行mklink提示“系统找不到指定的文件”

tsqingfeng

1. Option Explicit
   
2. 
   
3. Dim fso,objShell,strCmd
   
4. Set fso = CreateObject("Scripting.FileSystemObject")
   
5. if (fso.fileexists("c:\Test_mklink\cs2\cstrike.exe")) then fso.DeleteFile("c:\Test_mklink\cs2\cstrike.exe")
   
6. Set objShell = CreateObject("Wscript.Shell")
   
7. 
   
8. strCmd = "mklink"
   
9. strCmd = strCmd & " "
   
10. strCmd = strCmd & Chr(34) & "c:\Test_mklink\cs2\cstrike.exe" & Chr(34)
    
11. strCmd = strCmd & " "
    
12. strCmd = strCmd & Chr(34) & "c:\Test_mklink\cs1\cstrike.exe" & Chr(34)
    
13. 
    
14. 'Wscript.echo strCmd
    
15. 'InputBox "", "", strCmd
    
16. objShell.Run strCmd

复制代码

以上代码在win10运行提示“系统找不到指定的文件” 代码：80070002 源：（null）
我在管理员命令提示符下运行同样错误。请问怎么修改？

tsqingfeng

我看了看以前编的VBS,发现要加上cmd /c 之后就解决了.