Iniciar sesiónCerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta
LWP » Foros » Visual Basic » Acceso Directo

Visual Basic - Acceso Directo

Life is soft - evento anual de software empresarial
Volver
Nuevo Tema
<<>>
 
Vista:

Acceso Directo

Publicado por Pollito (1 intervención) el 22/03/2001 12:01:11
¿como puedo que una instalacion de VB6 me cree un acceso directo en el escritorio?.Si alguien lo sabe que me lo diga por favor.Gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Acceso Directo

Publicado por bla (230 intervenciones) el 22/03/2001 12:21:17
La solución la tienes en:
http://www.somser.com/trucos/vb/AccesoDirector.htm

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

Dim lReturn As Long

'Add to Desktop
lReturn = fCreateShellLink("..\..\Desktop", "Shortcut to Calculator", "c:\windows\calc.exe", "")

'Add to Program Menu Group
lReturn = fCreateShellLink("", "Shortcut to Calculator", "c:\windows\calc.exe", "")
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar