Search results

Currentuser will return the user id (if no user logins are used it defaults to admin). If you have created user logins and passwords (secured database) currentuser will return the username of the person logged in

If you open your search form and click on the magnifying glass a report will be previewed. Hope its what you are after

REchanging colour of text when date is <=date() Private Sub Due_Date_Updated(Code As Integer) What goes in this part??? End Sub This may be long winded but... if the date selected is <= Date () then formfield1.backcolor = 167711680 formfield2.backcolor = 167711680 etc else...

REPassing a criteria as a value from one query to another Write a new query that references both your original queries (dont forget to link them) Then select the fields you want

Works ok on my xp machine

Create a form with an unbound text field create a button on the form in ihe onclick event you can check the value entered in the text field if itis the correct password close the form then open form B On the button on form A in the on click event Comment out the opening of FormB Open the new form

I personnaly would write aquery that selects the two columns from the table, (binmax and binnumber) in the criteria section of the binnumber column type forms ![yourform]![M5location]. in the after update event of M5location type this Dim Nodata as string nodata = nz(dlookup("[columnfrom...

You could create a report that has no record source, then place fields on the report to contain the information on the sub report. On the report fields data tab ,control source type this (replace form and field names with yours) =Forms![Yourmainform]![yoursubform]![yoursubformfield]

Try something like this If [ClassNo] <= 5000 Then If [ExhibitorNo] <= 499 Then If [Placinggrade] = "Blue" Then [Premium] = [Blue] End If If [Placinggrade] = "Red" Then [Premium] = [Red] End If If [Placinggrade] = "White" Then...

I too have a similar setup and distribute to approx 50 users I have a table that holds the latest release no and I have the release no in the main forms caption. on startup when the main form loads it checks the version number on the forms caption with the version no in the table. If they don't...

Try some thing like this (It works in a form) If Yourfieldvalue = "No Then Yourlabel.Caption = "Disabled" else Yourlabel.Caption = "Enabled" End If

You may have already thought of this but you could just use print screen and then paste to a word document and print from there

If both the forms are to remain open whilst you print you can do the following Create a report with no data source add text boxes to the report that mirror the first form and also the second form. the data source for each field on the report can be based on the corresponding fields on form1...

You could have a report table with the names of all your reports and a date column. When a report is run update (using an update query) the date column in the report table that corresponds with the report

As Keith g says

I would do a dlookup on each query that rteh reporst are based on prior to calling the report. If the result from the dlookup is null don't call the report Dim ans1 as string ans1 = nz(dlookup("Columnname","yourquery"),"") if ans1 <> "" then Run the report end if

Export the report as snapshot

No probs glad to be of help

Sorry about that don't know what went wrong. I Have attached iit this time Honest. Hope it's what you are after

Try something like this: If IsNull(Me.CS_coordinator) Then SFStatus = SFStatus1 ElseIf Not IsNull(Me.CS_coordinator) And Completed = False Then SFStatus = SFStatus2 ElseIf Not IsNull(Me.CS_coordinator) And Completed = True Then SFStatus = SFStatus3 End If If...