Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Network runtime
Message
 
To
18/11/2005 15:11:43
Don Hagan
Federal Reserve Bank of Kansas City
Kansas City, Missouri, United States
General information
Forum:
Visual FoxPro
Category:
Installation, Setup and Configuration
Title:
Environment versions
Visual FoxPro:
VFP 9
Miscellaneous
Thread ID:
01070052
Message ID:
01070377
Views:
14
Why cant u use activex controls? Arent u still referencing the controls on the local box and that particluar win registry as well?

>This approach means the app can't use ActiveX controls, etc but for the apps I've done, this hasn't been an issue.
>
>
>
>LOCAL lcexe, lnpos, lccurdir
>lcexe = SYS(16)
>lnpos = ATC('XAsset.EXE',lcexe) - 2
>lccurdir = SUBSTR(lcexe,1,lnpos)
>SET DEFAULT TO (lccurdir)
>
>
>PUBLIC mdrive, mdir, mexe, msqlhprobe, mconnectstr
>mdrive = " "
>mdir = " "
>mexe = " "
>msqlhprobe = 0
>mconnectstr = " "
>
>
>* Start an app in a directory and using info
>* in a database (asset in this case)to go to another drive/directory and run an exe for an app.
>* Have an exe/dbf like this for every app ; the contents of the dbf could be different for each server.
>
>set talk off
>set resource off
>USE ASSET shared noupdate
>
>* establish a connection to sql server to force load of odbc dlls that are in vfp60lib directory
>mconnectstr = ALLTRIM(CONNECTSTR) + ''
>msqlhprobe = sqlstringconnect(mconnectstr)
>
>* 05/05/2002 added alltrim on appdrive
>mdrive = ALLTRIM(APPDRIVE)
>mdir = ALLTRIM(APPDIR)
>mexe = ALLTRIM(APPEXE)
>USE
>CLOSE ALL
>
>
>mpath = mdrive + "\" + mdir
>SET DEFAUL TO (mpath)
>release mdrive, mdir, mpath
>DO (mexe)
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform