[Last Call] Learn how to a build a cloud-first strategyRegister Now

x
?
Solved

need to access database from corel draw error 3112

Posted on 2013-10-30
5
Medium Priority
?
405 Views
Last Modified: 2013-10-31
This is the code. It connects fine to the database - but when i try to open the table I get Error 3112. How can I give myself "permission"?

Dim objConn As New ADODB.Connection
Dim ars As New ADODB.Recordset
objConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\er\database2.mdb;"
objConn.Open
objConnState = objConn.State
ars.Open "SELECT SkuCache.ImageID FROM OrderTable order by item;", objConn, adOpenKeyset, adLockOptimistic

....

ars.Close
objConn.Close

Set ars = Nothing
Set objConn = Nothing
End Sub
Untitled.jpg
0
Comment
Question by:eg252
  • 3
  • 2
5 Comments
 
LVL 74

Accepted Solution

by:
Jeffrey Coachman earned 1500 total points
ID: 39613988
Not sure, but as a guess, I would say you need a User name and password that will allow you read access to the data, (So please contact the person in charge of this data, or other users who can connect to this data) ...this UN and PW will be coded into your connection string something roughly like this:

objConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\er\database2.mdb;" & UserID:="YourUserID", Password:="YourPassword"

See here for more info:
http://support.microsoft.com/kb/191754

JeffCoachman
0
 
LVL 1

Author Comment

by:eg252
ID: 39614067
the message now is "the workgroup information is missing or used exclusively by another user.."

I made a copy of the system.mdw and put that in and got the same message

I can open the database with access with a password.. and there is no security or locks..

I made a brand new database with one table
0
 
LVL 1

Author Comment

by:eg252
ID: 39614090
I figured it out! thank you for your help

stackoverflow.com/questions/9361259/ms-access-records-cannot-be-read-no-read-permission-on-table
0
 
LVL 1

Author Closing Comment

by:eg252
ID: 39614101
wasnt the complete solution - but pointed me in the right direction.. I posted the answer that did work for me..
0
 
LVL 74

Expert Comment

by:Jeffrey Coachman
ID: 39614190
<wasnt the complete solution - but pointed me in the right direction.>
...that was the point, ...just to get you going...
;-)

Glad I could help...
;-)
0

Featured Post

Concerto's Cloud Advisory Services

Want to avoid the missteps to gaining all the benefits of the cloud? Learn more about the different assessment options from our Cloud Advisory team.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Code that checks the QuickBooks schema table for non-updateable fields and then disables those controls on a form so users don't try to update them.
In a use case, a user needs to close an opened report by simply pressing the Escape (Esc) key. This can be done by adding macro code in Report_KeyPress or Report_KeyDown event.
Visualize your data even better in Access queries. Given a date and a value, this lesson shows how to compare that value with the previous value, calculate the difference, and display a circle if the value is the same, an up triangle if it increased…
Please read the paragraph below before following the instructions in the video — there are important caveats in the paragraph that I did not mention in the video. If your PaperPort 12 or PaperPort 14 is failing to start, or crashing, or hanging, …
Suggested Courses

830 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question