Whats the best way to create a desktop shortcut ? - Level Extreme

Level Extreme platform

Subscription

Corporate profile

Products & Services

Support

Legal

Français

Whats the best way to create a desktop shortcut ?

Message

From

17/01/2001 20:43:48

Alex Feldstein
Florida, United States

To

17/01/2001 10:12:33

Greg Watson
Genesis Software
Bellevue, Washington, United States

General information

Forum:

Visual FoxPro

Category:

Installation, Setup and Configuration

Title:

Re: Whats the best way to create a desktop shortcut ?

Miscellaneous

Thread ID:

00464645

Message ID:

00464980

Views:

10

>>>>>>>>>>>>
I need to create a desktop shortcut after setup. Want to do it within another program. What is the best way ?
>>>>>>>>>>>>

Use WSH:

oWsh = CreateObject("WScript.Shell")
cDesktopDir = oWsh.SpecialFolders("Desktop")
oLnk = oWsh.CreateShortcut(cDesktopDir + "\\Shortcut to Notepad.lnk")
oLnk.TargetPath = cDesktopDir + "\\notepad.lnk"
oLnk.Save()

Alex Feldstein, MCP, Microsoft MVP
VFP Tips: English - Spanish
Website - Blog - Photo Gallery

"Once again, we come to the Holiday Season, a deeply religious time that each of us observes, in his own way, by going to the mall of his choice." -- Dave Barry

Click here to load this message in the networking platform