Skip to content

Desktop_CreateShortCut

Creates a shortcut (.lnk file) in a specified folder. If the folder doesn’t exist, the function creates it.

In computer jobs, per-user folders such as Folder_Desktop and Folder_Programs belong to the account that runs the job. Use the all-users folders, for example Folder_AllUsersDesktop, to create shortcuts that every user sees.

Desktop_CreateShortCut(sDescription, sShortcutFileName, sTargetPath, sArguments, sWorkingDirectory, sShortcutFolder, sIconLocation, iWindowStyle, sHotKey) As Boolean

A description for the shortcut (e.g. “Calculator”)

Name of the .lnk file (e.g. Calc.lnk). If the name doesn’t end with .lnk, the function adds it.

Full path to the application (e.g. C:\Windows\calc.exe)

Commandline arguments, if any

Working directory for the application

You can use Special folders Constants together with a path

Iconlocation (often found in the .exe file)

Windows Style Constants (minimized, normal, maximized, etc.). 0 keeps the default window style of the shortcut.

Hotkey for executing shortcut (e.g. CTRL+ALT+W)

Boolean, TRUE if function completed successfully.

'Creates a shortcut on the users start menu
If bStatus Then bStatus=Desktop_CreateShortCut("Creates CapaInstaller scripts","CapaInstaller Manager.lnk",gsProgramFiles & "\CapaInstaller Manager\ciman.exe","", gsProgramFiles & "\CapaInstaller Manager",Folder_Programs & "\CapaInstaller",gsProgramFiles & "\CapaInstaller Manager\Ciman.exe",0,"CTRL+ALT+C")
'Create a shortcut in c:\temp
If bStatus Then bStatus=Desktop_CreateShortCut("Creates CapaInstaller scripts","CapaInstaller Manager.lnk",gsProgramFiles & "\CapaInstaller Manager\ciman.exe","", gsProgramFiles & "\CapaInstaller Manager","C:\temp",gsProgramFiles & "\CapaInstaller Manager\Ciman.exe",0,"CTRL+ALT+C")
'Creates a shortcut on all users desktop
If bStatus Then bStatus=Desktop_CreateShortCut("Create advanced CAD drawings","AutoCad 2000.lnk",gsProgramFiles & "\Autodesk\Autocad 2000\autocad.exe","/new /ddeexec=2", gsTempDir,Folder_AllUsersDesktop,gsProgramFiles & "\Autodesk\AutoCad\Autocad.ico",0,"")
'Creates a shortcut to notepad in the Send To folder.
If bStatus Then bStatus=Desktop_CreateShortCut("","Notepad.lnk",gsWindowsDir & "\notepad.exe","", gsTempDir,Folder_SendTo,gsWindowsDir & "\notepad.exe",0,"")

Scripting Guidelines

Desktop functions Constants Package Property Variables