Search results

Cant the report be based on the same query used for the booking form? Its basically the same thing, i think. I decided to take your advice and scrap the massive booking table it was in violation of normalisation and very bad practice. I have now got that working using the above code, i think i...

It does store duplicate data, but i couldnt find a away around it to create a booking and have all the information i wanted to create a report. Im sure there is an easier and non-violation way to do this. The Appointment table will be quite tedious (10 slots a day * 31 days in a month = 310...

Done It!! Thanks Pat for your help and suggestions, i finally got it working. I did it a different way.. I changed the cboClientID rowsource to: SELECT Forename, Surname, Address1, Address2, ClientID FROM Client; And added this after_update procedure and it worked. Private Sub...

I have 5 tables (Client, Driver, Appointment, LessonType & Booking). The Booking table is empty as it is made up from the other 4 tables. I want to have a form (Booking) which collects data from the 4 tables to create a record. I want this to be automated as much as possible rather than typing...

Code Change Ive changed the code slightly so a msgbox appears if nothing is found, although it appears if a record is found. Can someone please have a look and tell me whats wrong. Cheers Private Sub Command0_Click() On Error GoTo Err_Command0_Click Dim stDocName As String stDocName =...

Tried that, the code now looks like this. Private Sub Command0_Click() On Error GoTo Err_Command0_Click Dim stDocName As String stDocName = "Customer Search" If 0 = DCount("Forename", stDocName) Then MsgBox "No Records Found. Please Try Again" Exit Sub End If DoCmd.OpenQuery stDocName...

How do i run it before the query? Ive tried your suggestion in various parts of the code i have already got, couldnt get it working.

Not what im after, but still an intersting way of doing it. How did you create the form within a form? I might try this if i cant do it the other way. Cheers

Im want to create a msgbox that pops up when a parameter is entered wrong. Ive created a query to search for customers - When run a box pops up saying 'Please enter surname' - If correct then a record appears. If the surname is incorrect i get a blank table. I want a msgbox to pop up saying...

Your Welcome

Using Access 2000

I have two forms, one is called Bookings and the other is Customer - Not sure what you mean by sub form. :confused: Heres the codes i have behind the button --> Private Sub Customer_Click() On Error GoTo Err_Customer_Click Dim stDocName As String stDocName = "Customer Search"...

The sub form window is Form1 at the moment, changed the name and it didnt work.

The First combo is a simple select query, so it should display your records... Not sure about the size thing.

I have a command button, which runs the query. I want it to display a message if no records are found. Nikki - Your suggestion creates a msgbox, but before i have chance to enter any text, i want that box to appear afterwards if nothing is found. Gizmo - Couldnt get that to work..

Try this!! First Combo - SELECT tblContacts.Lastname FROM tblContacts; Second Combo - SELECT tblContact.Lastname, tblContact.Firstname FROM tblContacts WHERE [Firstname]=[cboLastname]; 'or whatever your combo is called' Also create an After Update Prcedure for the first combo: Private Sub...

Create MsgBox?? I have a select query to search for a client. A box pops up and you enter the name, if the name is there, then that record is displayed. Now if i enter a name that isnt there, then i get a blank table - which is fair enough. I want to create a msgbox that pops up to let a user...

Anyone??? :confused:

Hi Phil Downloaded it again, still getting a problem when try to enter a second record. 'You cannot add or change a record because a related record is required in table 'tblOrders'. Entering the first record works fine...