Thanks Victor - it's a good substitute!!
David Blocker
[EMAIL PROTECTED]
781-784-1919
Fax: 781-784-1860
Cell: 339-206-0261
----- Original Message -----
From: "Victor Timmons" <[EMAIL PROTECTED]>
To: "RBASE-L Mailing List" <[EMAIL PROTECTED]>
Sent: Monday, December 01, 2003 5:37 PM
Subject: [RBASE-L] - Re: Detecting if the default printer is connected in
6.5++
> I know its not really what you are looking for but, you could ask the user
> to select the printer he/she is connected to and use that var to print
> reports. As long as you don't clear the var the user would only have to
> select it 1 time. Its the best I can come up with right now. I hope there
> is a better way.
>
> RBASE.DAT
> RUN Printers.RMD
> ---------------------------
>
> Printers.RMD
> CLS
> SET VAR vWindowsPrinter = (CVAL('WindowsPrinter'))
> SET VAR vPrinters = (CVAL('Printers'))
> CHOOSE vPickedPrinter FROM #LIST .vPrinters AT 10 26 +
> TITLE 'Select Printer' CAPTION 'Available Printers' FORMATTED
> IF vPickedPrinter IS NULL OR vPickedPrinter = '[Esc]' THEN
> GOTO Done
> ENDIF
>
> PRNSETUP .vPickedPrinter
>
> LABEL Done
> RETURN
>
> -----------------
> YourCommandFile.EEP
>
> OUTP PRINTER
> PRINT YourReportName
> OUTP SCREEN
>
> CLEAR ALL VAR EXCEPT .vPickedPrinter
>
>
>
> On 1 Dec 2003 at 16:55, David M. Blocker wrote:
>
> > Hi R:Base friends
> >
> > Is there a way in R:Base 6.5++ to detect if a user's default printer is
> > actually connected? I am working on an application where users will
> have
> > portable PC's and portable printers to take around on their work rounds.
> > They will periodically connect their portables to the network to move
> data
> > back and forth and will need to print reports. We'd like to set it up
> so
> > that if the user connects his/her portable printer, it will print there,
> but
> > if not, to a different network printer.
> >
> > Step one is to detect - is the default local printer connected?
> >
> > David Blocker
> > [EMAIL PROTECTED]
> > 781-784-1919
> > Fax: 781-784-1860
> > Cell: 339-206-0261
> >
> >
>
>
>
> Victor Timmons
> Tiz's Door Sales, Inc
> 425-258-2391
>
>
