Search results

You only need the Private Sub Contacts_Click() DoCmd.OpenForm "Contact Names", acFormDS End Sub bit once - so delete the 2nd occurrence and then compile :)

Glad to be of service, Steve... and Paul.... you're correct, I'm not a 'Dude' in the traditional sense but I'm a bit of a geek so I guess that makes me a dude in another sense ;) Caz

Ahh, ok, didn't realise it was a continuous form. Glad you got it working, anyway :)

I can't get to dropbox at work either :-S so I can't see your sample... So are you selecting Deltatones on the main form, and then wanting to show only their bookings on a subform? If that is the case, all you need to do is make sure you have the ArtistID (or whatever you are using as the...

In the query, you need to set it to show All Records from your Stock Table - If working in design view, Double-click on the Join Lines and then select the 'Show all records from Stock and only those records.... ' as shown in the example from another db below If in SQL, specify it as a...

My approach would be: put an unbound control on your form, which again defaults to today's date but into which the user can put the date they want...my theory being that if the control is unbound then it should just remember whatever the last value was that was used, when you move to a new...

Another option: Have you tried changing the criteria in your query to something like >=Nz([forms]![Search]![Combo195],"0") ? I know that doesn't make the combobox say 3+ but it means if they select 3 stars they'll get 3 stars or more...

You are most probably getting the error because one or other of the two fields (yourdate and yourtime) does not contain a value... or does not contain a date/time. Check that by looking for nulls in those fields. What would you want it to do in cases where there were nulls?

I had a similar issue with a database I was working on - I didn't manage to get to the bottom of it, so my workaround was to output a report (which looked the same as the form) instead..... could that be an option for you?

you can upload it if you zip it :)

Try this? strSQL = "SELECT assets.Last, Assets.First, assets.Date, assets.Time " & _ "FROM assets " & _ "WHERE assets.Date Between " & lngFirstOfMonth & " And " & lngLastOfMonth & _ " ORDER BY assets.Time, assets.Last, assets.First;" and the 2nd one... strSQL2 =...

if you store a field as date/time, it won't allow you to 'go over' 24 hours... how is it calculating it? and why are you storing a calculated field, rather than just calculating it on the fly?

realised that they

can you show / upload a sample - base data and 'wrong' totals?

my bad, didn't read the whole thread - sorry (put it down to being full of cold ;) ) I'll back off!

It can be done, but I'm afraid I'm no good at looping things, so someone else will have to help you with that one ;) As for replacing the msgbox, just put in Private Sub Command40_Click() Dim NewStatus As String If IsNull(DueDate) Then me.status="No Date" Exit Sub...

2 issues - first, although you were telling it to call the function, you weren't then telling it to do anything with it! Second - I've added in a check so that it doesn't do anything if there's no DueDate Try changing the code on the OnClick of the button as follows Private Sub...

What links each table to the next? does tblComponent link to tblProduct using ProductPN and then does tblSubComponent link to tblComponent using the ComponentPN... and so on down the line? Can you add a pic of your relationships?

I have a similar form in my training database and I actually put it on the 'before update' of the 'Score' control - that worked for me... but it should also work on the OnCurrent of the form, only thing is it will only show then when you click on the record :)

I tried that code out on a form I have and it worked just fine...