VB.NET PDF - Create PDF from OpenOffice in VB.NET
How to Convert OpenOffice Document (Odt, Ods, Odp) to PDF with VB.NET Demo Code Samples
Look for HTML5 PDF Editor?
EdgePDF:
ASP.NET PDF Editor is the best HTML5 PDF Editor and
ASP.NET PDF Viewer based on XDoc.PDF, JQuery, HTML5.
It supports
ASP.NET MVC and WebForms projects.
Best Visual Studio .NET OpenOffice to adobe PDF file converter control, which able to be integrated in .NET WinForms and ASP.NET project
Support .NET WinForms, ASP.NET MVC in IIS, ASP.NET Ajax, Azure cloud service, DNN (DotNetNuke), SharePoint
Support multiple OpenOffice documents to PDF files batch conversion in VB.NET
Create PDF document from OpenOffice Text Document ( .odt )with embedded fonts
Convert OpenOffice Spreadsheet ( .ods ) data to PDF in Visual Basic project
Export PDF document from OpenOffice Presentation ( .odp ) in VB.NET application
Quick integrate online source code to VB.NET class project
Free PDF SDK library and components for .NET framework
VB.NET Project: Necessary DLLs for Conversion from OpenOffice to PDF
In order to run the sample codes, the following steps would be necessary.
Add necessary references:
RasterEdge.Imaging.Basic.dll
RasterEdge.Imaging.Basic.Codec.dll
RasterEdge.Imaging.Drawing.dll
RasterEdge.Imaging.Font.dll
RasterEdge.Imaging.Processing.dll
RasterEdge.XDoc.Raster.dll
RasterEdge.XDoc.Raster.Core.dll
RasterEdge.XDoc.PDF.dll
RasterEdge.XDoc.Office.Inner.Common.dll
RasterEdge.XDoc.Office.Inner.Office03.dll
RasterEdge.XDoc.Word.dll
RasterEdge.XDoc.Excel.dll
RasterEdge.XDoc.PowerPoint.dll
Use corresponding namespaces;
using RasterEdge.Imaging.Basic;
using RasterEdge.XDoc.Word;
using RasterEdge.XDoc.Excel;
using RasterEdge.XDoc.PowerPoint;
using RasterEdge.XDoc.PDF;
Note: When you get the error "Could not load file or assembly 'RasterEdge.Imaging.Basic' or any other assembly or one of its dependencies. An attempt to load a program with an incorrect format", please check your configure as follows:
If you are using x64 libraries/dlls, Right click the project -> Properties -> Build -> Platform target: x64.
If using x86, the platform target should be x86.
How to VB.NET: Convert single open office(odt, odp) file to PDF
VB.NET demo code for creating PDF document from ODT format.
'odt convert to pdf(file to file)
Dim doc As ODTDocument = New ODTDocument("C:\dmeo.odt")
doc.ConvertToDocument(DocumentType.PDF, "C:\output.pdf")
|
'odt convert to pdf(Stream to Stream)
Dim inputFilePath As String = "C:\demo.odt"
Dim arr() As Byte = File.ReadAllBytes(inputFilePath)
Dim inputStream As MemoryStream = New MemoryStream(arr)
Dim doc As ODTDocument = New ODTDocument(inputStream)
Dim outputStream As MemoryStream = New MemoryStream()
doc.ConvertToDocument(DocumentType.PDF, outputStream)
|
VB.NET demo code for creating PDF document from ODP format.
'odp convert to pdf(file to file)
Dim doc As ODPDocument = New ODPDocument("C:\dmeo.odp")
doc.ConvertToDocument(DocumentType.PDF, "C:\output.pdf")
|
'odp convert to pdf(Stream to Stream)
Dim inputFilePath As String = "C:\demo.odp"
Dim arr() As Byte = File.ReadAllBytes(inputFilePath)
Dim inputStream As MemoryStream = New MemoryStream(arr)
Dim doc As ODPDocument = New ODPDocument(inputStream)
Dim outputStream As MemoryStream = New MemoryStream()
doc.ConvertToDocument(DocumentType.PDF, outputStream)
|
How to VB.NET: Convert two or multiple open office(odt, odp) files to PDF(batch convert)
Following demo codes will show how to convert odt/odp files to pdf documents.
Dim inputDirectory As String = "C:\input\"
Dim outputDirectory As String = "C:\Output\"
Dim files() As String = Directory.GetFiles(inputDirectory, "*.odt")
'convert odt document to pdf one by one.
For Each filePath As String In files
Dim doc As ODTDocument = New ODTDocument(filePath)
Dim startIdx As Integer = filePath.LastIndexOf("\")
Dim endIdx As Integer = filePath.LastIndexOf(".")
Dim docName As String = filePath.SubString(startIdx + 1, endIdx - startIdx - 1)
' Convert it to PDF document.
doc.ConvertToDocument(DocumentType.PDF, outputDirectory + docName + ".pdf")
Next
|
Dim inputDirectory As String = "C:\input\"
Dim outputDirectory As String = "C:\Output\"
Dim files() As String = Directory.GetFiles(inputDirectory, "*.odp")
'convert odp document to pdf one by one.
For Each filePath As String In files
Dim doc As ODPDocument = New ODPDocument(filePath)
Dim startIdx As Integer = filePath.LastIndexOf("\")
Dim endIdx As Integer = filePath.LastIndexOf(".")
Dim docName As String = filePath.SubString(startIdx + 1, endIdx - startIdx - 1)
' Convert it to PDF document.
doc.ConvertToDocument(DocumentType.PDF, outputDirectory + docName + ".pdf")
Next
|
How to VB.NET: Combine multiple open office (odt, odp) files, and convert to PDF
Following is VB.NET demo code for open office(odt, odp) files to PDF conversion.
Dim files() As String = { "C:\demo1.odt, C:\demo2.odt, C:\demo3.odt" }
Dim outputFilePath As String = "C:\output.pdf"
Dim streams As List(Of MemoryStream) = New List(Of MemoryStream)()
For Each filePath As String In files
Dim doc As ODTDocument = New ODTDocument(filePath)
Dim outputStream As MemoryStream = New MemoryStream()
' Convert it to PDF document.
doc.ConvertToDocument(DocumentType.PDF, outputStream)
streams.Add(outputStream)
Next
PDFDocument.CombineDocument(streams, outputFilePath)
|
Dim files() As String = { "C:\demo1.odp, C:\demo2.odp, C:\demo3.odp" }
Dim outputFilePath As String = "C:\output.pdf"
Dim streams As List(Of MemoryStream) = New List(Of MemoryStream)()
For Each filePath As String In files
Dim doc As ODPDocument = New ODPDocument(filePath)
Dim outputStream As MemoryStream = New MemoryStream()
' Convert it to PDF document.
doc.ConvertToDocument(DocumentType.PDF, outputStream)
streams.Add(outputStream)
Next
PDFDocument.CombineDocument(streams, outputFilePath)
|
How to VB.NET: Insert open office (odt, odp) file into pdf document, and create a new PDF file
Following is VB.NET demo code to Insert open office(odt, odp) to PDF at specific location.
Dim filePath As String = "C:\demo.odt"
Dim doc As ODTDocument = New ODTDocument(filePath)
Dim stream As MemoryStream = New MemoryStream()
doc.ConvertToDocument(DocumentType.PDF, stream)
Dim pdf As PDFDocument = New PDFDocument(stream)
Dim pageCount As Integer = pdf.GetPageCount()
Dim pages List(Of BasePage) = New List(Of BasePage)()
For i As Integer = 0 To pageCount - 1
pages.Add(pdf.GetPage(i))
Next
Dim outputPdf As String = "C:\output.pdf"
Dim desDoc As PDFDocument = New PDFDocument(outputPdf)
Dim insertLocation As Integer = 2
desDoc.InsertPages(pages.ToArray(), insertLocation)
desDoc.Save("C:\desDocument.pdf")
|
Dim filePath As String = "C:\demo.odp"
Dim doc As ODPDocument = New ODPDocument(filePath)
Dim stream As MemoryStream = New MemoryStream()
doc.ConvertToDocument(DocumentType.PDF, stream)
Dim pdf As PDFDocument = New PDFDocument(stream)
Dim pageCount As Integer = pdf.GetPageCount()
Dim pages List(Of BasePage) = New List(Of BasePage)()
For i As Integer = 0 To pageCount - 1
pages.Add(pdf.GetPage(i))
Next
Dim outputPdf As String = "C:\output.pdf"
Dim desDoc As PDFDocument = New PDFDocument(outputPdf)
Dim insertLocation As Integer = 2
desDoc.InsertPages(pages.ToArray(), insertLocation)
desDoc.Save("C:\desDocument.pdf")
|