Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Sending shortcuts to users desktops on W98 W2K WinXP 2003
Message
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Sending shortcuts to users desktops on W98 W2K WinXP 2003
Environment versions
Visual FoxPro:
VFP 8
OS:
Windows XP SP1
Network:
Windows 2000 Server
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01109071
Message ID:
01109071
Views:
63
I am trying to save a LNK file to users desktops using the following code:
cFileName = "\\baker\apps\QuestPDMHangers\CheckHanger.bat"
cLinkName = "CheckHanger002.LNK"
cDestination = "C:\Documents and Settings\lewisn\Desktop"

oShell = CREATEOBJECT('WScript.Shell')
olink = oShell.CreateShortcut(cDestination +"\"+ cLinkName)
oLink.TargetPath = cfilename 
oLink.Arguments = "00001"
oLink.Save() 
The problem is cDestination assumes the windows OS path is C:\Documents and Folders. IS there a global way of sending files to the desktop. i.e. \\\desktop. The reason I ask is that some users may have windows 98 which doesnt have this path for its desktop.

Any suggestions?
Neil Lewis
IT R&D Manager
Velmore Ltd
Next
Reply
Map
View

Click here to load this message in the networking platform