[文件操作] 怎样创建批处理文件自身的快捷方式?

lon91ong

如题,我用网上找到的代码

echo [InternetShortcut] >> %~p0\shortcut.url
echo URL="%~f0" >> %~p0\shortcut.url
echo IconIndex=29 >>shortcut.url
echo IconFile=C:\windows\system32\shell32.dll >>shortcut.url
复制代码

不能运行,总是出现下图的错误提示!
[attach]1549[/attach]
麻烦大侠帮忙想想,有没有别的好方法了!

多谢大侠了!

pusofalse

%~p0是批处理自身所在路径，若其中有空格必须用""闭合。
另，是生成在当前目录，%~p0可以不要。
去掉试下：

echo [InternetShortcut]> shortcut.url
echo URL="%~f0">>shortcut.url
echo IconIndex=29>>shortcut.url
echo IconFile=C:\windows\system32\shell32.dll>>shortcut.url
复制代码

lon91ong

还是不行,问题一样,还是提示上面的错误!

pusofalse

我这里测试正常。
测试信息：

D:\>type a.bat
echo [InternetShortcut]> shortcut.url
echo URL="%~f0">>shortcut.url
echo IconIndex=29>>shortcut.url
echo IconFile=C:\windows\system32\shell32.dll>>shortcut.url
pause
D:\>a.bat

D:\>echo [InternetShortcut] 1>shortcut.url

D:\>echo URL="D:\a.bat" 1>>shortcut.url

D:\>echo IconIndex=29 1>>shortcut.url

D:\>echo IconFile=C:\windows\system32\shell32.dll 1>>shortcut.url

D:\>pause
请按任意键继续. . .

D:\>type shortcut.url
[InternetShortcut]
URL="D:\a.bat"
IconIndex=29
IconFile=C:\windows\system32\shell32.dll

D:\>shortcut.url

D:\>
复制代码

shortcut.url:

D:\>echo [InternetShortcut] 1>shortcut.url

D:\>echo URL="D:\a.bat" 1>>shortcut.url

D:\>echo IconIndex=29 1>>shortcut.url

D:\>echo IconFile=C:\windows\system32\shell32.dll 1>>shortcut.url

D:\>pause
请按任意键继续. . .
复制代码

zqz0012005

URL快捷方式尽量少用于非URL，毕竟不是通用快捷方式.lnk，有时可能会出现意料之外的错误
用vbs生成.lnk快捷方式：

set ws = WScript.CreateObject("WScript.Shell")
strDesktop = ws.SpecialFolders("Desktop")
set oShellLink = ws.CreateShortcut(strDesktop & "\a.lnk")
oShellLink.TargetPath = "C:\test\a.bat"
oShellLink.IconLocation = "C:\windows\system32\shell32.dll, 29"
oShellLink.WorkingDirectory = strDesktop
oShellLink.Save
复制代码