I have limited experience in Access, but I have managed to create a user form, where items are selected from comboboxes (Test results; when, who, outcome, etc)
At the end I have built in a command button that should add a record to an existing table, but so far no luck. I have used the following VB code for this:
Private Sub Save_test_results_KeyPress(KeyAscii As Integer)
Dim dbsICT_Test_Management As DAO.Database
Dim rstActual_test_results As DAO.Recordset
Set dbsICT_Test_Management = CurrentDb
Set rstActual_test_results = dbsICT_Test_Management.OpenRecordset("Actual_test_ results")
rstActual_test_results.AddNew
rstActual_test_results.Update
End Sub
Whenever I add a new record to a table with a form I created, it records the "ID autonumber" that it's associated with instead of the text. For instance, if I selected "Kevin" from a combobox list and had the form record it, it will show up as "1" in the table under the field name "Names".
I have a table with 2 fields in it - Type and Pallet_Case - using a form the user enters the name of the Type and then from a combo box selects either Pallet or Case. There is a button on the form that is to save the new record to the table. (code below) The strangeness that is happening is that when the new record is added to the table, whatever is the first existing record alphabetically in the table is changed to the same Pallet_Case selection that was made for the new record.
I have a list box that displays on the form that is updated after a new record is added to show what records exist in the table (this is done by a query of the table and sorts on the type), so I can see this happening without having to open the table. It doesn't matter what sort order I put the list box in nor the table it still changes the first record alphabetically. And it is only change the Pallet-Case field. I even changed the first record to something else and it still did this.
Dim dbs As DAO.Database, strSql As String Set dbs = CurrentDb strSql = "Insert into [PP Type TBL] ([Prepack Type],[Pallet Case]) Values ('" & Me.Type & "','" & Me.Pallet_Case & "' )" dbs.Execute strSql, dbFailOnError
I am new to Access and I was trying to create database for chemical inventory handling.I have two tables. one of my tables (chemical info) has information on chemical properties. I used "Cas NO" as primary key. I have another fields such as "chemical name", 'product number" and etc.
In Second table (chemical inventory) i have "ID" field as primary key and I used lookup wizard in order to fill "Chemical Name" field. I thought it will be easy to pick up name rather than typing it because the names were complicated.After I created two forms. one form is chemicals info form based on chemical info table and other one is LAb_inventory based on chemical inventory table.
I set up Lab inventory form as main form and Chemicals info form as subform. Linking field is chemical name. So that when I chose chemical name from combo box i can see inventory data in main form and chemical properties information in subform. Now i have two problems..One of them is when I add new record to my subform I cant see this new record in main form. I suppose it is because chemicals names of each form is derived from different tables. furthermore in main form instead of chemicals name i see "my primary key CAS NO".
What i want to achieve is add new record to chemicals info form and fill up all chemical information save and in the main form to add new record choose new chemical name which i just added and fill up inventory information.
I am new to Access and I was trying to create database for chemical inventory handling...I have two tables. one of my tables (chemical info) has information on chemical properties. I used "Cas NO" as primary key. I have another fields such as "chemical name", 'product number" and etc.
In Second table (chemical inventory) i have "ID" field as primary key and I used lookup wizard in order to fill "Chemical Name" field. I thought it will be easy to pick up name rather than typing it because the names were complicated.After I created two forms. one form is chemicals info form based on chemical info table and other one is LAb_inventory based on chemical inventory table.
I set up Lab inventory form as main form and Chemicals info form as subform. Linking field is chemical name. So that when I chose chemical name from combo box i can see inventory data in main form and chemical properties information in subform. Now i have two problems
One of them is when I add new record to my subform I cant see this new record in main form. I suppose it is because chemicals names of each form is derived from different tables. furthermore in main form instead of chemicals name i see "my primary key CAS NO". What i want to achieve is add new record to chemicals info form and fill up all chemical information save and in the main form to add new record choose new chemical name which i just added and fill up inventory information.
I'm working on a database that has a subform which pulls its data from a table and I'm trying to use a popup form to enter the data in the sub form. For example the table is called student debts. The form is called student debt. The pop up form is called student debt entry from. I want the inform that's in the student debt entry form to be recorded in the student debt form which is a subform on the main form. I know i have to create a add new records button to do it but not sure of the code.
I have a form to add a record to a table. How can I give the user a way to close this form without saving the just created record.
I tried
If me.dirty then DoCmd.RunCommand acCmdDeleteRecord endif
This works, but gives a messagebox in return to confirm the command, and I don't want that. And I try to avoid sendkeys. I also don't want to change the options of access.
I am building a database where one Form displays records from 14 different tables. For some reason, when I recently try to add a field on to a form from a new table, the ENTIRE form loses the record source, and every single field that is already on the form gets that green dot in the corner with errors surrounding a record source that cannot be found. What am I doing wrong? Am I exceeding some limitations with forms?
I have a form (called Form2) with say 3 text boxes, called txt_Field1, txt_Field2 and txt_Field3.
In txt_Field1 the user specifies the number of records to be added to an existing table. The fields txt_Field2 and txt_Field3 are used to pre-populate the records with default values.
Furthermore, I have set up a table called Table1. It's headers are ID, Strategy, divRate. ID is Autonumber, Strategy is Text, and divRate is Number.
Suppose the user inputs the following on Form2: txt_Field1 = 3 txt_Field2 = Covered txt_Field3 = 0.04
How do I programmatically add 3 records (since txt_Field1 = 3) to Table1 such that the table will look like:
I have a table for all my members, then a table for each class (for attendance purposes) and the class tables are linked to the master via subdatasheets. I also have a form that pulls up all the details of a member and I want to show all the times they've attended class. Is it possible to add the subdata sheets to the form or would I have to add the attendance record as a subform that filters on the person?
I have a form AddNewEquipment. This is bound to a table, EquipmentDetails.
EquipmentDetails has a Yes/No field, 'ParentChoice'. So when EquipmentDetails.ParentChoice = Yes, I want to open up a new text box, AddNewEquipment.ParentDescr, into which someone can put some text. This text I want to append as a new row in a different table, ParentList.ParentName. (that table also has an autonumber field)
I only want to do the save when I save the whole form.
Is this something like using an On Lost Focus event from the ParentDescr field which only invokes when the overall form save button is clicked? What would I put in the On Lost Focus event.
I have quite an extensive form linked to a table. When I add new columns to the table I seem to have a problem getting the form to read the data.I have just added a numerical column to the table and added a text box on the form that is bound to it. When I try to pull up the value using VBA it is blank, even though an entry is visible on the form. I have set the text box to general number and the entry shows in the actual table. When typing in the entry into VBA it capitalises where required so it must be registering the table entry. However the value it pulls remains blank.
I am adding a combo box to a form with data sourced from a table. Everything seems ok but when I select an option from the combo list and move to the next record the selection is repeated there also. How do I get to select a different option in the next record?
I have an existing Main form that has a sub form that the user uses to enter multiple records into a table....it works fine EXCEPT that I need to make it even easier and more intuitive and add a lot of labels. Basically the user selects items from a drop down list that adds items to a Work Order. I need to add some labels to the form to make it more descriptive for the user.
So, what I want to add multiple records using a single main form.
Is is possible to?:
1. simply turn the subform into a single main form? Can this be done by using a Command button or something similar?
2. copy all of the controls etc from the sub form into a new main form and have it all work nicely?
I have a totalquery that runs fine and give me the sum for both fields I'm looking for but I can't get the outputs to fill the fields on the form. I have tried the Dcount query in the control source but that just returns an error and locks up access.
Code: SELECT [Tble-wcDelays].Causedby, Sum([Tble-wcDelays].HoursDelay) AS SumOfHoursDelay FROM [Tble-wcDelays] GROUP BY [Tble-wcDelays].Causedby, [Tble-wcDelays].LinkingID HAVING ((([Tble-wcDelays].LinkingID)=[Forms]![Frm-ePlusCent]![cleanID]));
I am using a form to add a record to a table and need to be able to specify one of the fields in the table that will be added to. This field is predetermined by another form selection. If there is a way to force a value on a title box with a control source this would also do the trick.
I have a form with a subform (in continuous) I have on the main form a few unbound text boxes which once im happy with the results i press a command button on mainform which adds the unbound text boxes to a new record on subform im struggling with this one. I have done similar before but that was with the unbound text boxes in header of the actual form i was adding record too.
I am building a database for running a shoot. I want to be able to add Firers, Beaters and Picker Ups to each day. All of those people are held in a [Contacts] form and have a checkbox to designate them as Shooters, Beaters or Picker Ups or a combination of them
I have a form where I can create the shoot date and timings etc. Now I want to add people to the form.
My idea is to have a seperate form with a list of all the Shoot Dates, on the same form will be three more lists showing Shoot Date and ID, List of all Guns, List of All Beaters, List of all Picker Ups in the Database.
You would then select the shoot date from the first list which would highlight, then go each of the other three lists and select a checkbox next to each person that you wanted to attend that day.
I know what I want to do but dont know how to do it!
I have a table that has records added to it using the following VBa code:
Const MyTable As String = "tblSampleSubmission" Const MyField As String = "SampleName" Dim db As DAO.Database Dim rs As DAO.Recordset Dim intCounter As Double Dim LastDub As Double Dim addString As String Set db = CurrentDb Set rs = db.OpenRecordset(MyTable) Randomize 'LastDub = Me.txtStartValue - Was only used to start the random function later in series addString = "" For intCounter = Me.TxtStartValue To Me.txtEndValue rs.AddNew rs.Fields(MyField) = Me.SamPre & intCounter & Me.SamSuf & addString rs.Fields("SubmissionNumber") = Me.SubNum rs.Fields("CustomerID") = Me.CustomerID rs.Fields("SamplePrep") = Me.SamplePrep rs.Fields("Fusion") = Me.Fusion rs.Fields("XRF") = Me.XRF rs.Fields("LOI") = Me.LOI rs.Fields("Sizing") = Me.Sizing rs.Fields("Moisture") = Me.Moisture rs.Update addString = "" If Rnd < 0.02 Then 'LastDub = intCounter intCounter = intCounter - 1 addString = " DUP" End If Next intCounter rs.Close db.Close Set rs = Nothing Set db = Nothing
What I would hope to be able to do is add a "standard" randomly to each SubmssionNumber (each SubmissionNumber might be 1-100 records). The record I need to add should be chosen at random from a list of 6 or so options and added at the end or middle or start of the job (SubmissionNumber) is this something that is easy to do or should I just give up and add it manually?
Thanks to everyone who has helped me in the past, it is getting me up to speed quickly. Access seems to be quite popular as I have contacted 3 developers to help with my dB but they are all to busy to help me so I am going it alone.
I have a table with duplicate ids. When I have a forum popup another form, the forms are linked by ids. This works great except for one problem. There are duplicate ids. So if I pop up a form then it will go to the first record that that id exist. This is not good if you are going to add another record. Therefore, I need to create a unique variable for a record. The autonumber would be a great variable but it seems I cannot use it to filter. Unless someone can show me how. Is there another way to create a unique variable automatically for a new record?
The system is about a shop which gives credit facilities to its customers and so has to keep track of payments effected by them.
I have 3 tables: Customer, Payment, Balance. The main table is Customer, with primary key CustCode which is an autonumber. It keeps personal details of the customers. The Payment table keeps details of payments effected by the customers and the Balance table keeps the overall balance for each customer. The relationships are as follows:
Customer to Payment, 1-to-many Customer to Balance, 1-to-1
Fields in Payment table: CustCode, PaymentDate, AmtPaid Fields in Balance table: CustCode, Balance
Problem 1 I have a data entry form for Customer. When I create a new customer record, I want a new record automatically created as well for the customer in the Balance table. How can I do that?
Problem 2 I need to produce a report on customers who have not made any payments during the previous month. I’d like to know how to do that as well.
I hope I’ve made myself clear enough. Thank you for all help.
When the database is open the form StartingAmount is open (only until a starting balance is entered.)
User then puts the starting amount in. clicks create.
Then a record is added to Transactions. TransactionDate = Date entered (auto populate) TransactionName = Starting Balance TransactionAmount = StartingAmount
I have several tables that are linked that I need to be able to add to. This is an example of the structure:
Patient Info ID FK_Ward - ID of Ward table FK_Room - ID of Room table FK_Cond - ID of Condition table
Ward ID WardID
Room ID RoomNumber
Condition ID Description
Unfortunately, its not the exact one as I can't post that here! What I am trying to do is to add a new patient record using information from the other tables as guides - e.g. the user selects the name of the Ward but the ID in the Ward table is entered, the User selects the number of the room but again the ID in the Room table is entered, and for the Condition same thing. So I would like to have dropdowns (or ComboBoxes) for each of these and based on the user's selections add a new record to PatientInfo using the ID values as links.
