Access Subform With Additional Field But Not Editable
Nov 16, 2014
I created an instructor form with a sub form table on the bottom - [pic at the bottom] I would like to add columns in the subform from the instructor_info subform but it should not be editable, just display it as per the column relationship key, and the relationship key for the 2 tables (instructor_info & course_table) is course_id.
Course Table
- Course Date (instead of Course)
- Course Location
- Station Demo
- No. of Teachings
- Hours Taught
Instructor Teaching Info Table
- Instructor ID
- Alone
- Course
- Course Date
- No. of Teachings
- Course Type
- Notes
i have a form that doesn't allow edits... but i also have an 'inactive' check box.. how can i allow this to be editable.. without the rest of the form editable? thanks.
I am making a library database which would be used in a school. I need to make a form which allows me to type in the persons id number then the persons profile will come up automatically then underneath there will be the persons book loans in a subform which i dont know how to do ...
So the top bit will have the persons details like personid, surname, first name, tutor group and then below there would b a subform with fields in from two different tables like from the book table there will be author surname, author firstname, bookname then from the loan table there will be the date the book was loaned field
The subform would also have to let me edit it so that i can add new loans or remove loans which i also dont know how to do but i was thinking if i had to add new records of the book would the subform have to autocomplete too? to save time typing all the details of the book
so so far i have made the tables added some test data and made relationships between the tables
a person can have many loans a book can have one loan
I think there is something to do with queries to make this whole thing work but I am totally lost what i have to do, I've been reading some forum posts which are similar about autocomplete forms which i have done but it wont work when i do it with the problem I have.
So i have a Calculated field in a table which is an expiration date. It adds two years to another field. Both field are on a Form. make the calculated field editable because some of the expiry dates are not necessarily 2 years. How do i change this?? do i need to like code it? i have no clue how to even start.
I have a field within a form, which I want all the users of the database to see, but I only want it to be editable if your windows logon name is one of the following:
kleaves jbloggs Jsmith
I know I can use the environ variable - environ ("username") and I think I should set this code under the properties of this field possibly the on click setting. Can anyone help?
The reason why I want to do it by Windows logon as this form is widely used by many people and there is no logging into the form at startup. I currently have set the changing of this field to be recorded in a historical view, But I still need to restrict the entry to this field.
Could anyone out there tell me if it is possible to make the output on an Access form read only. I want to be able to input information as records, but when it is saved I don't want it be able to be altered. Mainly I am saving recipes on a form, and I don't want my children to be able to add anything to a record once it has been saved. Thanks in advance Ken
The code pasted below creates a union query for a set of tables (J000171, J000174, J000178 etc) and stores the results of the query in a table called temp.
The first piece of code queries the ‘status’ field of a table rjobs for those records with a ‘status’ field of “Live”. Another field within this rjobs table, ‘JobID’, happens to be the name of a table where additional information relating to that job record is held eg. J000178 All of the tables selected in the query on rjobs are then included in the union query.
The second piece of code stores this information in a table called temp
I would like to be able to do 2 things with this;
1.add an additional field to the union query which holds the JobID field value from rjobs (or alternatively the table name from which the data originates eg J000178 etc as that is the same as the JobID file din rjobs)
2.create an option to clear the info in the temp table. Currently additional info is appended, so whenever the query is refreshed new data is simply added to old data. I would like to be able to clear that data where possible.
The union query is run from the on click of a command button on a simple form. Perhaps an additional button could be used to clear the records from the table temp.
Any ideas greatly appreciated.
Here is the existing code …
Option Compare Database Option Explicit
Private Sub Command0_Click() Dim db As Database Dim rsRjobs As Recordset Dim rsRapps As Recordset Dim LengthofUnionSQL As Long Dim sql As String Dim UnionSQL As String Set db = CurrentDb Set rsRjobs = db.OpenRecordset("Select * from rjobs where Status = 'Live'", dbOpenSnapshot) Do While Not rsRjobs.EOF UnionSQL = UnionSQL & "Select ObjectID, SearchNo, DateSearched, Consultant, from " & rsRjobs!jobID & " Union " rsRjobs.MoveNext Loop 'following two lines are to remove the trailing word Union from the string unionsql LengthofUnionSQL = Len(UnionSQL) UnionSQL = Mid(UnionSQL, 1, LengthofUnionSQL - 7) ' Now variable Unionsql will hold the value something like ' Select ObjectID, SearchNo, DateSearched, Consultant from J000145 ' Union Select ObjectID, SearchNo, DateSearched, Consultant from J000146 ' Union Select ObjectID, SearchNo, DateSearched, Consultant from J000147 MsgBox UnionSQL
Set db = CurrentDb Dim rsUnionquery As Recordset Dim rstemp As Recordset Set rstemp = db.OpenRecordset("temp", dbOpenDynaset, dbSeeChanges) Set rsUnionquery = db.OpenRecordset(UnionSQL) Do While Not rsUnionquery.EOF rstemp.AddNew rstemp!ObjectID = rsUnionquery!ObjectID rstemp!SearchNo = rsUnionquery!SearchNo rstemp!DateSearched = rsUnionquery!DateSearched rstemp!Consultant = rsUnionquery!Consultant rstemp!jobID = rsUnionquery!jobID
I have a form and a sub form. How can I create a dropdown/lookup field on the main form, which will find the customer details from the customer table, and then access the correct subform for their spend details?
Hi. I created a form to be used for editing records. It displays ALL records in a "Files" table that match the BoxNo entered on a previous form. The record source is a query which has a relationship between the tblBoxes (one) and tblFiles (many). The records are showing in the form correctly but it will not allow me to edit.
I have set the allow edit, addition, deletion properties of the form to YES, and data entry to NO. Fields are not locked, and they have active tab stops. I also tried using VBA and set the datamode to edit.
how can i make the combo like the user cannot enter the vales into that? i want the user to only select the values from combo.He should not be able to enter values into it.
I have a form called frm002_PAF_MonitoringMAIN and on this form I have a subform called frm002_PAF_Monitoring. The subform has a button to another form for contact details called Contact_Details. The Contact_Details form opens with the details of the person who I have selected on frm002_PAF_Monitoring. There are some fields on frm002_PAF_Monitoring that I would like to be populated on Contact_Details when opened, like FirstName and LastName. How can I do it?I have tried on afterupdate event on Contact_Details below but those don't work:
I have a continous form bound to a query which also has a group by function. Is it possible to create an editable bounded textbox because Access is giving a message saying recordset not updatable.
I've been using DLookUp in controls on forms, for instance, the control source would be: =DLookUp("[BookPrice]","[BookBeltInfo]","[Soc Sec] = Forms![Apprentice Information]![Soc Sec #]")
I'd like to put some sort of direct SQL statement into the control source so that the displayed value is directly editable. I.e., the user can type in the control to directly change the value in the proper field. As it now stands, the user is told, "Control can't be edited; it's bound to the expression..." How can I get something like: SELECT [BookBeltInfo].[BookPrice] FROM [BookBeltInfo] WHERE [BookBeltInfo].[Soc Sec] = Forms![Apprentice Information]![Soc Sec #] to display directly so that the user can edit the field through the control in the form?
Hi I have a form which retrieves and lists data from a query. I need to add 2 textboxes on the end, which allow a user to add comments about the particular record, which are then saved directy to the database. Unfortunately, the query has joins in it so it is impossible to have the data directly linked to a particular record in the database as per the following detail: http://www.access-programmers.co.uk/forums/showthread.php?t=61901&highlight=query+multiple+source+update
So, any ideas about how to go about this? Ideally, it all needs to e on the same form.
I have a complex problem: I have a form that displays the result of a query in a listbox (lst_dp_results).
Upon selecting a result in the listbox other data about the selected record is displayed on the same form in listboxes Code:Private Sub lst_dp_results_AfterUpdate() With Me.lst_dp_productname .RowSource = _ "Select M_Paint.Product_Name FROM M_Paint " & _ "WHERE M_Paint.Catalogue_Code = '" & Me.lst_dp_results & "'"End Sub As all these fields are listboxes displaying a single value based on the "rowsource" string, they are not editable.
I will like to have these as textboxes instead of list boxes but I guess textboxes do not have anything like 'rowsource'...
Can anyone suggest some method to display value from a field in a textboxt AND be able to edit it??
Hi every body. I have an access database that u can see the tables and their reletionship in the link i posted. I would like to web enable this db and would like to get some suggetion on what fields should i allow to be edited and what records should i put delete option for? In order to keep the refrential integerity of the acces db.i be happy to get some feed back from u guys.Thanks
I'm still learning here, so please don't get annoyed if I don't know what I'm talking about.
I have a Module that I created that looks up a value in a table.. It is shown below.
Public Function DescLookup()
DescLookup = DLookup("[Projdescription]", "ProjDescTable", "[OrderN] = [Forms]![Production]![ProjIncList]") End Function
I want this to be the default value for a field, however I want the field to be editable and I will later have a button that calls on an update query that will update the field with whatever changes are made to the Text Box, however when I set DescLookup() as the default value of the text box, it will not let me edit the text box in the form.
how do i make the fields in my form uneditable(cannot delete or add but can copy a field from form), i tried setting the properties..allow additions deletions by setting it to no, but even then when i open the form and when data is dispalyed , if i go jus delete (say address field)a field it just gets deletd, i tried locking the fields too!..nothing worked, so how do i do this,? p.s IF i set allow edits to No then i am not able to copy the field (say name has to be copied and pasted into another application or something) how could this be accomplished. tried setting it in VBA as formname.form.allowdeletions=false , still no luck!
I have a combo box on a form where the form record source is a query with criteria consisting of the value of the combo box, and the combo box row source being all the values in the table for the field I want to select (EMP_NAME). I know about using requery in the AfterUpdate event, but despite that, none of the display fields ever have any values showing for the record I select. Any help at all would be appreciated. I'm working with Access 2003, btw.
The first relates to the fact that in the crosstab is a field that is set to Yes/No. It appears as a textbox with a value (0 or 1) in it. I want to replace this with a tickbox but when run neither the textbox nor the tickbox will allow any changes. Is it possible to set this to be editable? I cannot see how this would relate back to the actual data table but if it is possible then this should become clearer.
The second issue relates to the fact that the crosstab obviously creates the number of columns in relationship to the maximum number of values of the relevant field. So, I have a field that can have values from 1 to 15 but in most cases the actual value runs no further than 9 and 10. So for those records where the maximum number is not being used I want the unused tickboxes NOT to appear. Again, is this possible.
In connection with the second, if I have (as I do) this group of 15, which is in fact made up of 3 groups ranging from 1-8, 1-4 and 1-3. So number 8 may not be required in the first group and numbers 3 and 4 in the second. I would prefer there not to be a strange gap between the datasets when run. Is it possible to set up a continuous form so that all the potential boxes are in place, that I run code on load that puts the values in from the query, hiding the end tickboxes and so collecting the groups together - then allowing the changes to be detected through code and re-assigned to the table?
I have a form with split view and data it taken from different table using join query, is there any way i can add edit form data and original table data gets changed.
I have a small database that tracks staff training. Main tables are:
tb_staff tb_courses tb_courses_done
1 staff can take many courses. I want to introduce booking - staff can book a course but not necessarily attend. Can I just add a table, say tb_course_booked and use an update query to add to tb_courses_done as needed? Would that work?
So what I have created is a form with 4 combo boxes which filters a subform with a click button by running a sql query.It was working great yesterday but then when I made the subform a pass through query it seems to no longer run (or just runs so slow it takes a large amount of time to query). To get a better sense of what I'm talking about I basically have a button and inside of the button it takes this query template:
SQL = "SELECT * FROM queryname WHERE 1=1"
concats with if statements to the end of the Where clause with the values in the combo box and then sets
subFormName.Form.RecordSource = SQL
how I can get this table to query...Also, for my second question, is it possible to make this pass through table editable after I filter it?
