Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Create Shortcut on Desktop In Code (not during install)
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00801769
Message ID:
00802916
Vues:
37
Thanks Tracy for the code. I just roughly studied it. It opens an existing pif probably a template pif, modifies the var to which the pif details are stored and resaves it as a new name. Hope this is what it does. What does DriveSpec contain? the full pathname?

Please correctme if I am wrong.

Thanks, appreciating your help.

>Sure but I am not sure that it will help you. It modifies a .pif file and only works in Win95/Win95 because it relies on the os directory being c:\windows and the desktop directory being located there. I'm in the process of changing it for the VFP8 app to create the lnk and store it in the desktop directory where-ever that may be in the different os versions but I got sidetracked yesterday with other emergencies and didn't get it done yet. I'm hoping to get it done today.
>
>For what it is worth, here is the older FPD26 code:
>
>
>x=fopen('rackf.pif')
>J=FREAD(x,2048)
>z=0
>DO WHILE .T.
>	z=z+1
>	dr=AT("F:",j)
>	IF dr=0 OR z = 100
>		EXIT
>	ENDIF
>	j = LEFT(j,dr-1)+DriveSpec+SUBSTR(j,dr+2)
>ENDDO
>=FCLOSE(X)
>x=FCREATE("C:\WINDOWS\DESKTOP\ProRack.pif")
>=FWRITE(x,j)
>=fclose(x)
>
>
>>Hi Tracy,
>>
>>I was just browsing this thread and I notice this
>>
>>>(in FPD26 we used to do it by creating a .pif file using fcreate and storing it in c:\windows for win95/98 users)
>>
>>Could you share your code regarding this. Right now for now for all my DOS application the shortcuts are created manually.
>>
>>This would be a great addition.
Regards
Bhavbhuti
___________________________________________
Softwares for Indian Businesses at:
http://venussoftop.tripod.com
___________________________________________
venussoftop@gmail.com
___________________________________________
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform