MyShortcut.TargetPath = Application.ExecutablePath
![vb.net create lnk file vb.net create lnk file](https://docs.telerik.com/devtools/winforms/controls/file-dialogs/dialog-controls/images/file-dialogs-radopenfiledialog001.png)
MyShortcut = Where the shortcut should point to String deskDir = Environment.GetFolderPath()
![vb.net create lnk file vb.net create lnk file](https://www.sourcecodester.com/sites/default/files/2019-07-15_4.png)
IWshRuntimeLibrary.IWshShortcut MyShortcut Create a new instance of WshShellClass private void createShortcutOnDesktop(String executablePath) WorkingDir = shellShortcut.WorkingDirectory Using (var shellShortcut = new ShellShortcut(existingShortcut)) Using (var shellShortcut = new ShellShortcut(newShortcutPath) T.InvokeMember("Save", BindingFlags.InvokeMethod, null, lnk, null) Object lnk = t.InvokeMember("CreateShortcut", BindingFlags.InvokeMethod, null, shell, new object) Object shell = Activator.CreateInstance(t) Var lnk = shell.CreateShortcut("sc.lnk")
![vb.net create lnk file vb.net create lnk file](https://i1.rgstatic.net/publication/342656366_Creating_Personal_tool_to_open_Maximo_directly_with_entering_password_once_and_use_forever/links/5efec6f4299bf18816fce153/largepreview.png)
NET 4.0) Type t = Type.GetTypeFromCLSID(new Guid("72C24DD5-D70A-438B-8A42-98424B88AFB8")) //Windows Script Host Shell ObjectÄynamic shell = Activator.CreateInstance(t)