Kent,
This method uses Scripting. I have an API version if you need it.

*!* cSpecialFolder = "AllUsersDesktop"
*!* cSpecialFolder = "AllUsersPrograms"
*!* cSpecialFolder = "AllUsersStartMenu"
*!* cSpecialFolder = "AllUsersStartup"
*!* cSpecialFolder = "Favorites"
*!* cSpecialFolder = "Fonts"
*!* cSpecialFolder = "MyDocuments"
*!* cSpecialFolder = "NetHood"
*!* cSpecialFolder = "PrintHood"
*!* cSpecialFolder = "Programs"
*!* cSpecialFolder = "Recent"
*!* cSpecialFolder = "SendTo"
*!* cSpecialFolder = "StartMenu"
*!* cSpecialFolder = "Startup"
*!* cSpecialFolder = "Templates"

LOCAL cDesktopPath, cSpecialFolder
cSpecialFolder = "Desktop"
WSHShell = CreateObject("WScript.Shell")
IF TYPE("WSHShell") = "O"
     cDesktopPath = WSHShell.SpecialFolders(cSpecialFolder)
endif
Messagebox(cDesktopPath,0,"USING WINDOWS SCRIPT")



Dave Crozier


-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf
Of Kent Belan
Sent: 05 December 2007 16:55
To: 'ProFox Email List'
Subject: Program Files path

Hello,
How can I determine the drive and full path where the Program Files folder
is located?

Thanks,
Kent




[excessive quoting removed by server]

_______________________________________________
Post Messages to: ProFox@leafe.com
Subscription Maintenance: http://leafe.com/mailman/listinfo/profox
OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED]
** All postings, unless explicitly stated otherwise, are the opinions of the 
author, and do not constitute legal or medical advice. This statement is added 
to the messages for those lawyers who are too stupid to see the obvious.

Reply via email to