General information
Category:
Reports & Report designer
Nadya,
How can I get to work with the wwpdf class:
ProjObjsdetn2 = CreateObject("msproject.application")
Select tblms1
Scan For AllTrim(promang) == AllTrim(This.DisplayValue) And compl1 = .F.
Set Procedure To cdefaultpnt
Do listprint
tv1n2 = AllTrim(tblms1.custno)
Do createpdf With "C:\Temp\PDFMilestones\" + tv1n3 + ".pdf"
sxd1tn2 = FullPath(Curdir() + "MScharts\" + tv1n2 + ".mpp")
ProjObjsdetn2.Application.FileOpen(sxd1tn2,.T.)
ProjObjsdetn2.Application.FilePrintSetup('Acrobat PDFWriter on LPT1:')
ProjObjsdetn2.Application.FilePrint(.NULL.,.NULL.,.F.)
Previous
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only