Tables :: Possible To Have A Were Condition For A Button To A Table?
May 23, 2015
I am wondering, is it possible to have a were condition for a button to a table? I want to click the button, close the form I have, and open up my sales table, and have it have a were condition to be like what I have for my form
Code:
="[EventID]=" & [lstShows]
I have that for the form, and it works, I am just not sure if I can use that for a Table. that "code" us being used in a openform macro. If there isnt a way to use a macro, how about VBA code?
I want Access to look in one table for a certain condition, and if it is true to autofill text in a different column but I've never done this before.
Specifically, I have a column in a table that is named "Letter Received" and another named "Letter Received Unsigned" which is in date format. I want Access to write "N/A" in the "Letter Received Unsigned" column if there is a date entered in the "Letter Received" column.
Basically when I click a button on a form I want it to run a report but only when certain criteria are met as entered in the 'Where Condition' box. I've managed to do this successfully when it is an equal to query but I now want to run a 'contains' query and don't really know where to start.
I have a text box on the form labelled [Desc] and I want the report to pull records where any text entered in the [Desc] text box is contained in the fields [Used Stock]![Model]
I have a form that has a listbox and a subform. The listbox lists names of events, start date and end date. The subform bellow reveals names of participants to the event that is clicked in the listbox. Against each participant's name is a button to delete the participant.How can I hide or disable the delete button if the start date of the event is past?
I would like that when the user opens the form and adds a new record the combobox showed the row immediately following the condition defined in the previous record.
For example.
First time that I open the form I select the combobox the condition A. Second time that I open the form the combobox automatically selects the condition B Third time that I open the form then the combobox automatically show me the condition 3
I want to update a table called tblFinalOrder, that looks like this:
In particular, I want to update each column separately with the number 1 taken from table tblSAP_XWP_SW:
My problem is that Access doesn't properly update the table how I want. I join both tables using an INNER JOIN on the SAP number. In the column AEMenge you see some 1's. So what he should do is writing these 1's into the appropriate column in my tblFinalOrder table. The condition is that the SAP number must already be in my tblSAP_XWP_SW table. If he doesn't find a 1, then skip it.
Here is my code so far. This one should update column "DynaCT". The funny thing is that DynaCT isn't available in my columnlabel column but he writes a 1 anyways (or in this case anohter number, I was playing around with it). This is what I don't understand.
Code: UPDATE tblFinalOrder AS a INNER JOIN tblSAP_XWP_SW AS b ON a.SAPNr = b.sapxwpsw_sapnr SET a.DynaCT = 1 WHERE a.SAPNR IN (SELECT sapxwpsw_sapnr FROM tblSAP_XWP_SW);
I mean, he should only write the 1 into the specific column of table tblFinalOrder, if he finds the SAP number in tblSAP_XWP_SW and if there is a 1 in this line in column AEMenge.
tables being updated are products_ordered with productID, orderID and Quantity and orders with orderID, customerID and todays date in to products_ordered.date
form name Value orderID =Max([orderID])+1 customerID SELECT Customers.customerID customer_name Customers.customer_name inv_address Customers.inv_address Inv_city Customers.inv_city inv_region Customers.inv_region postcode Customers.inv_postcode orderID
there may be more than one productID and quantity as more than one product can be on a single orderID
Oh and I use a combobox to chose customer ID which fills up the other firlds in the form and another combobox in the subform to chose a product which fills up the description field. they start up with fields already filled with data how do i start the form blank?
Need to have a command button at form.. what i need to do is is saving a record through command button one time so produce same id for all parts like;
if i am having a field as parts and id now if i put parts as;
Parts ID
Wheel Tyre Rim
so at the time of button click (command button) the id number to be issued as same as 1 for all three parts, when adding more parts after few minutes or after the click then after addition of next parts the id should be 2 for all, means what i need is to have id number as respect of button click but once click then 1, then after =2 and so on..
i already make this sql for dlookup table for may insert button, all going good, but when i'm going to make double command with different msg box for different criteria, it going fail
1. This my Working code:
If Me.txtidborang.Tag & "" = "" = (DLookup("NoGerankod", "HutangKeseluruhan", "NoGerankod='" & Me.txtnogeran & "'")) Then MsgBox "Grant Number Invalid", vbOKOnly Me.[cbostatuspembayaran] = "Geran Negatif" CurrentDb.Execute "INSERT INTO Januari (bla..bla..bla..) End if
2. This my not working code:
If Me.txtidborang.Tag & "" = "" = (DLookup("NoGerankod", "HutangKeseluruhan", "NoGerankod='" & Me.txtnogeran & "'")) Then MsgBox "Grant Number Invalid", vbOKOnly Me.[cbostatuspembayaran] = "Geran Negatif" If Me.txtidborang.Tag & "" = "" = (DLookup("NoMatrikkod", "HutangKeseluruhan", "NoMatrikkod='" & Me.txtukmper & "'")) Then MsgBox "This Student still have debt ", vbOKOnly Me.[cbostatuspembayaran] = "Geran Aktif"
CurrentDb.Execute "INSERT INTO Januari (bla..bla..bla..)
End if End if
Q: How can i combine two dlookup together for different msg box?
I have a form, with tab control which includes fields from two tables. When I delete a record on a form it deletes fine.When I go into the tables the record is still there in the one side of the relationship but has been deleted in the table of the many side.
I've read that a simple delete button on a form will only delete records in the many side of a relationship from a table.How do I get a delete button that deletes the record from both the one and many tables.
Is it possible on the Find Record button added to a form to adjust the search function so it defaults to a specific box on the form? I have a form for tracking employee's and on my Find Record button I would like it to default to the Last name instead of the Record number.
I am hoping some one can help me out with an SQL string I am having problems during to get working.
This is my code
Private Sub SearchRoleSeeking()
Dim db As DAO.Database Dim qdf As DAO.QueryDef Dim strSQL As String Dim strFilterSQL As String Dim txtBoxValue As String Set db = CurrentDb Set qdf = db.QueryDefs("qrySearch")
lstSearchResults = txtSearch1
If Me.txtSearch1.Value = "Temp" Then txtBoxValue = 1 End If If Me.txtSearch1.Value = "Perm" Then txtBoxValue = 2 End If If Me.txtSearch1.Value = "Temp or Perm" Then txtBoxValue = 3 End If strSQL = "SELECT tblPersonalInformation.[PersonalID],tblPersonalInformation.[Surname],tblPersonalInformation.[Forename],tblPersonalInformation.[DOB],tblPersonalInformation.[WantedRate],tblPersonalInformation.[WantedSalary],tblPersonalInformation.[Status],tblPersonalInformation.[RoleSeeking]" & _ "FROM tblPersonalInformation " & _ "WHERE tblPersonalInformation.RoleSeeking = ('txtboxvalue')"
let me try explain what I am trying to do. I have a form where personal information is entered into. It has an option group that allows 3 choices. I have made a form that I will use to search (the above code is from that.) What I am trying to do is if a person enters "Temp" into txtSearch1 then for the SQL statement to search "tblPersonalInformation.[RoleSeeking]" for the value 1. If a person enters "PERM then for the statement to use 2 as the value for txtSearch1 and so on.
Please don't criticize the naming, I've renamed to make the logic simpler to understand.
I am trying to run a query based on the value of a textbox. Right now if the text box is empty it shows all the records. This is what works: SELECT A.ID, B.Weight FROM A LEFT JOIN B ON A.ID = B.ID WHERE B.Weight Like IIf([forms]![Form]![txtBox] & ""="","*",[forms]![Form]![txtBox])
The problem is when tbl B is blank (and only when its blank), I also want to see all records where weight is null.
Some examples of what I've tried (I have tried variations of): B.Weight Like IIf([forms]![Form]![txtBox] & ""="","* Or Is Null",[forms]![Form]![txtBox]) B.Weight IIf([forms]![Form]![txtBox] & ""="","Is Null or Like *",[forms]![Form]![txtBox])
I am not worried about the False condition, the problem is that Null is not being returned from inside an IIF(). When I set the WHERE statement to: WHERE B.Weight Is Null, it works. But if I try IIf([forms]![Form]![txtBox] & ""="",Is Null,[forms]![Form]![txtBox]). It doesnt work (Whether I put it in quotes or not).
What I have is a database setup with multiple tables in which different areas of my DC can input information simultaneously into their respective tables. I then have another database linked to it for myself to have a live view of each updated record. I would like to see all the records of each table in 1 single table (possibly just sorted ascending by time). Each table has the same Field headings but may have different qtys of records. As I will then have it linked to an Excel table to VLOOKUP from it.
I have tried Union coding but always get Syntax Error etc.
I have two tables of data, each relating to three business branches (branches A, B and C).
Table 1 shows the expenditure of each branch (by fuel, premises and wages).
Table 2 shows a number of units for each branch (mileage, floorspace and sales).
What I would like to do is calculate unit costs, based on the expenditure in Table 1, divided by a relevant unit in Table 2. The catch is that I want to have a third table which allows the user to specify which expenditure (from Table 1) is combined with which unit (from Table 2) to generate the calculated unit costs. I've been able to do this in Excel, and have attached an example. I've also attached an incomplete Access version with the first two tables. Given the complexity of my actual data, I feel this could be better handled in Access than Excel.
I have an Access Table with about 28,000 Automobile dealerships across the country shown. I've joined a new/small phone contact table to this to keep up with our phone contacts with the dealership and followup efforts. When I search/filter on the dealership table all is fine. However when I search/filter on the phone contact table with a few test entries, I get nothing at all. I supposed that after joining the tables, I'd be able to do a search on the field named follow up date and find/filter today's date or other dates and locate which dealerships to contact when the correct date arrives. But nothing.
Hi Guys and Girls, Does anyone know if it is possible to have a button assigned a value from a table/query record, (I need to use a touchscreen so can't use a combobox.)
eg button one = record 1, button2 = record 2 etc when pressed the value of the record is passed to another field.
hi i was wondering if anyone can tell me a condition or a command in which a user will be able to enter only 6 digit number. like 123456. if he tries to enter 234 the database should not accept. is this possible also? any help would be great. Thanks
Please have a look at the following code (I am not good at VBA or SQL).
Me.[txtBox] = DLookup(“[SNum]”, “[Table1]”, “[RecID]) If Me.txtBox =>2 Then Condition if true Else Condition if false End If
I type a value in my [txtBox], a number. I want to evaluate if the typed value meets the condition or not. [SNum] is serially numbered and [RecID] is autonumber Primary Key. The above code is not working. How do I achieve this? Please help.
:o Please help... I am trying to get the following results. If the Qty is less than 99 bag 10 per, if the qty is between 100 and 999 bag 100 per and if the qty is greater than 999 bag 200 per.
i have a Yes/No checkbox to indicate whether a job has been done.. if it is done then i want it removed from the list.. so i think my query sql needs to be something like..
note..the bold bit is the bit i am questioning.
WHERE (((Booking_Main.Job_Date) Between Date() And 1+Date())) AND Booking_Confirm.Job_Done ="No"
i have created a search form. any word the user types it searches certain details in my enquiries. in my form i have a list box that displays the enquiries sent by my query.
i have placed a Job_Booked (Yes/No field) checkbox in my enquiry table. this is because if the job is booked then i no longer want the record to appear in the enquiry list im sending to the form. ive tried this code, but even when i tick the job booked button, the enquiry is being displayed.. why is this
SELECT zEnquiries.Enquiry_Date, zEnquiries.Job_Date, zEnquiries.Job_Day, zEnquiries.Job_Time, zEnquiries.Enq_Forname, zEnquiries.Enq_Surname, zEnquiries.Pickup_Add, zEnquiries.Pickup_Post, zEnquiries.Dest_Add, zEnquiries.Dest_Post, zEnquiries.Quote, zEnquiries.Car, zEnquiries.Passengers, zEnquiries.Luggage, zEnquiries.Notes, zEnquiries.Job_Booked, * FROM zEnquiries WHERE (((zEnquiries.Enq_Forname) Like '*' & Forms!Enquiry_Search!Search2 & '*')) Or (((zEnquiries.Enq_Surname) Like '*' & Forms!Enquiry_Search!Search2 & '*')) Or (((zEnquiries.Job_Date) Like '*' & Forms!Enquiry_Search!Search2 & '*')) Or (((zEnquiries.Enq_Phone) Like '*' & Forms!Enquiry_Search!Search2 & '*')) Or (((zEnquiries.Dest_Add) Like '*' & Forms!Enquiry_Search!Search2 & '*')) Or (((zEnquiries.Dest_Post) Like '*' & Forms!Enquiry_Search!Search2 & '*')) Or (((zEnquiries.Pickup_Add) Like '*' & Forms!Enquiry_Search!Search2 & '*')) Or (((zEnquiries.Pickup_Post) Like '*' & Forms!Enquiry_Search!Search2 & '*')) And zEnquiries.Job_Booked=False ORDER BY zEnquiries.Enquiry_Date DESC;
I can't get this expression in Query to work! Any suggestions?
Account Type: IIf([parent account name] like “*hosp*”,"Hosp",IIf([parent account name] like "*vet*”,"Vet",IIf([parent account name] like “*dds*”,"DENT”,IIf([parent account name] like "*dmd*”,"Dentist”,IIf([parent account name] like "*pharm*”,"Pharm”,0)))))
as you can see I am doing search and identify for a new field.
I get an error message "the expression you entered contains invalid syntax"
