I have written a automation server in Delphi . The server controller is written in html and uses VBScript to launch the server and perform method calls. Data is pass to/from the server through parmeters. This works great. Code section below shows how the server is created and an example of a method call.
The problem I am trying to solve is to make the automation server PERSISTENT WHEN THE WEB PAGE REFRESHES and BETWEEN DIFFERENT PAGES.
Question: What do I need to do with the frameset and frame tags to make the hidden frame load ONCE when I laundh IE6 and remain persistent, but allow the visible frame to reload/refresh continuously?
Since html and VBScript is stateless, each page refresh or new page causes the server do shut down and restart.
I am attempting to use framesets and frames to solve this problem. On my web page I have defined two frames:
1. One frame is visible and the content displayed is allowed to change by page refresh (validate data) or displaying a new page.
2. Second frame is hidden and I want it to be persistent until I close the IE6
In the code section, the "Create" is in the hidden frame. I want this to be persistent. The "Execute Method" is an attempt to get the handle of the server created in the "Create" (hidden frame) and assign the handle to mySrvObj in the "Execute Method" which is visible. First I test is mySrvObj exists.
If mySrvObj exists, then I execute the method.
If mySrvObj does ntoesist: Set mySrvObj = parent.hide.MasterSrvObj
This is an attempt to get the handle of the server from the hidden frame.
The URL below is a 7 second, 4.45 MB, avi video showing the server shutting down and launching each time IE6 Page Refresh button is clicked. This is the problem I am trying to solve.
Set MasterSrvObj = CreateObject("ImageDisplay.ImageDisplayInterface")
This is in the hidden frame.
if not isobject(mySrvObj) then
Set mySrvObj = parent.hide.MasterSrvObj
iResult = mySrvObj.UnBusyInvoice(vDocID, vStaus)
This is in the visible frame.