CreateShortcut
Function CreateShortcut(lnkpath:String, volume: Integer, volume_type: Integer)
lnkpath: The path to a shortcut file to create. If the file extension ".lnk" is not included, it will be done appended automatically
volume: The volume that the lnk file will be created on (currently, only LNK_VOLUME_LOCAL is valid).
volume_type: The type of volume that the lnk file will be created on (e.g. LNK_VOLUME_TYPE_FIXED) - see Exported Constants, section lVolumeType.
Creates/clears the shortcut handle, ready for adding attributes or writing.
Example:
Include "lnk.bb"
CreateShortcut("My Shortcut", LNK_VOLUME_LOCAL, LNK_VOLUME_TYPE_FIXED)
lnk\lDescription$ = "Here's my test shortcut!!!"
lnk\lTargetPath$ = "" + CurrentDir$() + "test.txt"
lnk\lRelativePath$ = ".\test.txt"
lnk\lWorkingDir$ = "" + CurrentDir$()
lnk\lCustomIcon$ = "" + CurrentDir$() + "test.ico"
If WriteShortcut() = False Then RuntimeError("Couldn't create shortcut")
CreateShortcut("My Shortcut (2)", LNK_VOLUME_LOCAL, LNK_VOLUME_TYPE_FIXED)
lnk\lDescription$ = "Here's another one!"
lnk\lTargetPath$ = "" + CurrentDir$() + "test.txt"
lnk\lRelativePath$ = ".\test.txt"
lnk\lWorkingDir$ = "" + CurrentDir$()
lnk\lCustomIcon$ = "" + CurrentDir$() + "test.ico"
If WriteShortcut() = False Then RuntimeError("Couldn't create shortcut")
RuntimeError("Okay!")