Search results

Try putting the following in the OnCurrent() Procedure of the form. If [txtYourText] < 2.50 then [txtYourText].Forecolor = 255 Elseif [txtYourText] > 4 then [txtYourText].ForeColor = 255 else [txtYourText].ForeColor = 0 end if Please note this will only work if you are using a text box in a...

I Assume that your attemting to send some information in the message body of the sendobject command, which then removes the automatic signature! The Method i use is to send any information as an attachment and leave the message body clear, then the signature reappears, and it's not too much to...

The syntax for refering to list/combo box columns is - ' Columns are indexed from 0 If [DeceasedList].Column(4) = "Whatever" then 'open your form else 'open your other form End If HTH Mitch.

What is the structure of your table(s) ? is it relational or just a single fixed table ? Mitch.

Are you trying to work on the live database? Mitch.

Use the * char as follows Like [Forms]![FormName].[ControlName] & "*" HTH Mitch

hehe, but we love a tryer try putting a msgbox stLinkCriteria after you set the link criteria that should show you what your statement is producing, what your after is something like this [YourFieldName]='KeyValueOfList' Hope this helps Mitch. [This message has been edited by Mitch...

In your macros click on the open form line then in the properties click in the where condition then click the ... button, then select the primary field in the form you are opening and Dbl Click on <value> then click the = button the in the form you are searching in select the list box and dbl...

Hi again, The like statement should be in the format below - Like [Forms]![YourFormName].[YourSearchBox] & "*" and it will work without the input boxes. The requery of the list box on the Afterupdate procedure ensures the list it modified when you change your criteria and is simply -...

In you event which opens the new form add a new line of code below the open statement - Docmd.close acForm, "frmYourFormName" HTH Mitch.

Ok there are two ways to go about this, one is to dynamically create the required SQL string, but we can try the easier way first. On you form you want your four Txt boxes/ Combo Boxes these will be the criteria fields for your query and a list box with it's row source set to your search query...

Ok you use the send object command :- Docmd.SendObject acSendNoObject,,,[E-mailAddress],,,[Title],,,False and that should work. This command can also be amended to control other aspects such as CC:, Attachments, Enter standard messages. HTH Mitch.

I can't understand why you would want to but it's : [txtYourText] = [LabelYourLabel].Caption HTH Mitch.

You just need to enter the field name without the ASC as Acending is the standard sorting order DESC needs to be added if you want it the other way. HTH Mitch.

The easiest way if you have a small number of forms, would be to add a Yes/No field to your table, to mark an employee as old then filter your forms to only show records where this is false. You can then have another form which would filter on it being true. Then you could knock the flag off if...

OK, let's keep it simple and just avoid the problem. Copy your query and paste it calling it the same name appended with 'Greater' or something then on the run report button if they have selected Less than run the report with less than query as the data source else run it with the greater query...

What your doing wrong is the criteria is now ="<#[Yourdate]#" what you want to do is - <[txtYourText] as the criteria then put your date in the txtbox and i should work. Mitch.

ok if your entering the date in date format you can simple use this. dim dbs as database dim rst as recordset ' gets copy of your dataset set dbs = currentdb set rst = dbs.openrecordset("SELECT * FROM tblYourTable", dbopendynaset) ' gotolast record rst.movelast ' adds one to date of last...

Recordsets again Dim rst as recordset dim dbs as database ' creates a set of the record which matches the record you want set dbs = currentdb set rst = dbs.openrecordset("SELECT * FROM tblYourTable WHERE fldYourKey =" & "'" & txtYourKey & "'", dbopendynaset) [txtCopyOfData] =...

If the form has the table which you are searching as its record source, then you can use the combo box wizard to find a record based on the value selected, if not then create a query to be the record source, and access wil produce the code for you, which is... Me.RecordsetClone.FindFirst...