Pamela,

I use Focus.fll (available from www.fastwrite.com) just download it and use the following code:

SET LIBRARY TO Focus.fll ADDITIVE
cToken= PRN_GetPrnData(ALLTRIM(cPrintername),5001)
oReport.Selectprinter(STR_ntoken(6,cToken), STR_ntoken(3,cToken), STR_ntoken(5,cToken))

For many other handy functions in Focus.fll look at the Focus documentation available from the same website.

Walter,