批处理之家 - Powered by Discuz! Board

标题: [文件操作] 怎么用批处理创建快捷方式？ [打印本页]

作者: mokmao 时间: 2008-5-5 19:39 标题: 怎么用批处理创建快捷方式？

各位高手帮帮忙啊请问怎么用bat创建桌面快捷方式先谢过

作者: 随风 时间: 2008-5-5 19:53

lj 为需创建快捷方式的文件全路径。
name 为快捷方式的名字，可以自定义。
m 为快捷方式的目的地。

@echo off
set "lj=f:\111\a.bat"
set "name=新创建的快捷方式"
set m="%USERPROFILE%\桌面\%name%.url"
echo [InternetShortcut] >>%m%
echo URL="%lj%" >>%m%
echo IconIndex=0 >>%m%
echo IconFile=%name% >>%m%
复制代码

作者: lixiaodaoaaa 时间: 2008-5-5 22:01 标题: 顶一下

你怎么这么厉害，我怎么不知道这么做啊 !!
好好厉害啊!

作者: tanpeng551 时间: 2008-5-6 02:20

这样创建的快捷方式没有图标哦

作者: 葱头 时间: 2008-5-6 08:53

不是吧~~怎么回没有i??????????????????????????

作者: mokmao 时间: 2008-5-6 15:45

真是太感谢了

作者: springcm 时间: 2008-5-7 16:09

用CMD 创建

echo [InternetShortcut] >>快捷方式路径.url
echo URL=程序路经>>快捷方式路径.url
echo IconIndex=0 >>快捷方式路径.url   
echo IconFile=程序路经>>快捷方式路径.url
用VBS创建快捷方式到桌面，根据自己的情况自己修改下就能用了。
set WshShell = WScript.CreateObject("WScript.Shell")
strDesktop = WshShell.SpecialFolders("desktop")
set ShellLink = WshShell.CreateShortcut(strDesktop & "\Pegasus660.lnk")
ShellLink.TargetPath = "D:\Pegasus660\Bin\peg32.exe"
ShellLink.WindowStyle = 1
ShellLink.Hotkey = "CTRL+SHIFT+C"
ShellLink.IconLocation = "D:\Pegasus660\Bin\pegasus.exe, 0"
ShellLink.Description = "The new version of Pegasus660"
ShellLink.WorkingDirectory = "D:\Pegasus660\Bin"
ShellLink.Save
sub bat
start wscript -e:vbs "%~f0"
End Sub
复制代码

欢迎光临批处理之家 (http://bbs.bathome.net/)

Powered by Discuz! 7.2