>On 09/27/00 03:11, Bowerbird, Bowerbird@... wrote:
>
>  >-bowerbird
>  >
>  >p.s.  dum-dum wouldn't be so dumb if
>  >you just used the str# routines from p.g.,
>  >to which i have referred you many times!
>
>Ouch! I Got Ya Bird .. Me & PG just don't get along .. I guess I just
>don't put my feeble mind to it . Thick headed as a Mule .. Need being hit
>between the eyes with a 2x4 to get my attention
>
>Jim Henson,The Vegas Swede, (^_^) s aplenty



Jim-Bob:

The PG routine (which is begging to be stolen) follows...

LOCAL FN countStr(strID)
'~'
DIM resHndl&,theCount

resHndl& = FN GETRESOURCE(_"STR#",strID)
LONG IF resHndl&
theCount = {[resHndl&]}
XELSE
theCount = 0
END IF
END FN = theCount



Now all you have to do is pretend that it did not come from PG. 
(Don't worry, we'll cover your back on this little white lie.) Put 
this tried and tested routine that is serving in thousands of 
applications across the globe into your own program. You might want 
to rename it something else so that your secret is even more secure. 
:)



Best,

-STAZ  ~)~

800.348.2623 Orders  http://www.stazsoftware.com
228.255.7086 FAX     mailto:staz@...