I'm wondering if maybe there is something that is being left open after zipfiles is called and maybe some stack gets overflowed?
I will add set proc to wwAPI additive right before I call createobject and see if this makes the problem go away.
Very strange.
Thanks for your input.
Sounds like you might be losing the SET PROCEDURE TO? Make sure all your SET PROCEDURE TO calls are made with ADDITIVE to not clear the procedure stack.
+++ Rick ---
Strange error keeps poping up from time to time... the problem is cleared by clearing out memory or restarting VFP. Below is the error message that is returned.
Error Message: File 'zipfiles.prg' does not exist.
Error Number: 1
Running Method: onload
Current Code: lnResult = zipfiles('c:\...myWConnect\reports\' +
JUSTSTEM(lcFilename) + '.zip',lcFilesToZip)
Current Code Line: 240
Exception Handled by: Cncprocess.OnError()
After restarting VFP the server works perfectlly!
The page code which is referred to above is as follows:
oAPI=CREATEOBJECT('wwAPI')
lcFilesToZip = lcFilesToZip + '" "' + 'c:\...myWConnect\reports\' + JUSTSTEM(lcFilename) + '.pdf"'
lnResult = zipfiles('c:\...myWConnect\reports\' + JUSTSTEM(lcFilename) + '.zip',lcFilesToZip)this.cZipFile = [<a class="zipFiles" href="Reports/] + JUSTSTEM(lcFilename) + [.zip">Zip Download</a>]
In myApplicationMain I've included set procedure to wwAPI as well.
This application is running in file mode.
Any ideas would be greatly appreciated. <g>
--hm