Visual Basic - Acceso Directo

Alguien me puede decir como hacer para crear un acceso directo desde VB?
Tengo VB 6.0 con Win98, y lo que hago es hacer una llamada a fCreateShellLink(), con los parametros correspondientes pero no me anda.

Si alguien tiene algun codigo de muestra que si funcione le agradezco si lo comparte.

Sacado de ApiGuide:

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
Private Sub Form_Load()
'KPD-Team 1999
'URL: http://www.allapi.net/
'E-Mail: [email protected]
' -> code by Raist Lin
'Create a shell link on your desktop
lngresult = fCreateShellLink("..\..\Desktop", "LINK", "C:\myfile.exe", "")
End Sub

Espero que te sirva
Un Saludo

Sabes si solo funciona con .exe, puede funcionar con paginas web?