I have a form which has an unbound text field which is a calculated filed showing a date which is x months after a separate field on the form.
I need to write this field back to a table in the database when an "add" command button is clicked.
The table is called Assets
The form is called Assets List
The text field on the form is called txtWED and needs to be written back to the table "Assets" in the field "Warranty_End_Date"
If possible can I add this as an expression on an "add" command button?
in my form I created an unbound field with a requested combination, now how can I put those in a table field. in other words, how can I send the content of a form's unbound field to a field in the table?
I have a form that contains a combo box (cboEmployeeName) that pulls data from a query and populates three text boxes (Work Area, Last Name, First Name), This part works fine. Because the text boxes are being populated by the Combo box, they are not bound to the record source tblTrainingSchedule). I need the info that is in the text boxes to populate the respective fields in the record source.
I tested by adding "=tblTrainingSchedule!WorkArea=[cboEmployeeName].Column(3)" (column 3 is the work area) to the "after update" control but it does not populate the data.
I have a form with a navigational control which loads in the unbound area a form according to the navigational btn, this form has a list of records in datasheet view, when clicking on a specific records it opens a form with the specific record selected, I would, once double clicked on the record, the form to open within the same unbound window.
To be more precise, from the attachment, when the frmMain is open and the user double clicks on the IATACode the navigation target under the Tab Airport closes the form "frmQueryAirport" and opens "frmAirport", once the user closes the window with the appropriate Exit Btn, the "frmQueryAirport" reopens.
I have a continuous form with a number of unbound fields and bound fields. However, I would like to sum an unbound fields (Text28). Text28 is an unbound calculated field based on another calculated unbound field (Text22). I would like to sum Text28 in the footer or somewhere in the form.
Here are the codes for my field:
Code: Text28 = iff([Text22>0], [Text22], [Text20] --- This works Text29 =sum(iff([Text22>0], [Text22], [Text20]) --- this is not working
I have set up a Parameter query which works, and use this on a form.
What I am having a problem with is using an unbound field on the form to be the parameter.
For example in the Empty feild/box on the form I would type SMITH, and this on a click of a button next to it would run the parameter query as a subform.
I have a table here tblTemp with a field client. This table can have from 1 to 100 records at times as it keeps getting cleared for the purpose of this exercise.
I also have a form frmLabel1Data with an unbound text box txtclient.
I was hoping to get the first record of the table into this text box upon opening the form.
I tried creating a query which gave me the following sql;
SELECT First(tblTemp.client) AS FirstOfclient FROM tblTemp;
I also tried placing it in this code with no luck
Private Sub Form_Open(Cancel As Integer)
Dim SQL
SQL = "SELECT First(tblTemp.client) AS FirstOfclient FROM tblTemp;" MsgBox SQL
End Sub
Does anyone know why I cannot see the same result as when I open the query it gives me my client name but the code above does not????
May not be using the correct terminology here. I have a form that currently does not have a RecordSource. From this form, I want to create a table called "ICEA" with the following fields (which would be entered from the form): OperatingDay, Hour_Ending, Import, Export, and Net.Can this be done with a SELECT statement or does it have to be done through VBA?
I have a form, which has a search box. This allows you to search through the id numbers of each record. Once an ID has been selected a bound textbox displays the id number. Other unbound textboxes then display other information from the table with the relevant record.
What I want to do is then allow users to change information in textboxes and update the record.
How to do an UPDATE using VBA on a form to update a specific record on the table using an unbound field on the form to filter the update.
Every time the code runs, it tells me: Run-time error '3144': Syntax error in UPDATE statement and takes me to the "CurrentDb.Execute strSQL, dbFailOnError" line at the end of my sample below.
I created an unbound text box on a form that automatically pulls the current logged in user by using this:
Private Sub Txtuser_Click() Me.Txtuser = Environ("Username")
The form grabbs the logged in user with no problems, however, I ultimately want this information to also end up in my table. So the form has three boxes (to keep it simple). The user will type their first name and last name manually on the form which the record source is this "table" where their name goes to the table last name =Field 1 and first name=Field 2 respectively. I want the unbound box from the form to place the logged in user in Field 3 for the current record.
I have a form with 1 unbound listbox as drop down list (entypolst), an unbound text box(entypotxt) and a command button. The list box reads items from a table. I want to change a value (text) on listbox, input a text on textbox so pressing the button add a new record in a table (Table1 fields Category,Product) showing in my form as subform (SFTable1) in datasheet view. For that reason a made the following code:
Code: Private Sub AddBtn_Click() Dim ans As Integer Dim strSQL As String Dim db As DAO.Database Dim rs As DAO.Recordset Dim ctl As Control
[code]....
I take the error msg for 0 items selected in listbox and exit the sub.
I have a query with many fields. One of them is the combination of two fields and is called "Components Reference". What I try to do is, every time this query is updated, the records of only this field "Components Reference" to be written to the field of another table which also takes records from an another query. I wish I was clear enough.
a have a form with a combo box that displays 3 values (columns)
in a bound form i can display the second value in a text box with the following command =Forms!MAIN!field_2.COLUMN(1)
but i can't write it to the table
my main table has 3 fields
field_1 field_2 field_3
i have a secondary table that holds some values and is been used as a lookup list to field_2
my secondary table has 3 fields
field_a field_b field_c
the field_2 of main table takes value from field_a (the lookup list shows all the fields (a,b,c) and i want in text field lets say field_3 to take the value of field_b with this code Forms!MAIN!field_2.COLUMN(1)
The problem is that i want the value of Forms!MAIN!field_2.COLUMN(1) to be written to a field of the main table :( and i cant
what is the correct syntax to write a command line able to UPDATE more than one field in the table records having multiple WHERE criteria.
Here is my challenge:My TableI has the columns A, B, C and D which are populated, for example, as follows:
TableI A B C D 1 2 2 6 4 3
1 7 5 9 1 2 2 5 8 5 etc.
I also have a FormII which updates TableII. Among the existing fields of TableII there are the fields C and D (same as above). When saving data entry thru the save button of the FormII, fields C and D will be naturally saved on the TableII. Well, I also want C and D info updated into Table I as well, but only when field A=1 and B=2.So what I need (for the click event of the button save in the FormII) is to open TableI and either insert or update it with the values of the fields C and D in every record WHERE A=1 AND B=2.For instance, assuming C=& and D=%, the desired result should be as follows:
TableI A B C D 1 2 & % 2 6 4 3 1 7 5 9 1 2 & % 2 5 8 5
I did not find any examples in the net including multiple criteria..Here is what I wrote unsuccesfully:
Private Sub BtSalvarFrmII_Click() CurrentDb.execute "UPDATE TableI" Set FieldC = Forms!FrmII!FieldC.value AND Set FieldD = Forms!FrmII!FieldD.value WHERE FieldA = 1 AND FieldB = 2 Docmd.save Docmd.close End Sub
To make it simple, I have a list of contact names and their email. I want to have a form with no control source and have 2 simple drop down boxes for their Name and their Email. What I would like to happen is the user choose a name from the drop down in field 1 and then the field below auto-populate their email in field 2. I understand I can use conditional IF/THEN and list out each email, but the contact list is ever changing, so I want to first drop down to link to the TblContacts, have the user pick the name from the list and then have the 2nd field autopopulate from that same TblContacts with their email respective to the Name entered in field 1. My form has two field [Traveler] and [Email]...The tblContacts two fields are [Name] and [Email]
I've created a data entry form w/ 7 fields.... [f1], [f2], [f3], [f4], [f5], [f6] are bound to a table. While [f7] is unbound and has Nz function.
Now, the value of [f7] is the summation of [f1] to [f5], i want that what ever value is generated by [f7] will be stored on [f6] in both forms and table...
I have a continuous subform that draws information from a table (Calls). This subform shows a variety of fields among them one called "ResolutionDetails".
This field can have various values such as "In process, Completed" Initial contacts", Repairing,..."
I have been asked to simplify this subform by hiding this field and adding another one (not to the table, just to the continuous form) that shows only two possible values: "In Process" or "Completed"
So let's say I create a new unbound field in this continuous form; How can I do so this field checks the value of "ResolutionDetails" and it shows one of the two options? My guess is that I need to give this new field a default value of "In process" and have it change to "Completed" when "ResolutionDetails" value is "Completed"
My scenario is: I have a Form to add Job Logs. This form has a cascading combo box with Clients filtering Projects. However, the Clients Combo Box is unbound, Projects is bound to the ClientProjects ID. I had to do this instead of have a key for both Clients and Projects in my Job Logs table due to the fact that Clients and Projects have a many-to-many relationship.
For Adding Job Logs this is fine.
My Problem: I have separate forms for viewing and editing Job Logs, and naturally, because Clients has no binding, every time I run these forms Access brings up the 'Enter Parameter Value' Message Box. I have tried a VB script to assign the Client ID based on the ClientProject ID value stored in the Projects combobox, on Form Load, however it still asks me to enter the Parameter Value and just writes the code in the combobox. Here's the Script:
Private Sub Form_Load() Me.SelectClient = "SELECT Client ID, Client Name " & _ "FROM Client Projects Query " & _ "WHERE ClientProjectID = " & Me.SelectProject.Value End Sub
I am working on a timesheet application which allows users to insert multiple timesheet entries in a grid style format. the first row is visible and to add another row users click on a command button which makes the next row of fields available and ready to fill in and so on and so forth. I need the fields to be unbound and then when the user clicks on a save button for example then it inserts those values into the relevant table. Table name is tbltimesheet, field names are id, companyname, project, activitydate, activityhours, activitynotes, username, userid
I have a onclick tied to a label (for decoration purposes) that when clicked it launches VBA that essentially updates a form. All that part works except it will not recognize any changed value of the field I was last in?
Just to try to explain best as I can what happens.
- Form gets opened - I change field (quantity field) - I click the Label - It reverts to pre-existing value.
if I click off of the text field first then do the onclick - it recognizes just fine.
I have a form with a bound combo box. There is an unbound text box for display purposes only that is supposed to reflect the third column of the combo box for the current record.
I set it's default value at [cmbPartyType].[Column](2) .
It works for the first record. but when I scroll through the records, the box keeps the value that was appropriate for the first record. how can I get it to look at that combo box on every form? Even if I am not update records, just looking at them?
