Try this:
*PrinterName = getprinter()
?ShellExecute(0, 'printto', FileName, '"'+PrinterName+'"', 0, 1)

>Hello All,
>
>I use ShellExecute to print a HTML file using the following syntax
>
>=Shellexecute(0,"Print",cFileName,"","",1)
>
>Can anyone tell me how to suppress the printer dialog box and just send it to the default printer??
>
>Thanks in advance
>
>Bob