Ms Access 2007 Run Time Error 3146
Contents |
Links Social Groups Pictures & Albums Members List Calendar Search Forums Show Threads Show Posts Tag Search Advanced Search Find All Thanked Posts Go to Page...
Run Time Error 3146 Odbc Call Failed Access
Thread Tools Rating: Display Modes 08-31-2011, 07:21 AM #1 dhebert Newly Registered User run time error 3146 odbc call failed access 2010 Join Date: May 2009 Posts: 8 Thanks: 0 Thanked 0 Times in 0 Posts 'Run-time error '3146' Access 2007
Run Time Error '3146' Odbc Call-failed Oracle
I am getting the following error message on a database that I converted from 2000 to 2007. Under the advanced options I have deselected the check box on the "Open databases by using access vba runtime error 3146 record-level locking" and changed all the intervals to "0". Under the DDE operations I have selected the "Ignore DDE requests. I am still getting the error message below: Run-time error '3146' ODBC-call failed [ORACLE][ODBC][ORA]ORA-01013;user requested cancel of current operation (#1013) What am I doing wrong? Please help. Thanks, Dave dhebert View Public Profile Find More Posts by dhebert 09-02-2011, 08:44 AM ms access error 3146 #2 dhebert Newly Registered User Join Date: May 2009 Posts: 8 Thanks: 0 Thanked 0 Times in 0 Posts Re: 'Run-time error '3146' Access 2007 I was able to finally determine it was the ODBC DNS that needed to be changed. If anyone runs into this situation please don't hesitate to contact me and I can explain how I corrected the problem. Dave dhebert View Public Profile Find More Posts by dhebert 10-26-2011, 07:13 AM #3 LoriG Newly Registered User Join Date: Oct 2011 Posts: 1 Thanks: 0 Thanked 0 Times in 0 Posts Re: 'Run-time error '3146' Access 2007 Hello - I am having this same issue. How were you able to resolve it? Thanks in advance!!! LoriG View Public Profile Find More Posts by LoriG 03-16-2012, 02:15 AM #4 kan9999 Newly Registered User Join Date: Mar 2012 Posts: 1 Thanks: 0 Thanked 0 Times in 0 Posts Re: 'Run-time error '3146' Access 2007 Hi, I have the same issue. A query was functioning correctly until recently when this error is now being returned. Any help would be appreciated. kan9999 Vi
2002. The following code segment executes the first read, from rs, successfully, but gives me a "Run-time error 3146 ODBC--call failed" on the second one from rs1. Both rs and rs1 are queries. Can anyone give me information on this error? Dim db as Database Dim rs as Recordset Dim rs1 as Recordset Dim strUserID as String Dim strProgram as String Set db = CurrentDb Set rs = db.OpenRecordset("SELECT program_id FROM sysuser WHERE sysuser_id = '" & strUserID & "'", dbOpenDynaset) rs.MoveFirst strProgram = rs!program_id If Right(strStartLoc, 2) = "10" Then Set rs1 = db.OpenRecordset("SELECT * FROM report_db WHERE enabled = '" & strUserID & "'", dbOpenDynaset) .... End If -- Carol Guest, Jun 9, http://www.access-programmers.co.uk/forums/showthread.php?t=214921 2005 #1 Advertisements Guest Guest Try and run the queries, see if you get this error message. Running the query, not by code, will give you the odbc call failed, and then it will give another message, of what is the real error. If the query will run, then run the code, put a break before the open recordset, copy the string of the SQL to the immidiate window ?"SELECT program_id FROM sysuser WHERE sysuser_id = '" & http://www.pcreview.co.uk/threads/run-time-error-3146-odbc-call-failed.1865044/ strUserID & "'" and copy it to a new query and run, it will give you the real error. And as a side note 1. try and run the tables, mybe you are not connected to the server 2. Is user id is text type, if not then the sql should look like "SELECT program_id FROM sysuser WHERE sysuser_id = " & strUserID "Carol Grismore" wrote: > I am using Access 2002. The following code segment executes the first read, > from rs, successfully, but gives me a "Run-time error 3146 ODBC--call > failed" on the second one from rs1. Both rs and rs1 are queries. Can anyone > give me information on this error? > > Dim db as Database > Dim rs as Recordset > Dim rs1 as Recordset > Dim strUserID as String > Dim strProgram as String > > Set db = CurrentDb > Set rs = db.OpenRecordset("SELECT program_id FROM sysuser WHERE sysuser_id = > '" & strUserID & "'", dbOpenDynaset) > > rs.MoveFirst > strProgram = rs!program_id > > If Right(strStartLoc, 2) = "10" Then > Set rs1 = db.OpenRecordset("SELECT * FROM report_db WHERE enabled = '" & > strUserID & "'", dbOpenDynaset) > .... > End If > > -- > Carol Guest, Jun 9, 2005 #2 Advertisements Guest Guest These are some good ideas, but I have actually done all this and no e
here for a quick overview of the site Help Center Detailed answers to any questions you might http://stackoverflow.com/questions/20504074/access-odbc-error-3146 have Meta Discuss the workings and policies of this site About Us Learn more about Stack Overflow the company Business Learn more about hiring developers or posting ads with us Stack Overflow Questions Jobs Documentation Tags Users Badges Ask Question x Dismiss Join the Stack Overflow Community Stack Overflow is a community of 6.2 time error million programmers, just like you, helping each other. Join them; it only takes a minute: Sign up Access/ODBC error 3146 up vote 2 down vote favorite I have an MS Access 2007 front end to a MS SQL Server 2008R2 back end. I've got a query that's part of a loop, and it's suddenly started run time error generating Run-time error '3146': ODBC--call failed. errors on one query as the loop itterates. Oddly, it's not the first iteration. EDIT: When I say suddenly, it's been running like this just fine for several months (probably since March). Set db = CurrentDb db.QueryTimeout = 480 'thought there was a timeout issue, so set this very high Set SupvRS = db.OpenRecordset("SELECT DISTINCT tblProcessors.Supervisor, tblProcessors.SupervisorEmail " & _ " FROM tblProcessors INNER JOIN (tblAuditPr INNER JOIN tblAuditPr_A ON tblAuditPr.PrAudit_ID = tblAuditPr_A.PrAudit_ID)" & _ " ON tblProcessors.Processor = tblAuditPr_A.Processor" & _ " WHERE tblProcessors.Supervisor IS NOT NULL " & _ " AND tblAuditPr.EndDate BETWEEN " & GetSQLDate(Me.txtFrom) & " AND " & GetSQLDate(Me.txtTo) & _ " AND tblProcessors.Processor<>'Default Processor' " & _ " AND tblAuditPr_A.Answer Not In ('NA','NF')" & _ " AND tblAuditPr.Status = 'Submitted'") Do While Not SupvRS.EOF 'Send Supervisor Email Attachment = PARG.GenerateAuditReport(SupvRS.Fields("Supervisor"), parSupervisor, Me.txtFrom, Me.txtTo) Set EmailRS = db.OpenRecordset("SELECT * FROM tblProcessors WHERE Supervisor = " & GetSQLString(SupvRS.Fields("Supervisor"))) If EmailRS.EOF Then E