Recent content by Kryst51

  1. Kryst51

    Error 3021 No Current Record upon failed data validation when trying to save

    So first I decided to use my error handling to ignore the first error (3021) and just deal with the second error(2105). I could not for the life of me figure out why this error (Error 2105) was being caused, so I found a different approach and used it instead. I found this code snippet...
  2. Kryst51

    Error 3021 No Current Record upon failed data validation when trying to save

    Hi Folks, I haven't been on very much recently due to being moved to a new position at work, I hope ya'll are well. :) To the point. I have a form where in the before update event I have the following code (ByPass is declared public to the form at the top of the vba window as an Integer)...
  3. Kryst51

    Business as Usual

    Hey, something we agree on!
  4. Kryst51

    UnionQuery for Treeview

    Hi Banana, Thank you for your answers. (I tried adding to your rep, but as the same folks always provide answers to me, there are several people I am not able to until I "spread it around" :p). I have made the changes you suggested. The problem is still not fixed but the lesson is learned...
  5. Kryst51

    UnionQuery for Treeview

    Hi all, I am using an example of a treeview that I obtained on this thread. I learn by doing, and fixing things as they come up. In the code for building the tree view is a union query which I modified how I thought it would fit my needs. I start with a query instead of a table for my...
  6. Kryst51

    Treeview or something like it.

    Thank you for pointing me to it then :p Thank you Brent for making it!!!!
  7. Kryst51

    Treeview or something like it.

    That is fantastic! Thank you!
  8. Kryst51

    Treeview or something like it.

    I wish to have a treeview on a form which displays Categories then Subcategories then a list of errors, for instance: Sales Errors Product Errors Entered the wrong product on the sales order Pricing Errors Entered the wrong price on the sales orde Price should have been...
  9. Kryst51

    Combo box that fills in 2 fields

    I am not positive but maybe what vbaInet was trying to get at is that when you took off the "Me." you also changed the rest of it. Try what the following as per vbaInet's suggestion (I think ;)): EDIT: Also to atach your db, compact and repair, then zip it up, you should then be able to...
  10. Kryst51

    Complexity of United States tax code

    You shouldn't let our tax system keep you from having a family.... People who decide to have children make it work, regardless of the tax situation (I don't mean by using welfare, which some people do need).
  11. Kryst51

    Error Message Handling

    To use vbaInet's code, I believe it is: If Len(Nz(Me!PatientGender, "") = 0 Then Me!PatientGender.SetFocus 'You could also add your code for the message box if you wanted Else Exit Sub End If
  12. Kryst51

    Error Message Handling

    How about putting the code in the form's before update event instead of the control?
  13. Kryst51

    Error Message Handling

    You are getting this error with your current code? Have you tried stepping through the code using F8 in break mode? The only thing I can think of is to do the following: Private Sub PatientGender_BeforeUpdate(Cancel As Integer) Dim strMsg As String, strTitle As String Dim intStyle...
  14. Kryst51

    What happened to Adam?

    I think the puzzle pieces are finally beginning to come together..... just maybe...:p
  15. Kryst51

    Shootings in Tucson

    Uh, yeah, it's like batman only.....Phatter.....:p
Top Bottom