Need a way to connect access database 2016 using office 365 and VB6.0

See more:

VB6

I am having VB6.0 application that uses Provider "microsoft ace oledb 12.0" to connect to MS Access Database (.accdb) 2016 version. Now i need to deploy my VB application in the windows 10 with Office 365 (64 bit) the machine and My VB app is not working, it says "Provider cannot be found. It may not be installed properly".

Below code was used for in the VB app
set gdDB = New ADODB.Connection
gdDB.open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source = "FullPath with DB File Name"

What I have tried:

After getting the above error, I tried changing as like below
gdDB.open "Provider=Microsoft.ACE.OLEDB.16.0;Data Source = "FullPath with DB File Name"

This also not working. I Can see the "ACEOLEDB.DLL" available in the path "C:\Program files\Microsoft Office\root\vfs\ProgramFilesCommonX64\Microsoft Shared\Office16"

Also, I have installed "Microsoft Access Database Engine 2016 Redistributable". After this i tried with both "Provider=Microsoft.ACE.OLEDB.12.0" & Provider=Microsoft.ACE.OLEDB.16.0" also it gave the same error.

Then
I tried with below code
gdDB.Open "Driver={Microsoft Access Driver (*.mdb, *.accdb)};Data Source= "UserProfilePath & AccessDB.accdb"
For this code, it is giving the error "Data source is too long" Unfortunately i cannot change the path of this AccessDB due to restriction.

Please help.