>I've been using a VFP (v6.0) app to invoke Hummingbird's Host Explorer v6.2 OLE functions as a means of automating various interfaces with our mainframe. Things go along nicely for a while and then Host Explorer (and VFP, and everything else) freeze up. Once I end the Host Explorer session, everything springs back to life. I suspect there's some memory problem. I've done everything I could think of to optimize my VFP app. Has anyone else tried to use Host Explorer? Has anyone encountered this kind of problem? Any ideas, help, etc., would be much appreciated.

I haven't tried host explorer, but use BI-Query (Hummingbird) product to interface with our Tandem. Their OLE model doesn't expose much, so I use what's available and then use the sendkeys ocx (available in the files section)to automate the downloads. I have several processes that occur automatically such as downloading all active warrants twice each day, then copying them to our website, and also update the jail information web page 4 times daily with this.

Some of the sendkeys code looks like the following:

* a delay is needed because there are no events exposed by Hummingbird.
* So, I use the sleep api call and invoke it for N seconds (based on testing.)
Declare Sleep IN Win32API;
	INTEGER dwMilliseconds


Set classlib to C:\gqlfox\sendkeyz additive
mykeys=create('skeys.skeyz')
mykeys.Sendmykeyz('CO','%c',1)
Sleep(30*1000)

If file('c:\models\injail.qrd')
	Erase 'c:\models\injail.qrd'
Endif
ogql=create('biquery.user.application')
ogql.Open("C:\MODELS\AG000001.GQU")
ogql.visible=.t.
datamodelqry = ogql.DataModel
If type('datamodelqry')='U'
	Messagebox ('Loading Data Model Failed')
	Return
Endif
*suspend
Sleep(60*1000)
_Screen.windowstate=1
mykeys.Sendmykeyz('BI','%q L',1)
Sleep(2*1000)
mykeys.Sendmykeyz('BI','INJAIL',1)
Sleep(4*1000)
mykeys.Sendmykeyz('BI','%L%qF',1)
Sleep(30*1000)
mykeys.Sendmykeyz('BI','INJAIL',1)
Sleep(5*1000)
mykeys.Sendmykeyz('BI','%s',1)
Sleep(400*1000)
Application.visible=.f.
Start=datetime()
* close BI
Wait clear
*mykeys.Sendmykeyz('BI','%fx',1)
ogql.quit