Shortcuts

[notquitehere188]

how do you make shortcuts on the desktop

[RobDog888]

This is a nice CodeBank example using VB.

[RobDog888]

And here is one using Windows Scripting Host.

[|2eM!x]

and here is one thats really short:

Private Declare Function fCreateShellLink Lib "VB5STKIT.DLL" _
    (ByVal lpstrFolderName As String, ByVal lpstrLinkName As String, _
    ByVal lpstrLinkPath As String, ByVal lpstrLinkArgs As String) As Long
 
dim result as long
 
Result = fCreateShellLink("..\..\Desktop", ShortCutName, App.Path & "\exename.exe", (properties))

you can delete the , properties, its for adding properties to the shortcut

[notquitehere188]

whenever i try to run that i get the error
cannont find "VB5STKIT.DLL"

[RobDog888]

VB5STKIT.DLL is only supplied with VB5.

Heres the original reference.

[notquitehere188]

what does it have to be for vb 6

[RobDog888]

The example in post #2.

[notquitehere188]

really, i would prefer to use code i understand

[notquitehere188]

and the example in post 2 dosent work

[RobDog888]

The example in #3 is easier.

[notquitehere188]

the example in post 3 does

[|2eM!x]

use google to find the dll man...