FoxPro/Visual FoxPro - Crear un acceso en archivos de programa

¿Como puedo hacer para que cuando se instale la aplicacion cree un acceso directo dentro de archivos de programa?

Estoy trabajando con VFP 6.0, Win 98 y uso el asistente de instalacion que viene con VFP

Amigo YAXCHE te envio el codigo respectivo, me comentas si funciono...
CREAR UN ACCESO DIRECTO
WshShell = CreateObject(\"WScript.shell\")
strDesktop = wshShell.SpecialFolders(\"Desktop\")
oMyShortCut =WshShell.CreateShortcut(strDesktop+\"\\mi ejemplo.lnk\")
oMyShortCut.WindowStyle = 3
&&oMyShortCut.IconLocation = \"c:\\fox.ico\"
oMyShortCut.TargetPath = \"%windir%\\notepad.exe\"
oMyShortCut.HotKey = \"ALT+CTRL+F\"
oMyShortCut.Save
WAIT WINDOW 'Acceso directo creado...' TIMEOUT 1
Saludos,
GABRIEL

Gracias amigo por contestar.

Si deseo que el acceso directo se haga cuando se instala la aplicación, ¿en que parte pongo el codigo?.

Un saludo

Yaxché

Amigo Yaxche, me imagino que abras creado un programa principal de inicio pues bien ahi es donde insertas el codigo que te di , se supone que tu acceso directo al final debe de apuntar a la ruta donde esta tu ejecutable y todos tus demas archivos ya establecidos, de lo contrario vas probando donde mejor te parezca...
Si no mandame tu programa de inicio y vemos al detalle el asunto...
Saludos,
GABRIEL
PD : EN TUS FORMULARIOS HAZ CREADO ALGUN EFECTO EN ELLOS...FAVOR DE RESPONDER A [email protected]