Recent content by AccessAce

To be safe, I do this. Me.Requery Me.Refresh Me.Repaint

First, create the new field as type text and a size that will ft the concantenation of the fields. Then, create an update query that inserts the this expression: [Field1] & " " & [Field2] & " " & [Field3] into that new field. Field1: "City" Field2...

I've got the switching colors to work. Any thoughts on why it seems to pause when there is only one record?

Perhaps someone can help me with the problem expressed in this thread thread702-641814

(inputweek-(cint(inputweek/100)*100))+((52-(10+cint(inputweek/100)))*100) The ()'s may be off, but this should work if inputweek <1199, assuming your always using 52 week years, and that you have another routine to get the first few weeks of the year. This can get you values at the end of the...

Set the DisplayWhen property of the button to Screen Only.

Check the code behind you BeforeUpdate event. Make sure that the keys are posted in the right order. You may have to verify that all required fields on the form have been filled in first.

It looks like all you are missing is the rst!Message = Me.txtMessage Do this before the update and that should put the message from the txtMessage control with every selected LogID.

Thank you for the star. It is much appreciated.

I have a continuous form with a text box that will display one of two values. If the value is X, make the background green. If the value is Y, use the default Red background. The form works great and the formatting works, unless there is only one record. If there is only one record, the Form...

FindPO = InputBox(&quot;Enter the PO #&quot;, &quot;Bionetics PO System&quot;) DoCmd.OpenForm &quot;frmPO&quot;, , , &quot;PONumber=FindPO&quot; Should be FindPO = InputBox(&quot;Enter the PO #&quot;, &quot;Bionetics PO System&quot;) DoCmd.OpenForm &quot;frmPO&quot;, , ...

Can you run the code if the parameter is declared as Optional?

Here's a small example: Public Sub TestSplit() Dim arr Dim t As Variant arr = Split(&quot;h,i,t,h,e,r,e&quot;, &quot;,&quot;) For Each t In arr Debug.Print t Next t End Sub

Check the referential integrity rules in the relationships window. You will need to make sure you updates are done in the right order, or do not enforce referential integrity.

You should create a query that pulls data from the two tables and base your form on that. The recorset fromthe two table should update the fields you need.