Dear Bill: Thank you for the quick fix. Yes, it does produce a j window; however, when I close the Excel workbook, it remains. Can you quick-fix the fix to close J when the client closes?
Sincerely, Leigh Leigh Joseph Halliwell, FCAS, MAAA Chief Manager L. J. Halliwell, LLC P. O. Box 21385 Chattanooga, TN 37424 423-296-2739 423-605-5789 cell 423-954-2772 fax [email protected] www.lhalliwell.com This communication is intended solely for the use of the individual to whom or the entity to which it is addressed. It may contain information that is privileged, confidential, and exempt from disclosure under applicable law. If you are neither the intended recipient, nor the employee, nor the agent responsible for delivering the communication to the intended recipient, you are hereby notified that any dissemination, distribution, or copying of this communication is strictly prohibited. If you have received this communication in error, please notify us immediately by telephone or email, delete the communication from any computer or other electronic storage media, and destroy all other copies in your possession. -----Original Message----- From: [email protected] [mailto:[email protected]] On Behalf Of bill lam Sent: Thursday, April 16, 2009 8:59 PM To: [email protected] Subject: Re: [Jprogramming] J602 as Excel Server On Thu, 16 Apr 2009, Leigh J Halliwell wrote: > Dear J Forum: > > Yesterday I presented this problem, and Bill Lam tried to be helpful, but to > no avail. Below is the bare bones of my VBA code in an Excel module. When > I register J601 (jreg.bat) this works perfectly: J is activated and the ijx > window is visible. And when I close Excel, J closes too. But when I > register J602, J is activated, but invisibly. And when I close Excel, the J > session is still invisibly active. What is different in 602, and what code > will do what I get it to do in 601? Thanks for your help. > > ==================== > Public js As Object > > Private Sub auto_open() > Set js = CreateObject("jexeserver") > js.Do "0!:0 <1!:45''" > js.Show 1 > js.Log 1 > End Sub > ==================== In addition to Chris' suggestion, and if you want a quickfix or the computer doesn't get the full J installation. This is a quick hack based on minijx (untested) replace the line js.Do "0!:0 <1!:45''" with this (as a single line) js.Do "11!:0 'pc ijx closeok;xywh 0 0 300 200; cc e editijx ws_hscroll ws_vscroll es_nohidesel rightmove bottommove; pas 0 0;pgroup jijx;pshow'" ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
