Question

bat创建快捷方式到指定地址

在文件夹下（这个文件夹位置不是固定的）有 a.exe 和 b.bat 运行b.bat 后要在指定的位置创建一个名为：猪猪 快捷方式 （比如在C:\Program Files\）或者在（C:\Documents and Settings\Administrator \桌面） 谢谢。

Answer 1

试试这个

－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""Desktop"") & ""\快捷方式显示的名称.lnk""):b.TargetPath=""运行程序的全路径"":b.WorkingDirectory=""运行程序所在的目录"":b.Save:close")
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
其中的desktop指的就是桌面，可以自定义。里面的汉字部分是根据你的需要修改的部分。

Answer 2

@echo off
color 0e&MODE con: COLS=79 LINES=25&title 风镟碧浪
set pat=
set/p pat=请输入要生成快捷方式的完整路径：
echo Set ws=WScript.CreateObject("wscript.shell")>%temp%\aa.vbs
echo strdesktop=ws.SpecialFolders("%pat%")>>%temp%\aa.vbs
echo Set path=ws.CreateShortcut("%pat%\猪猪.lnk")>>%temp%\aa.vbs
echo path.targetpath="%cd%\a.exe">>%temp%\aa.vbs
echo path.save>>%temp%\aa.vbs
cscript //nologo %temp%\aa.vbs&del %temp%\aa.vbs
pause

Answer 3

@echocopy a.exe C:/WINDOWSfor /f "delims=" %%i in ("%cd%.m") do set pathis=%%~dpiset shortCutPath="%USERPROFILE%\桌面\A.lnk" echo Dim WshShell,Shortcut>>doit.vbs echo Dim path,fso>>doit.vbs echo path="C:\WINDOWS\A.exe">>doit.vbs
echo Set fso=CreateObject("Scripting.FileSystemObject")>>doit.vbs echo Set WshShell=WScript.CreateObject("WScript.Shell")>>doit.vbs echo Set Shortcut=WshShell.CreateShortCut(%shortCutPath%)>>doit.vbs echo Shortcut.TargetPath=path>>doit.vbs echo Shortcut.Save>>doit.vbs "%SystemRoot%\System32\WScript.exe" doit.vbs @del /f /s /q doit.vbs

Answer 4

@echo
echo Dim WshShell,Shortcut>>tmp.vbs
echo Dim path,fso>>tmp.vbs
echo path="%~dp0\a.exe\">>tmp.vbs
echo Set fso=CreateObject("Scripting.FileSystemObject")>>tmp.vbs
echo Set WshShell=WScript.CreateObject("WScript.Shell")>>tmp.vbs
echo Set Shortcut=WshShell.CreateShortCut("C:\Documents and Settings\Administrator \桌面\猪猪 快捷方式.lnk")>>tmp.vbs
echo Shortcut.TargetPath=path>>tmp.vbs
echo Shortcut.Save>>tmp.vbs
tmp.vbs
exit