Query AS400 through

newer · #1 (**permalink**) 04-08-10, 15:55

I have macro to connect to AS400 and query the data. My code works for all of the users except for a couple of users.

Code:

Public Const strAS400Connection = "DRIVER={Client Access ODBC Driver (32-bit)};" & _
                      "SYSTEM=172.16.xx.xx;" & _
                      "UID=account;PWD=password;"

Sub TopLineMonthly()
On Error GoTo ErrorHandler
            
       Set conn = New ADODB.Connection
       conn.ConnectionString = strAS400Connection
       'set up timeout to no limit
       conn.CommandTimeout = 0      
       conn.Open

'ignore rest code    

End Sub

The problem for this user is: it prompt the AS400 login window. But I have account and password in VBA code. Why? His AS400 set up is the same as other users.

I also want to know where I can download client access odbc driver "32 bit " version 11?

Thanks,

Lisa

Internet Services

Web Development

Digital Marketing

Consumer Tech