|
本帖最后由 2013cxh0468 于 2024-3-22 14:56 编辑
三个桌面快捷方式用批处理能生成
mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""Desktop"") & ""\wps文字.lnk""):b.TargetPath=""%~sdp0office6\wps.exe"":b.WorkingDirectory=""%~sdp0office6"":b.Save:close")
mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""Desktop"") & ""\wps表格.lnk""):b.TargetPath=""%~sdp0office6\et.exe"":b.WorkingDirectory=""%~sdp0office6"":b.Save:close")
mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""Desktop"") & ""\wps幻灯片.lnk""):b.TargetPath=""%~sdp0office6\ppt.exe"":b.WorkingDirectory=""%~sdp0office6"":b.Save:close")批处理位置与office6文件夹处于同一级
|
|