Hi,
I am using the <OBJECT>.SAVEAS() to turn a a letter and a report to pdf, this works great, I then use pdf_merge to write the three saved as pdf into one pdf file. Great, the only thing I would like to do is suppress the print dialog box that comes up whilst it is writing the file.
Any ideas
see code below: (test code at this point)
record_number = current_record_number()
query.filter = "recno() = " + record_number
query.order = ""
:Report.SaveAs("memberset","PDF",query.filter,query.order,"reporta",.F.)
:Report.SaveAs("invoice","PDF",query.filter,query.order,"reportb",.F.)
:Letter.SaveAs("Lettera","PDF",query.filter,query.order,"lettera",.F.)
a = pdf_pagecount("reporta.pdf")
b = pdf_pagecount("reportb.pdf")
pdf_append("reporta.pdf", "reportb.pdf", "combineda.pdf")
if pdf_append("combineda.pdf", "lettera.pdf", "c:\combined.pdf") = .T. then
x = pdf_pagecount("c:\combined.pdf")
nm = "total: " + x + " a: " + a + " b: " + b
msgbox(nm)
else
msgbox("eror combining")
end if
Bookmarks