Run-time Error 3112

[Stavros Panayiotou]

I have the follow code and while running I received the next error. I have
full permisions for all objects of the database:

Run-time error '3112':
Record(s) cannot be read; no read permissions on 'qrySAPInterface'

Code:
Dim qd As QueryDef
Dim parUpToDate1 As Parameter
.....
Set qd = dbsloc.QueryDefs("qrySAPInterface")
Set parUpToDate1 = qd![forms!frmSAPInterface!txtUpToDate]
....

Please help

 

[Ofer]

Check again the permission on the 'qrySAPInterface' query, if all permission
set correctly, try and run compact and repair on the MDB.

 

[Stavros Panayiotou]

Dear Ofer,

I have already done this, without any success. Any other suggestions????

Thanks anyway

Stavros

Check again the permission on the 'qrySAPInterface' query, if all permission
set correctly, try and run compact and repair on the MDB.
--
If I answered your question, please mark it as an answer. That way, it will
stay saved for a longer time, so other can benifit from it.

Good luck

I have the follow code and while running I received the next error. I have
full permisions for all objects of the database:

Run-time error '3112':
Record(s) cannot be read; no read permissions on 'qrySAPInterface'

Code:
Dim qd As QueryDef
Dim parUpToDate1 As Parameter
.....
Set qd = dbsloc.QueryDefs("qrySAPInterface")
Set parUpToDate1 = qd![forms!frmSAPInterface!txtUpToDate]
....

Please help