Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Link to email
Message
From
07/03/1999 11:56:12
Calvin Smith
Wayne Reaves Computer Systems
Macon, Georgia, United States
 
 
To
06/03/1999 07:59:12
Jay Johengen
Altamahaw-Ossipee, North Carolina, United States
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Title:
Miscellaneous
Thread ID:
00194055
Message ID:
00195009
Views:
17
Cut and paste this function- I know this works

FUNCTION ShellExec
LPARAMETER lcLink, lcAction, lcParms
lcAction = IIF(EMPTY(lcAction), "Open", lcAction)
lcParms = IIF(EMPTY(lcParms), "", lcParms)
DECLARE INTEGER ShellExecute IN SHELL32.dll INTEGER nWinHandle,STRING cOperation, STRING cFileName,STRING cParameters,STRING cDirectory,INTEGER nShowWindow
DECLARE INTEGER FindWindow IN WIN32API ;
STRING cNull,STRING cWinName
RETURN ShellExecute(FindWindow(0, _SCREEN.caption),lcAction, lcLink, lcParms, SYS(2023), 1)

*!* and then try the following link (adjust the paths as necessary):
*!* ShellExec("http://www.west-wind.com/")
A problem is a problem only as long as it has a possible solution. Lacking that, it becomes a FACT!
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform