Cathy,
Thanks for the sugestion and the sample. I've out your change in, but it's still trying to go to the windows default printer...the laser printer instead of the PDF driver.

Rick

---

>Try ...
>
>

>SET PRINTER TO '&aMyPrinters[nPDF, 1]'
>

>
>Also, be sure the printer-specific information is removed from the report definition.
>
>

>USE MyReport.frx
>GOTO TOP
>REPLACE tag WITH '', tag2 WITH ''
>USE
>

>
>
>>I'm having a problem changing the Windows default printer.
>>I have an HP 4000 TN laser printer as my default printer.
>>I have a PDF printer driver installed (it's name is "DocuCom PDF Driver").
>>In my program I do the following:
>>

>>	=APRINTERS(aMyPrinters)
>>	
>>	FOR n=1 TO ALEN(aMyPrinters, 1)
>>		IF "DocuCom PDF Driver" $ aMyPrinters[n, 1]
>>			nPDF = n
>>		ENDIF
>>	ENDFOR
>>	
>>	IF nPDF = 0
>>		MessageBox("no PDF printer found, can't create the PDF report, will print normal instead.")
>>	ELSE
>>		SET PRINTER TO aMyPrinters[nPDF, 1]
>>	ENDIF
>>

>>The program recognizes that the "DocuCom PDF Driver" is there and the VFP printer is set to it but when I print my printout still goes to the HP which is set as my Windows default printer. I need to go to the "DocuCom PDF Driver" to create my PDF....but that's not happening.
>>
>>What am I doing wrong and what should I be doing instead?
>>TIA,
>>Rick Liebespach