Nauman
We use the two subs below to programmatically name the PDFs with the Win2PDF
printer. Per the documentation, you would save the name in a registry
container (see BeforePDF sub) just before plotting. After plotting, you
would clear (see AfterPDF sub).
We looked at using dwfs, but we also needed to combine PDFs from Excel, Word
and AutoCAD into one multi-page PDF. This has been clean and simple.
Keep me posted.
Chris
'plot
BeforePDF strPDFName
MyPlotRoutine 'Plot stuff here
AfterPDF
Private Sub BeforePDF(strName As String)
SaveSetting "Dane Prairie Systems", "Win2PDF", "PDFFileName", strName &
".pdf"
End Sub
Private Sub AfterPDF()
On Error Resume Next
DeleteSetting "Dane Prairie Systems", "Win2PDF", "PDFFileName"
End Sub
"Nauman M" wrote in message
news:3F6866C2.DCEB0BF4@CadBazaarNoSPAM.com...
>
> do you mind sharing how you use it, I am trying to figure out a solution
> for our company and they were thinking in buying pushbutton, but it is
> expensive.
>
>
> Chris Picklesimer wrote:
> >
> > If you are already creating the separate PDfs and you are able to save
the
> > full path names in an array, you can pass that array and the "combined
file
> > name" to the following sub(This requires you to reference the Adobe
Acrobat
> > 5.0 Type Library.):
> >
> > btw, We use Win2PDF printer from daneprairie.com to programmatically
create
> > the single PDF files. It's easy to name the files through VB code and
it is
> > only $30.
> >