I looked for this via the search tool and found some things sort of related, but different enough where the solution wasn't clear (to me anyway), so I'd be most grateful if someone could find a moment to help a newbie.
I created a data entry tool that's being sent to multiple users, simialr to at least a dozen or so other ones I've done. But this time, I've got a user who, the first time she tried to enter any value into the opening form, gets a message of "Cannot update database or object is read only". This database has been tested on multiple computers and worked fine...she checked the properties tab and it is not set to read-only. Any ideas? Thanks in advance...
Hi, I am in sales and have very little knowledge about access.
i have a set of (about 700) distributors whose sales has to be monitored every month. their sales falls under 2 broad categories.
i get a statement from the industry watchdog which gives me the amount of sales on my company and the overall sale by the particular distributor on both categories.
this info comes in an excel format on a monthly basis. I would like to add these data in a single data base . i assume it is a table. Each distributor has a unique id, however some distributors may add or may be deleted for various reasons. but i would still like to maintain their records.
i try to sort the excel sheet based on the unique numerical id of the distributor, obviously the next months sale has to be added corresponding to the same id. i am unable to do it.
my table is like this
dist id - apr may jun etc 1 2 3 5 9
my raw data is in excel like this
dist id - for apr 1 2 9
the next months data is dist id - for may 3 5 9 11
ie i want to update my main master (consolidated) table every month. i believe it is a query which should update these records but unable to do it. need help on this.
I am trying to update the tables of 1 access database from another access database. Does anyone know the call function or how would I go about doing that?
Can someone tell me how to get that inline frame inside the message for the code so it doesnt take up too much spaces.
I could not get the MS Access database to update from ASP when a user update the moditfied information. When clicking the 'save' button, it suppose to update the changes. Also, the 'delete' button is suppose to delete a record but it doesn't delete. It just reload the page with the original information and no error message is produced. I checked the permission of the database to 'read/write' but didnt seem to have any affect. Then I checked the code to match up to the field name in the database. I am moditfing the code that was used for same concept except this will have long list of people.
[CODE]<%
dim RstSave 'As ADODB.Recordset dim frmItem 'As Request.Form.Item
'*** Debug Line ***'Response.Write Request.Form("cmdTopic")
select case Request.Form("cmdTopic")
'***** Paragraph Text *****
case "Edit Paragraph Text"
if len(Request.Form("cmdSaveRec")) > 0 then
Set RstSave = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM tblText ORDER BY ID;"
RstSave.Open SQL, Conn, 3, 2
if RstSave.BOF and RstSave.EOF then
else RstSave.MoveFirst 'Step thru Recordset '*** Debug Line ***'Response.Write "Starting Recordset<BR>" do While not RstSave.EOF 'Check each Item returned by the Form '*** Debug Line ***'Response.Write "ID: " & RstSave("ID") & "<BR>" for each frmItem in Request.Form 'Is it a Record? '*** Debug Line ***'Response.Write "IsNumeric Results: " & Isnumeric(mid(frmItem,6)) & "<BR>" if isnumeric(mid(frmItem,6)) then 'Does it Match the Current Record? '*** Debug Line ***'Response.Write "ID: " & RstSave("ID") & "-" & mid(frmItem,6) & " = 0 ?: " & (RstSave("ID") - Cint(mid(frmItem,6))) = 0 & " <BR>" if RstSave("ID") = Cint(mid(frmItem,6)) then '*** Debug Line ***'Response.Write "Saving Record with ID: " & RstSave("ID") & " | " & Request.Form(frmitem) & " | " & Clng(Request.Form("txtHT" & mid(frmitem,6))) & "<BR>" 'Write the Form Field to the Recordset RstSave("Text") = Request.Form("txtID" & mid(frmitem,6)) RstSave.Update end if end if next RstSave.MoveNext loop end if RstSave.Close set RstSave = Nothing end if
'***** Patient Services *****
case "Edit Patient Services"
if len(Request.Form("cmdSaveRec")) > 0 then
Set RstSave = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM tblPatientServ ORDER BY ID;"
RstSave.Open SQL, Conn, 3, 2
if RstSave.BOF and RstSave.EOF then
else RstSave.MoveFirst 'Step thru Recordset '*** Debug Line ***'Response.Write "Starting Recordset<BR>" do While not RstSave.EOF 'Check each Item returned by the Form '*** Debug Line ***'Response.Write "ID: " & RstSave("ID") & "<BR>" for each frmItem in Request.Form 'Is it a Record? '*** Debug Line ***'Response.Write "IsNumeric Results: " & Isnumeric(mid(frmItem,10)) & "<BR>" if isnumeric(mid(frmItem,10)) then 'Does it Match the Current Record? '*** Debug Line ***'Response.Write "ID: " & RstSave("ID") & "-" & mid(frmItem,6) & " = 0 ?: " & (RstSave("ID") - Cint(mid(frmItem,6))) = 0 & " <BR>" if RstSave("ID") = Cint(mid(frmItem,10)) then '*** Debug Line ***'Response.Write "Saving Record with ID: " & RstSave("ID") & " | " & Request.Form(frmitem) & " | " & Clng(Request.Form("txtHT" & mid(frmitem,6))) & "<BR>" 'Write the Form Field to the Recordset RstSave("Service") = trim(Request.Form("txtServID" & mid(frmitem,10))) RstSave("Description") = trim(Request.Form("txtID" & mid(frmitem,10))) RstSave.Update end if end if next RstSave.MoveNext loop end if RstSave.Close set RstSave = Nothing end if
'***** Physician Directory *****
case "Edit Physician Directory"
if len(Request.Form("cmdSaveRec")) > 0 then
Set RstSave = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM tblDoctor ORDER BY ID;"
RstSave.Open SQL, Conn, 3, 2
if RstSave.BOF and RstSave.EOF then
else RstSave.MoveFirst 'Step thru Recordset '*** Debug Line ***'Response.Write "Starting Recordset<BR>" do While not RstSave.EOF 'Check each Item returned by the Form '*** Debug Line ***'Response.Write "ID: " & RstSave("ID") & "<BR>" for each frmItem in Request.Form 'Is it a Record? '*** Debug Line ***'Response.Write "IsNumeric Results: " & Isnumeric(mid(frmItem,13)) & "<BR>" if isnumeric(mid(frmItem,13)) then 'Does it Match the Current Record? '*** Debug Line ***'Response.Write "ID: " & RstSave("ID") & "-" & mid(frmItem,13) & " = 0 ?: " & (RstSave("ID") - Cint(mid(frmItem,13))) = 0 & " <BR>" if RstSave("ID") = Cint(mid(frmItem,13)) then '*** Debug Line ***'Response.Write "Saving Record with ID: " & RstSave("ID") & " | " & Request.Form(frmitem) & " | " & Clng(Request.Form("txtHT" & mid(frmitem,13))) & "<BR>" 'Write the Form Field to the Recordset RstSave("LName") = trim(Request.Form("txtLName" & mid(frmitem,13))) RstSave("FName") = trim(Request.Form("txtFName" & mid(frmitem,13))) RstSave("Title") = trim(Request.Form("txtTitle" & mid(frmitem,13))) RstSave("DEPT") = trim(Request.Form("txtDEPT" & mid(frmitem,13))) RstSave("Phone") = trim(Request.Form("txtPhone" & mid(frmitem,13))) RstSave.Update end if end if next RstSave.MoveNext loop end if RstSave.Close set RstSave = Nothing end if
I have a scenario at work I need some help with. I'm just checking to make sure it is possible before I dive further into it.
We need a database for approximately 40 people to access at one time. They don't really need to access the database itself just be able to update it.
The question that was posed to me was this: Can we use an HTML page to update the database?
This will not be run through SQL or IIS or anything of that nature. It will just be an HTML page that is accessed through a users folder. On the HTML page will be the input boxes and a submit and reset button.
I made a data access page, but I really don't want the users to be able to go through the previous entries. I also wasn't sure if more than one person could be accessing the page at once.
Is a simple form page with a submit button possible not running on a web server?
I'm relatively new to MS Access (using MS Access 2013 but the db should work on 2010, too) and try to develop a database for an NGO I'm working in. [...].
However now I start to create forms and later reports for the actual user. The database will store information about clients and track consultations and assistance the NGO gives to them. There will be around 50.000 to 70.000 clients in the main table. Every client has a specific Individual ID and is member of a family which itself has another specific Group ID.
So now, I am almost done with forms (at least I want to believe that). But I ran into an issue I would love to have your comment and different approach on:
The Database I create is projected on another, significantly bigger database! The one I create is a kinda light version for other field offices with only the information they need to have, and additional tables for them to gather their own data and track their own activities. This being said, the light database needs to be updated every month once by the big (mother version). Both DBs cannot be connected!!!
So we will send to the field offices altogether 5 tables in one mdb-file every month. These 5 tables exist with the same structure ( name, field data-types, etc.) in the light version.
I now want to make an automatic update option (by pressing a key and select the "update-file"), i.e. based on the the respective Primary Key of every table the entry in the smaller DB should be updated!
Update for me means the following three things (Assume big DB is A, small DB is B):
1) If Primary Key (PK) exists in both tables of A and B, update the rest of the fields in B belonging to that key based on the specific record of A
2) If PK does not exist in A but in B, delete record from the database B (case: record was deleted in A after last update)
3) If PK does not exist in B but in A, add the record to database B (case: record was added to database A after last update)
I would like to show you what I already found in the internet on solving task 1) but I cannot post links due to my status.
Both links basically describe how to update one table by another in importing or linking the update-source table in the current DB, create a query with both tables, link the PKs of both and then using the Update To Criteria [UpdateSourceTable].[Field] for each field that I want to update.
But I wanted to ask before I implemented that if I should make a complete different approach since I also have 2) and 3) as tasks....
My 886 Mb access database crashes at any time I use the form I use to navigate it as the main menu. This just happened after I updated one of the tables.However, I've had this issue of not being able to compact and repair this database for a long time. This database is on one of our network drives. I tried to copy to my hard drive and it also hang up!
I keep the production version of my database on a server, and a copy of it for development work on my desktop. Today I've made several changes to the development version, which didn't work. I then opened the production version held on the server in a separate MS Access window to compare the queries/results to see where the problem was and have found that the changes have automatically updated in the production version. Can anyone explain this? They shouldnt be linked at all. The 2 versions both link to a datawarehouse through an ODBC link, but shouldn't be linking to each other (I'm using Access 2003).
One of the forms in my database has a calculated text box control. The calculation is conditional, one condition being based on current date. One of the queries display that calculation. If the the form with the calcualted control is not opened before running the query, the calculated control uses the day the form was last opened as the "current date" which is not what I want. I want to do one of two things:
Either: (Preferably): update the form everytime the database is opened, so that the current date is actually the current date and not when the form in question was last opened.
Or: Update the form first before the query in question is run. This is not preferred because, if I use the calculated control in another query or something, I have to have another "update" step.
I have 2 tables and from them I do a query called "Query_Dates". There, I created 4 calculated fields which compares fields of the two tables previously mentioned.
What I am trying to do is everytime the calculated fields are equal to "Diff", gets the value from the second table (ADHOC) and and puts it in the 1st table (Master_Table). In total there are 4 fields I would change depending on other 4 fields called (CheckRR, CheckQual, CheckProd, CheckCap).
The problem is that it gives me an error 3027, object is read-only.
Below, you can find the code.
Private Sub Comando27_Click() Dim rst As DAO.Recordset Dim rsd As DAO.Recordset Dim supplierName As String Set rsd = Application.CurrentDb.OpenRecordset("Query_Dates", dbOpenDynaset) Set rst = Application.CurrentDb.OpenRecordset("Master_Table" , dbOpenDynaset)
I have two linked tables (uneditable). They are linked by PersonID and they also have email address in common. For sake of example let's say one table has names of people, and the other table has the address they live at.
I have a user who requires a "datasheet" view of certain columns from each table. No problem, can do that easily in a query.
The issue is that he also wants to have an editable column that would have say "Address Confirmed". Clearly I need another table. If I make a three table query I find no way to edit that new column.
I have a database that updates daily. Each day I need to set the values of certain columns back to zero. At the moment I'm doing this manually and it's taking time since I have to update a number of columns. Very simple, I just create an update query, update to 0, run it and done.What I'm wondering is if there is any way to do this with a click of a button external to Access? Like export the update query to the desktop, double click it and it just updates those columns to zero.
The file location is always the same and the table structure is always the same (one table with about 40 columns of numbered data) but, the database is newly generated daily. So if I save the update query today, when it's generated tomorrow, I have to create it again as it's a new database.
I was thinking maybe a batch file to open access, open the database and then run the query but I think this would only work if the query was within the database and since it's newly generated daily, it won't work.if it's possible to export an update query somehow so I can click on it and apply it to the new database each day. As above, the structure and tables/names are the same very day.
I am building a stakeholder database in Microsoft access 2010 and I want to be able to say that a stakeholder attended an event. I have managed to do this but I can only say that one stakeholder attended an event at one time. This is quite a problem as there can be up to 800 or even more stakeholders attending an event so to go through and click each one would be very time consuming.
My current set up is I have a stakeholder table an events table and an event attendance table. It all works fine apart from only being to edit one record at a time. I have tried update queries with no success, I can attach the database but would need to remove the data for data protection reasons.
I have data in all sorts of tables and databases that are linked together through different systems. I'd like to update some of the information automatically in the evenings or in the middle of the night without needing someone to push a button. Is there a way to do this?
So I want a way to update Status of my rows according to numbers list. For example I want to update Status column for multiple numbers to become Done .
Simply I want to update "Null status" to become "Done" according to its numbers according to this list
Code: 1234 53 546 767 2135 6657 43 34
Something like this
I tried "update query" but I don't know how to use criteria to solve this problem. In Excel I did that by "conditional formatting duplicates" -with my number list which I wanted to update - Then "sort by highlighted color" then "fill copy" the status with the value...
I have made a database for data entry, currently i have a challenge of getting it update and navigate.
On the form if the staff name is xyz it should only shows the records filled by xyz in form and navigate that records only. I am attaching the data base also....
I have two tables, one table (1) hold three fields, one of those fields is the master key (index). The other table (2) has a field which I want to lookup from table 1, that part is working. In the combo box I get all three fields displayed as I make my selection. I want to copy the other two fields as text at the time the lookup index is selected. I do not what the fields to automatically update each time the table is displayed. I have looked at update macros, I've looked at VBA.
I'm having trouble with my database (Access 2000). I'm trying to export a file into a text file by clicking on a button. Below is the code. Where the code is in bold that is when the runtime error happens.
If i export the code manually by right click on the query > Export then this works, but for some reason by clicking on the button will not work.
Private Sub cmdExport_Click() Dim sExportFilePath As String sExportFilePath = DLookup("[DateExportLocation]", "tblSettings", "[ID]=1") ' Path if file to be exported DoCmd.OpenQuery "qryUpDateTransmissionDateAndTime", acViewNormal, acEdit ' Update dates time DoCmd.TransferText acExportDelim, "ExportFile", "qryExportFile", sExportFilePath End Sub
I create a front end and back end that resides on the lan. Front has everything besides the table which resides on the back end. Front ends table are linked to the backend. I have two computer that i am testing it on. Both of them runs Access 2003 runtime and windows has been update to the latest version, both xp machine aswell.Both has user right to read and write to that directory on the lan. Ldr exist when either of them uses access file. The strange thing is when i run a command to copy some data from one table to another one. one of the machine give me the following error "3027 Cannot Update. database or object is read only". While on the other machine it runs flawless. Another weird thing is if i modified some values in table by using forms it works great on both so i am a bit clueless where the problems is. its seems my problem is copying from one table to another. i dont have problem modyfing one table. Here is the code i use to that halt my ms access database.
Dim dbs As Database, rsProposal As Recordset, TES As String, stdocname As String, stLinkCriteria As String
TES = Me![TESID]
If TES = DLookup("TESID", "Proposals", "TESID =" & "'" & TES & "'") Then MsgBox "Proposal Already Exists for TES ID: " & vbCrLf & _ " " & TES, vbOKOnly, "Proposal Already Exists" GoTo Image264_Click_Exit Else If MsgBox("Do You Really Want to Create" & vbCrLf & "a New Proposal for TES ID " & vbCrLf & " " & TES & " ?", 289, "Create New Proposal?") = vbOK Then Set dbs = CurrentDb Set rsProposal = dbs.OpenRecordset("Proposals") With rsProposal .AddNew ![Long_Desc] = Me![Description] ![Short_Desc] = Me![Opportunity] ![Dest_Site] = Me![Install Site] ![TESID] = Me![TESID] ![End_User] = Me![Contractor/Purchaser Name] ![Date_Due] = Me![Proposal Due Date] ![Date_Completed] = Me![Close Date] ![Status] = Me![Status] .Update .Close Set rsProposal = Nothing dbs.Close Set dbs = Nothing End With stLinkCriteria = "[TESID] = " & "'" & TES & "'" stdocname = "Form Prop - Detail" DoCmd.OpenForm stdocname, , , stLinkCriteria DoCmd.Close acForm, "Form TES - Detail" End If End If
I'm about to move to a back end / front end system, from a single database file. Before I do so, I want to make sure I have all bases covered so to speak.
My back end file will reside on a server. I am aware that path names are sometimes changed by network administrators without warning.
From tests, I notice that, if the path to the back end can't be found, one cannot open the front end database file at all (Access 2003).
My question is: if my back end file gets moved, or the path changed, how can I get into my front end file to update the linked tables.
