Neevia Technology Sites:   www.neevia.com  |  docuPub.com  |  www.neeviaPDF.com
:: Home :: Products :: Technical Support :: About Us :: Contact Us
Technical support > Neevia docuPrinter SDK code samples
Example 3: Convert a MS Word document into PDF (docuPrinter Word Macro) from Visual Basic  Print Example 

Sub WordConverter()

   Dim docToConvert : docToConvert="c:\test.doc"
 
   Dim DPSDK : Set DPSDK = CreateObject("docuPrinter.SDK")
 
   DPSDK.DocumentOutputFormat = "PDF"
   DPSDK.DocumentOutputName = "demoDOC"
   DPSDK.DocumentOutputFolder = "c:\"
 
   DPSDK.HideSaveAsWindow = true
   DPSDK.DefaultAction=1
 
   DPSDK.ApplySettings
 
   Dim DPWORD : Set DPWORD = CreateObject("docuPrinter.WordMacro")
   DPWORD.CHBookmarks=true
   DPWORD.CInternetLink=true
   DPWORD.CCrosRef=true
   DPWORD.CCrosDoc=true
   DPWORD.LinkFootEnd=true
   DPWORD.CWordTextBox=true
   DPWORD.CDocInfo=true
   DPWORD.CBookNameDest=true
   DPWORD.CComNotes=true    
   Dim RVal : RVal = DPWORD.ConvertDocument(docToConvert)
 
   Set DPWORD = Nothing
   Set DPSDK = Nothing

   If (RVal <> 0) Then 
     MsgBox "Error while converting the document!!!"
   Else
     MsgBox "Done converting!!!"
   End If
 
End Sub



Copyright © 1999-2016 Neevia Technology. All Rights Reserved. Home | Products | Technical Support | About Us | Contact Us