How to copy mdb access and convert into excel file in vb.net?

**Jhamjhamqt** · Jan 29 '16, 08:41 AM

Code:

catNewDB.Create("Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" + newpath + "\DDCOS.mdb")
            Dim cmdd As New OleDb.OleDbCommand("CREATE TABLE DDCOS( " & _
               "RecNum int identity," & "ZipFile NVarchar(50)," & "DvdName NVarchar(50)," & "SeqNo1 NVarchar(50)," & "SeqNo2 NVarchar(50)," & _
            "JobCode NVarchar(50)," & "ClientCode NVarchar(50)," & "TotalImages NVarchar(50)," & "TotalRecs NVarchar(50)," & "BatchCount NVarchar(50)," & "BatchDate NVarchar(50)," & "BatchSize NVarchar(50)," & "CONSTRAINT [pk_RecNum] PRIMARY KEY (RecNum)) ", conns)
            conns.Open()


'Convert into xlsx
            Dim AccessCommand As New System.Data.OleDb.OleDbCommand("SELECT * INTO [Excel 12.0 Xml;DATABASE=C:\Users\admin\Documents\New folder (7)\CBATCH\DDCOS.xlsx;HDR=Yes;].[DDCOS] from [DDCOS]", conns)

            cmdd.ExecuteNonQuery()

            conns.Close()
            GC.Collect()
            GC.WaitForPendingFinalizers()

I can convert it to xlsx but the column fields and values of the database was nothing inside of the xlsx. can someone help me?