Access 2010 Runtime Error 3027
Contents |
be down. Please try the request again. Your cache administrator is webmaster. Generated Fri, 30 Sep 2016 00:57:47 GMT by s_hv1002 (squid/3.5.20)
here for a quick overview of the site Help Center Detailed answers to any questions you might microsoft access runtime error '3027' cannot update have Meta Discuss the workings and policies of this site
Cannot Update. Database Or Object Is Read-only Access 2010 Sharepoint
About Us Learn more about Stack Overflow the company Business Learn more about hiring developers or posting cannot update. database or object is read-only access 2007 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 4.7 http://answers.microsoft.com/en-us/msoffice/forum/msoffice_access-mso_winother/access-2010-runtime-error-3027/acc42082-e1e2-4971-9bfc-94a3c6ed305e million programmers, just like you, helping each other. Join them; it only takes a minute: Sign up How to interpret Database “Updatable” property/Error (3027). Cannot update. Database or object is read-only up vote 0 down vote favorite One of my users (running Windows 7 64bit) has reported that she gets the following error message when http://stackoverflow.com/questions/21352784/how-to-interpret-database-updatable-property-error-3027-cannot-update-data starting my application: basApplicationTitle.SetStartupProperty on line 410 Error (3027). Cannot update. Database or object is read-only The offending code is: Private Function SetAppTitle(pstrRpValue As String) As Boolean 390 On Error GoTo PROC_ERR Dim dbsDb As DAO.Database Dim prp As DAO.Property 400 Set dbsDb = CurrentDb() 405 SetAppTitle = False ' Set the Application Title property value. 410 dbsDb.Properties("AppTitle") = pstrRpValue '<= the line that triggers the error 420 SetAppTitle= True PROC_EXIT: 430 Set dbsDb = Nothing 440 ProcPop 450 Exit Function PROC_ERR: 460 Select Case Err.Number Case 3270 'Property not found; create it and try again. 470 Set prp = dbsDb.CreateProperty("AppTitle", dbtest, pstrRpValue ) 480 dbsDb.Properties.Append prp 490 Resume 500 Case Else 510 SetStartupProperty = False 520 LogError 'Report the error 530 End Select 540 Resume PROC_EXIT 550 Resume End Function I'm assuming she hasn't got access to update one of either the backend or frontend database and I need to test for this when opening the frontend and connecting the b
here for a quick overview of the site Help Center Detailed answers to any questions you might have Meta Discuss the workings and policies of this site About Us Learn more about http://stackoverflow.com/questions/16969367/error-3027-database-or-object-is-ready-only Stack Overflow the company Business Learn more about hiring developers or posting ads with http://www.dbforums.com/showthread.php?1669870-How-do-I-fix-Run-Time-Error-3027 us Stack Overflow Questions Jobs Documentation Tags Users Badges Ask Question x Dismiss Join the Stack Overflow Community Stack Overflow is a community of 4.7 million programmers, just like you, helping each other. Join them; it only takes a minute: Sign up Error 3027, Database or object is ready only? up vote 1 down vote favorite cannot update When I run the code blow on, it stops and gives me an error 3027 Database or Object is Read only When I clicked debug, it pointed at rec.edit. Yet I have no idea how it is read only. I did check to make sure that the object was closed and the same error still came up. The person who came up with it said it worked for them and that cannot update. database they didn't have any issues with readonly. Any ideas? Public Function HitTest() Dim db As Database Dim rec As DAO.Recordset Dim fld As DAO.Field Set db = CurrentDb Set rec = db.OpenRecordset("PlayerSal") EditTable = "PlayerSal" For Each fld In rec.Fields If fld.Name <> "Name" And fld.Name <> "Salary" And Left(fld.Name, 4) <> "Per_" Then strFieldName = "Per_" & fld.Name & "" 'rs.Fields (strFieldName) 'X = "IIf(rec([" & fld.Name & "]) <> 0, Format((rec([Salary]) / rec([" & fld.Name & "])), '$#,###.##'), 0)" If FieldExists(EditTable, strFieldName) Then Else 'AltTable = "ALTER TABLE " & EditTable & " ADD COLUMN " & strFieldName & " Double;" 'CurrentDb.Execute (AltTable) End If rec.Edit X = IIf(rec((fld.Name)) <> 0, Format((rec("Salary") / rec((fld.Name))), "$#,###.##"), 0) rec.Fields(strFieldName).Value = X rec.Update End If Next fld End Function Because I know that Access can be really silly at times, I decided to try a new Database and just import the few files I needed. I've had times where doing that randomly makes things work for some reason. When I imported the module you see below, it then stopped at the If FeildsExists(EditTable, strFieldName) and it said Sub or Function not defined... I don't know if either of these two are related to something simple.. but this is getting
first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. Results 1 to 7 of 7 Thread: How do I fix Run-Time Error 3027? Tweet Thread Tools Show Printable Version Subscribe to this Thread… Search Thread Advanced Search Display Linear Mode Switch to Hybrid Mode Switch to Threaded Mode 09-09-11,09:32 #1 Ari Potter View Profile View Forum Posts Registered User Join Date Sep 2011 Posts 19 Unanswered: How do I fix Run-Time Error 3027? Good Morning, One of my databases is experiencing the "gremlin effect". It was working fine yesterday until this morning. For some reason the backend of my database is in a "read-only" mode. The database is not locked, and no one is in it. (except right now I am because I'm trying to figure out stuff). What happens is we have users who need to submit requests to a central database. The On-Click event of the submittal form opens up the backend table, and then the code adds the request to the table. The users who work off of this information are in a separate database. Their database is totally locked down right now. No one can type in it, alter it, etc. I can go in and alter code, but it doesn't stop the fact that no one can work on their requests right now. This is the code that opens the table to submit the information Code: Dim rsRequest As Object Set rsRequest = CurrentDb.OpenRecordset("Split-Merge - Request table") rsRequest.AddNew There are more lines of code after this but this is where the debugger stops it at the "rsRequest.AddNew" line, and I get the Run-Time Error 3027. Any ideas as to how I'm supposed to unlock this table that doesn't appear to be locked? Thanks bunches!! Ari Reply With Quote 09-09-11,10:20 #2 Sinndho View Profile View Forum Posts Moderator Join Date Mar 2009 Posts 5,440 Provided Answers: 14 1. Backup Database (in the File Menu). This will create a new compacted database that hopefully should not be locked. Check and if it works, discard the original database and rename the backup. 2. Compact and Repair (in the Tools Menu). This basically performs the same operations as a backup, but does not produce a new file (a temporary file is used, that is deleted at the end of the operation). I prefer the first method: I find the Compact and Repair operation a li