| 
 | 
::--------------------------创建快捷方式--------------------------- 
mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(""c:\Users\Public\Desktop\WPS文字.lnk""):b.TargetPath=""%~dp0office6\wps.exe"":b.WorkingDirectory=""%~dp0"":b.Save:close") 
 
绿化批处理中"c:\Users\Public\Desktop\WPS文字.lnk" 建议用"%PUBLIC%\Desktop\WPS文字.lnk"替代,不然PE下绿化时无桌面快捷方式。 |   
 
 
 
 |