Search results

They are going from one record to the next. Say he uses the navigation buttons on the bottom of the form. Or he uses the find the find a specific record.

The sample of code that i'm using is Private Sub Form_SelectionChange() Me.Refresh End Sub I couldn't find repaint??

I couldn't find an on change. I did try it on view change & on selection change & on data set change. And that didn't refresh.

I want my form to refresh after the user has selected the record. I have tried the load, current, resize, activate, and open and these don't refresh when I want them to. The on timer works but it's too much. So soon as he switches from one record to the next I want it to refresh. Reason for...

I've been searching this forum and trying every possible scenerio, and I give up. I'm sure it is something simple. I have added a list box to an existing form. I want the list box to show me only the values where the id values are equal. So the list box rowasource is keyqry whose fields are...

Woohooo!! I got it. Or at least it works, until.... Private Sub phone_GotFocus() If Me![country] = "USA" Then Me!phone.InputMask = "(999) 999-9999 " Else: Me!phone.InputMask = "" End If End Sub Please don't hesitate to correct me and this code. I'm learning as I go.

Well I looked this up on the forum and I found the link below. I'm trying to make his into mine with no knowledge of code other then it exists and It's not easy to learn by hunting and pecking around it. I want to create a command(?) that will look at my country field in the form and that will...

Also I just noticed that when I select the productid it is not putting the value associated in the txtamount field. Maybe that is because i get the error after I select the id. Would the error then stop the process and not enter the value? If that is so does that help in finding the cause of...

Thanks, I tried that. No luck.

When I run a form by itself i get no errors. I add it to another form as a subform and and I get the Run-Time error '2001' You canceled the previous opertion. I hit the debug and it goes to some code I have Private Sub cboproductid_AfterUpdate() Me.txtamount.Value = DLookup("[amount]"...

Good Morning Rural, That worked. Thank you very much. Now I'm going to see if I can clean it up a little. You have been great. Thanks.

Rural Guy, I tried your code Private Sub txtamount_AfterUpdate() If MsgBox("Do you want to Update the product group with this new price?", _ vbExclamation + vbYesNo) = vbYes Then [producttbl].[amount] = Me.txtamount End If End Sub however I get a run-time error...

I think I get it. I'm rather a newbie to code. so I redid the event to be Private Sub txtamount_AfterUpdate() Dim Message, Buttons, Choice Message = "Do you want to Update the product group with this new price?" & Chr(10) & Chr(10) Buttons = vbYesNo Choice =...

I can understand that. Thanks for looking?

? Is that right? I'll have to ask the owner of the db if he wants it x amount of days to = Y or use the days of the month. In any case, thank you very much. Not being a pest but any chance of looking at another post by me in forms???

Yeah, I think that is better. But is that right? Hmmm.

I'm reading about dateadd now.

I don't understand how that will help? The owner of the db is going to run a report which tells him which products have expired but better yet what products are going to expire. So in a underlying query I will have write my criteriato be datediff(d, [orderdt],date())<= ([expterm]+14) This...

Need a little professional advice. I have a product table. Those products expire over time. Their shelf life is monthly, quarterly, or annual. What should I use for monthly, quarterly, and annual in my table. My first thought was 30, 90, and 365. Then in my query I would use the datediff...

So I'm trying to figure what the code would be to have the on_change of txtamount update producttbl.amount with this new value What is wrong with this? What is wrong with the sql statement db.Execute "UPDATE producttbl on producttbl.productname=Forms![Form1]!cboname set...