在Go中创建一个Windows快捷方式（.lnk）

Question

我想创建一个Windows快捷方式（.lnk）到桌面和Golang的startmenu。

我实际上是通过gowin模块拿到桌面&开始菜单文件夹，我想创建一个快捷方式放入系统的位置。

我搜索了但我没有找到任何golang项目。我应该创建它吗？还有其他漂亮的方法吗？

Answer 1

使用https://github.com/go-ole/go-ole：

ole.CoInitializeEx(0, ole.COINIT_APARTMENTTHREADED|ole.COINIT_SPEED_OVER_MEMORY) 
oleShellObject, err := oleutil.CreateObject("WScript.Shell") 
if err != nil { 
    return err 
} 
defer oleShellObject.Release() 
wshell, err := oleShellObject.QueryInterface(ole.IID_IDispatch) 
if err != nil { 
    return err 
} 
defer wshell.Release() 
cs, err := oleutil.CallMethod(wshell, "CreateShortcut", dst) 
idispatch := cs.ToIDispatch() 
oleutil.PutProperty(idispatch, "TargetPath", src) 
oleutil.CallMethod(idispatch, "Save") 

Answer 2

不，没有任何漂亮的方法可以在golang中创建.lnk文件。

主要原因是，.lnk文件是特定于Windows的文件。

在Windows中，即使是本机程序也需要使用OLE（对象链接和嵌入）和COM（组件对象模型）来创建快捷方式文件，如this answer中所述。

在我看来，在golang中解决这个问题的一种方法是使用gowin，并尝试与OLE COM进行通信。

OR

编写本机Windows组件不会创建.lnk文件的实际工作，并通过你们走程序派生它的进程。

Answer 3

经由外部程序从this subject解决方案：从Optimumx

Shortcut.exe /f:"%USERPROFILE%\Desktop\sc.lnk" /a:c /t:%USERPROFILE%\Desktop\scrum.pdf 

.VBS

快捷可执行从NirSoft

shortcut "f:\winnt\system32\calc.exe" "~$folder.desktop$" "Windows Calculator" 
shortcut "f:\winnt\system32\calc.exe" "~$folder.programs$\Calculators" "Windows Calculator" 
shortcut "f:\Program Files\KaZaA\Kazaa.exe" "c:\temp\MyShortcuts" "Kazaa" 
shortcut "f:\Program Files" "c:\temp\MyShortcuts" "Program Files Folder" "" "f:\winnt\system32\shell32.dll" 45 
shortcut "f:\Program Files" "c:\temp\MyShortcuts" "Program Files Folder" "" "" "" "max" 

快捷可执行

Set oWS = WScript.CreateObject("WScript.Shell") 
sLinkFile = "C:\MyShortcut.LNK" 
Set oLink = oWS.CreateShortcut(sLinkFile) 
    oLink.TargetPath = "C:\Program Files\MyApp\MyProgram.EXE" 
' oLink.Arguments = "" 
' oLink.Description = "MyProgram" 
' oLink.HotKey = "ALT+CTRL+F" 
' oLink.IconLocation = "C:\Program Files\MyApp\MyProgram.EXE, 2" 
' oLink.WindowStyle = "1" 
' oLink.WorkingDirectory = "C:\Program Files\MyApp" 
oLink.Save 

Powershell的脚本

set TARGET='D:\Temp' 
set SHORTCUT='C:\Temp\test.lnk' 
set PWS=powershell.exe -ExecutionPolicy Bypass -NoLogo -NonInteractive -NoProfile 

%PWS% -Command "$ws = New-Object -ComObject WScript.Shell; $s = $ws.CreateShortcut(%SHORTCUT%); $S.TargetPath = %TARGET%; $S.Save()" 

Answer 4

的AWFUL工作 golang溶液使用VBS;

package main 

import(
    "bytes" 
    "fmt" 
    "io/ioutil" 
    "os" 
    "os/exec" 
) 

func createShortcut(linkName string, target string, arguments string, directory string, description string, destination string) { 
    var scriptTxt bytes.Buffer 
    scriptTxt.WriteString("option explicit\n\n") 
    scriptTxt.WriteString("sub CreateShortCut()\n") 
    scriptTxt.WriteString("dim objShell, strDesktopPath, objLink\n") 
    scriptTxt.WriteString("set objShell = CreateObject(\"WScript.Shell\")\n") 
    scriptTxt.WriteString("strDesktopPath = objShell.SpecialFolders(\"") 
    scriptTxt.WriteString(destination) 
    scriptTxt.WriteString("\")\n") 
    scriptTxt.WriteString("set objLink = objShell.CreateShortcut(strDesktopPath & \"\\") 
    scriptTxt.WriteString(linkName) 
    scriptTxt.WriteString(".lnk\")\n") 
    scriptTxt.WriteString("objLink.Arguments = \"") 
    scriptTxt.WriteString(arguments) 
    scriptTxt.WriteString("\"\n") 
    scriptTxt.WriteString("objLink.Description = \"") 
    scriptTxt.WriteString(description) 
    scriptTxt.WriteString("\"\n") 
    scriptTxt.WriteString("objLink.TargetPath = \"") 
    scriptTxt.WriteString(target) 
    scriptTxt.WriteString("\"\n") 
    scriptTxt.WriteString("objLink.WindowStyle = 1\n") 
    scriptTxt.WriteString("objLink.WorkingDirectory = \"") 
    scriptTxt.WriteString(directory) 
    scriptTxt.WriteString("\"\n") 
    scriptTxt.WriteString("objLink.Save\nend sub\n\n") 
    scriptTxt.WriteString("call CreateShortCut()") 
    fmt.Print(scriptTxt.String()) 

    filename := fmt.Sprintf("lnkTo%s.vbs", destination) 
    ioutil.WriteFile(filename, scriptTxt.Bytes(), 0777) 
    cmd := exec.Command("wscript", filename) 
    err := cmd.Run() 
    if err != nil { 
     fmt.Println(err) 
    } 
    cmd.Wait() 
    os.Remove(filename) 
    return 
}