Thanks, Mike, that's neat - once I had worked out the line breaks inserted by the e-mail system!
It could make a nice background screen, too, perhaps - if not cleared... Regards, Alastair. ----- Original Message ----- From: "MikeB" <[EMAIL PROTECTED]> To: "RBG7-L Mailing List" <[EMAIL PROTECTED]> Sent: Tuesday, December 07, 2004 7:18 PM Subject: [RBG7-L] - Re: Runaway R:Base processes / R:Base won't start. > I also have used an HTA file on startup that is passed a time value in > milliseconds to kill itself by user click on OK or the Expiration of the time, > which ever comes first. If you copy the HTA code to a text editor then save it > as About.HTA, you can use the launch command as shown in the startup code > (without the W option), if you do it at the command line for testing just type: > About.HTA #5000 > and the hta will display for a max of 5 seconds if the user doesn't click on > the OK first. The text to display can be done by editing the variables in the > HTA file. > > The contents of my RBase Startup: > > LAUNCH about.hta|#2000 > SET TRANSACT OFF > SET AUTOCOMMIT OFF > SET AUTOCONVERT OFF > SET AUTORECOVER OFF > SET AUTOROWVER OFF > SET AUTOSYNC OFF > SET AUTOUPGRADE OFF > SET COMPATIBILITY ON > SET CURRENCY '$' PREF 2 'b' > SET MANY = % > SET VAR vnull = (CHAR(32)) > SET NULL .vnull > --ZIP cmd /c d:\ntbat\lptset.cmd > SET MULTI ON > RUN SYSTEM IN system.apx > SET NULL -0- > EXIT > > The Contents of the HTA: > > *Note Watch for NewsReaderWrap > <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN"> > <HTML> > <HEAD> > <TITLE>About</TITLE> > <HTA:APPLICATION ID="oHTA" > APPLICATIONNAME="About" > CAPTION="yes" > SYSMENU="yes" > MAXIMIZEBUTTON="no" > MINIMIZEBUTTON="no" > SHOWINTASKBAR="no" > SINGLEINSTANCE="yes" > SCROLL="NO" > BORDER="thin" > BORDERSTYLE="dialog" > VERSION="1.0" > WINDOWSTATE="normal" > ICON=""> > <SCRIPT language="jscript"> > <!-- Begin Author Info For HTA > // Authored MByerley 101402 License Freeware > // WSH 5.x required for Proper execution > // Use at your own risk, blah blah... > > // The text to show in the License Row of the Table > var License = 'ALL CODE contained within the RBase application file(s) > "BdcOvl.*" is proprietary and is Licensed For Use ONLY > > by XYZ Systems, Inc. and may not be used, transferred, or sold to any other > person or entity without the express written > > consent of Bauerlie Development Corp.'; > // The text to show in the Programed Row of the Table. Note the <br> to force > linebreaks > var ProgBy = "Programmed By<br>Michael Byerley<br>902 East Gump Road<br>Fort > Wayne IN 46845-9003<br>(260)637-3924"; > // The clickable URL to your website > var ProgUrl = '<a href="http://www.byerley.net";>www.byerley.net</a>'; > // The timeout value > var TimeToDisplay; > > function Main() > { > //debugger; > TimeToDisplay = GetArgs(oHTA.commandLine); > tdLicense.innerHTML=License; > tdLicense.style.fontFamily="Times New Roman MT Extra Bold"; > tdLicense.style.fontSize="14pt" > tdProgBy.innerHTML=ProgBy; > tdProgBy.style.fontFamily="Times New Roman MT Extra Bold"; > tdProgBy.style.fontSize="12pt" > tdProgUrl.innerHTML=ProgUrl; > tdProgUrl.style.fontFamily="Times New Roman MT Extra Bold"; > tdProgUrl.style.fontSize="12pt" > imgIcon.src="\.\\DiaIcons\\Rbase.ico"; > imgIcon.height="96"; > imgIcon.width="96"; > // if a timeout was passed in then timeout the box otherwise display until > closed > if (TimeToDisplay > 0) > { > DisplayTime(TimeToDisplay); > } > } > > function GetArgs(cmdIN) > { > var i; > var retVal=0; > var tmp = cmdIN.split('"'); > for (i=0;i<tmp.length;i++) > { > if (tmp[i].indexOf('#',0) > 0) > { > retVal = parseInt(tmp[i].slice((tmp[i].indexOf('#',0) + > 1),tmp[i].length)); > break; > } > } > return retVal; > } > > function DisplayTime(msecIN) > { > window.setTimeout('DialogClose()',msecIN); > } > > // SetWindowSize Not Used in this instance > function SetWindowSize() > { > //debugger; > var scrWidth = window.screen.width; > var scrHeight = window.screen.height; > window.moveTo((scrWidth/2)-(wWidth/2),100); > window.resizeTo(wWidth,20 + tblDiaResponse.clientHeight + > tblDiaMsg.clientHeight + ButtonRow.clientHeight); > } > > function DialogClose() > { > window.clearTimeout(); > window.close(); > } > // End --> > </SCRIPT> > </HEAD> > <body bgcolor=#9999FF onLoad="Main()" onBlur="self.focus()"> > > <table id="tblMsg" width="100%" border="2"> > <tr> > <td id="Icon" width="10%"><IMG id="imgIcon" src=""> > </td> > <td width="90%" id="tdLicense" name="License"> > </td> > </tr> > </table> > > <table id="tblProgBy" width="100%" height="50" border="2"> > <tr align="center"> > <td id="tdProgBy" name="tdProgBy" width="100%"> > <p align="center"> > </td> > </tr> > <tr> > <td id="tdProgUrl" width="100%" align="center"> > > <p align="center"> > > </td> > </tr> > <tr> > <td id="ButtonRow" width="100%" align="center"> > <p align="center"> > <input type="button" id="B1" name="B1" value=" OK " > onclick="window.close(); return false;"> > </p> > </td> > </tr> > </table> > > </BODY> > </HTML> > > > > > > > > > ----- Original Message ----- > From: "Alastair Burr" <[EMAIL PROTECTED]> > To: "RBG7-L Mailing List" <[EMAIL PROTECTED]> > Sent: Tuesday, December 07, 2004 1:45 PM > Subject: [RBG7-L] - Re: Runaway R:Base processes / R:Base won't start. > > > I don't know if it's my imagination or not but the wait from double clicking > the icon that launches R:Base until my pause 3 statement which is, more or > less, the first thing in my app seems to have got longer recently (and I'm not > _aware_ of anything else having changed to affect it) > > Perhaps a couple of entries in the RBEngine.CFG could be used as a "user > message" on start-up: > > STARTMES ON/OFF > STARTTXT Loading R:Base > > Regards, > Alastair. > ----- Original Message ----- > From: [EMAIL PROTECTED] > To: RBG7-L Mailing List > Sent: Tuesday, December 07, 2004 5:26 PM > Subject: [RBG7-L] - Re: Runaway R:Base processes / R:Base won't start. > > > > This is sort of related. I have put in a request to RDCC for runtime and the > compiler to have SOMETHING, maybe a user defined message to appear on the > screen while R:base loads. Something like "Loading inventory program...please > wait", or "Welcome to blah,blah,blah"). This would prevent the users from > thinking nothing is hapening. The problem (and I got caught up in it for > awhile) is that when you click on the icon no hourglass appears and you think > nothing is happeningand you tend to click it again, further slowing the > process. Yes, it seems minor, but when you have many users accessing these > icons from a network the load time is even slower. It's just a cosmetic > enhancement, but if others would like to see this PLEASE submit a request to > RDCC. > Bob C. > > > "MikeB" <[EMAIL PROTECTED]> > Sent by: [EMAIL PROTECTED] > 12/07/2004 11:37 AM Please respond to > [EMAIL PROTECTED] > > > To [EMAIL PROTECTED] (RBG7-L Mailing List) > cc > Subject [RBG7-L] - Re: Runaway R:Base processes / R:Base won't > start. > > > > > > > > Sounds like my wife is working there. > > She double clicks "everything". Further if she doesn't see activity within > the > first 1.5 picoseconds (for the uninitiated, at the speed of light, light > travels just 9 inches each picosecond), she is likely to doubleclick again... > > So task bar items get launched twice, and more than one of program is > ill-behaved when a quick double click tries to start virtually simultaneous > launches. Example is IE sometimes completely hangs on her XP box when > started > this way. I have threatened bodily harm, but she just laughs at me.... > > > ----- Original Message ----- > From: "Lawrence Lustig" <[EMAIL PROTECTED]> > To: "RBG7-L Mailing List" <[EMAIL PROTECTED]> > Sent: Tuesday, December 07, 2004 11:22 AM > Subject: [RBG7-L] - Runaway R:Base processes / R:Base won't start. > > > > At a large installation, I have the following problem on a small number of > > machines: > > > > Sometimes R:Base appears not to start. You can click on the icon several > > times, but the application's menu does not appear on the screen. Checking > the > > process list in Task Manager, I am able to see a number of RBG7 processes > > running (more than I tried to start, so I think that someone had run some > > before I got to the machine). > > > > One of the processes is racking up time on the CPU. When I kill that one, > the > > menus for the others appear on the desktop. > > > > Has anyone experienced anything like this, with R:Base sessions running in > Task > > Manager but not appearing on the desktop? > > > > My icon runs R:Base and uses a DAT command file to open the database and > load > > the form which has the main menu. > > -- > > Larry > > >
