using System;
using System.IO;
using System.Collections;

namespace Sample
{
    class Test
    {        
        static void Main(string[] args)
        {
            // Convert Access Report to PDF file
            // If you need more information about UseOffice .Net email us at:
            // support@sautinsoft.com.    

            SautinSoft.UseOffice u = new SautinSoft.UseOffice();

            string inpFile = Path.GetFullPath(@"..\..\..\..\..\Testing files\example.accdb");
            string outFile = Path.GetFullPath("Result.pdf");

            // Prepare UseOffice .Net, loads MS Access in memory
            int ret = u.InitAccess();

            // Return values:
            // 0 - Loading successfully
            // 1 - Can't load MS Access library in memory

            if (ret == 1)
            {
                Console.WriteLine("Error! Can't load MS Access library in memory.");
                return;
            }

            // Specify report's names which you want to export in PDF
            u.Reports = new string [] {"Report_Table1"};

            // Perform the converting.
            ret = u.ConvertFile(inpFile, outFile, SautinSoft.UseOffice.eDirection.ACCESS_to_PDF);

            // Release MS Access from memory
            u.InitAccess();

            // 0 - Converting successfully
            // 1 - Can't open input file. Check that you are using full local path to input file, URL and relative path are not supported
            // 2 - Can't create output file. Please check that you have permissions to write by this path or probably this path already used by another application
            // 3 - Converting failed, please contact with our Support Team
            // 4 - MS Office isn't installed. The component requires that any of these versions of MS Office should be installed: 2000, XP, 2003, 2007, 2010, 2013, 2016 or 2019.
            if (ret == 0)
            {
                // Open the result.
                System.Diagnostics.Process.Start(new System.Diagnostics.ProcessStartInfo(outFile) {UseShellExecute = true });
            }
            else
                Console.WriteLine("Error! Please contact with SautinSoft support: support@sautinsoft.com.");
        }
    }
}

Imports System
Imports System.IO
Imports System.Collections

Namespace Sample
    Friend Class Test
        Shared Sub Main(ByVal args() As String)
            ' Convert Access Report to PDF file
            ' If you need more information about UseOffice .Net email us at:
            ' support@sautinsoft.com.    


            Dim u As New SautinSoft.UseOffice()

            Dim inpFile As String = Path.GetFullPath("..\..\..\..\Testing files\example.accdb")
            Dim outFile As String = Path.GetFullPath("Result.pdf")

            ' Prepare UseOffice .Net, loads MS Access in memory
            Dim ret As Integer = u.InitAccess()

            ' Return values:
            ' 0 - Loading successfully
            ' 1 - Can't load MS Access library in memory


            If ret = 1 Then
                Console.WriteLine("Error! Can't load MS Access library in memory.")
                Return
            End If

            ' Specify report's names which you want to export in PDF
            u.Reports = New String() {"Report_Table1"}

            ' Perform the converting.
            ret = u.ConvertFile(inpFile, outFile, SautinSoft.UseOffice.eDirection.ACCESS_to_PDF)

            ' Release MS Access from memory
            u.InitAccess()

            ' 0 - Converting successfully
            ' 1 - Can't open input file. Check that you are using full local path to input file, URL and relative path are not supported
            ' 2 - Can't create output file. Please check that you have permissions to write by this path or probably this path already used by another application
            ' 3 - Converting failed, please contact with our Support Team
            ' 4 - MS Office isn't installed. The component requires that any of these versions of MS Office should be installed: 2000, XP, 2003, 2007, 2010, 2013, 2016 or 2019.
            If ret = 0 Then
                ' Open the result.
                System.Diagnostics.Process.Start(New System.Diagnostics.ProcessStartInfo(outFile) With {.UseShellExecute = True})
            Else
                Console.WriteLine("Error! Please contact with SautinSoft support: support@sautinsoft.com.")
            End If
        End Sub
    End Class
End Namespace