@echo off>makelnk.vbs echo Set WshShell = WScript.CreateObject("WScript.Shell")>>makelnk.vbs echo strDesktop = WshShell.SpecialFolders("Desktop")>>makelnk.vbs echo set oShellLink = WshShell.CreateShortcut(strDesktop & "32.lnk")>>makelnk.vbs echo oShellLink.IconLocation = "" : '图标>>makelnk.vbs echo oShellLink.TargetPath = "D:\2015\32.bat" : '目标>>makelnk.vbs echo oShellLink.WorkingDirectory = "D:\2015" : '起始位置>>makelnk.vbs echo oShellLink.Hotkey = "" : '快捷键>>makelnk.vbs echo oShellLink.WindowStyle = 1 :'运行方式,参数1默认窗口激活,参数3最大化激活,参数7最小化>>makelnk.vbs echo oShellLink.Description = "" : '备注>>makelnk.vbs echo oShellLink.Save : '创建保存快捷方式makelnk.vbsdel /f /q makelnk.vbs