I currently link an AS/400 file to an Access DB.
I need to set this up so that I can link an AS/400 file member to the Access DB.
I found that I can do an override from within the VBA code in the db but I am unable to get it to work.
Here is the bit of code I am using.
rc = SQLAllocHandle(SQL_HANDLE_STMT, hdbc, hstmt)
If rc = SQL_SUCCESS Then
stmt = "call qsys.qcmdexc(‘OVRDBF FILE(qspexrpt) TOFILE(bnldta/qspexrpt) MBR(" + userid + ") OVRSCOPE(*JOB)’, 0000000071.00000)”)"
rc1 = SQLExecDirect(hstmt, stmt, SQL_NTS) 'hstmt
End If
rc ends up with the number 1630339070. I do not know how to determine what that is.
I also do not know what needs to be in the fields hdbc and hstmt.
If I knew what should be in these fields than I might be able to work this out.