Search code examples
office36564-bitconnection-stringibm-midrange

VBA connection string to IBM AS400 in Office365 64-bit


The following VBA connection string works fine in MS Office 2016 32-bit:

Dim rs As ADODB.Recordset
    
str_400Connect = "Provider=IBMDA400.DataSource.1;Data Source=" & Trim(aDSN) & ";Initial Catalog=SYS01;User Id=" & Trim(aUID) & ";Password=" & Trim(aPassword) & ";"
    
Set gConnect_AS400 = New ADODB.Connection
With gConnect_AS400
     .ConnectionString = gStr_400Connect
     .Open
End With

However, after I have upgraded to Office365 64-bit, (other components remain unchanged, e.g. IBM drivers etc), the above connection string is failed to run and return the error message: "Provider cannot be found. it may not be properly installed."

Do you know what provider can I use in the connection string for 64bit office? Thank you very much.


Solution

  • You need to install a proper driver for the x64 platform.