Ajouter un racourçi dans Windows 98

Si vous aimeriez ajouter un racourçi de votre programme dans le Menu Démarrer , vous pouvez utiliser la fonction API, fCreateShellLink, c'est elle qui est utilisé dans le setupkit.

Declarations

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

Si vous utilisez Windows 95 alors utilisez l'API suivant:

Private Declare Function fCreateShellLink Lib "STKIT432.DLL" (ByVal lpstrFolderName as String, ByVal lpstrLinkName as String, ByVal lpstrLinkPath as String, ByVal lpstrLinkArgs as String) As Long

Utilisation

Pour ajouter l'icon au menu de démarrage, vous avez besoin d'appeler la fonction a l'aide de ces parametres :

  • lpstrFolderName = Le dossier où vous allez placer le racourçi.
  • lpstrLinkName = Nom ou texte qui va apparaître sur le lien.
  • lpstrLinkPath = Chemin vers lequel le lien va mener.
  • lpstrLinkArgs = Arguments pour le fichier.

    Et pour ajouter un icone sur le bureau, vous allez utiliser le code suivant :

    Dim lngResult As Long

    Call lngResult = fCreateShellLink("..\..\Desktop", "Link to my program", "C:\Path\Program.exe","")