在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 
}