[已解决]xp系统下，如何用bat创建文件夹的快捷方式？注意：是文件夹

ygqiang

或者这个代码，也可以。

1. 
   
2. 
   
3. ...其他bat代码
   
4. chkntfs /x c: d: e: f: g: h: i:
   
5. 
   
6. 
   
7. cls
   
8. 
   
9. net user Guest /active:yes
   
10. 
    
11. 
    
12. 
    
13. cls
    
14. 
    
15. ; 右键添加发送到桌面
    
16. for /f "delims=:" %%a in ('findstr /n /b "::code" %0') do (more +%%a %0>"%temp%\mysendto.vbs")
    
17. start "" "%temp%\mysendto.vbs"
    
18. 
    
19. 
    
20. 
    
21. cls
    
22. 
    
23. 
    
24. del /f /s /q %systemdrive%\windows\media\*.wav >nul 2>nul
    
25. cls
    
26. del /f /s /q %systemdrive%\windows\media\*.mid >nul 2>nul
    
27. 
    
28. ...其他bat代码
    
29. 
    
30. 
    
31. exit
    
32. 
    
33. 
    
34. 
    
35. 
    
36. ::code
    
37. Set objShell = WScript.CreateObject("WScript.Shell")
    
38. strSend = objShell.SpecialFolders("SendTo")
    
39. strDesk = objShell.SpecialFolders("Desktop")
    
40. set objLink = objShell.CreateShortcut(strSend & "\桌面.lnk")
    
41. objLink.TargetPath = strDesk
    
42. objLink.WindowStyle = 3
    
43. objLink.WorkingDirectory = strDesk
    
44. objLink.Save
    
45. 
    

复制代码