Recent content by spinktec

Is this a valid Access SQL statement: UPDATE tbActivity SET [tbActivity].Hours = (SELECT Sum([tbLabor].Hours) AS totalActivityHours FROM [tbLabor] WHERE ((([tbLabor].ParentActivity)='92'))) WHERE ((([tbActivity].Key) = 92)); Whether I run this statement from VBA by RunSQL or in the query...

I'm successfully using the code below to decode Vehicle Identification Numbers (VINs); but I'm looking for a VIN encoder module. Anyone? Public Function isVIN(strVIN As String) As String Dim I As Integer Dim intCount As Integer Dim intCount2 As Integer Dim aModelYears() As Variant Dim...

I've stripped everything, even comments, and I can't get the zipped file under 700k.

That's it right there. It's a piece of code that is called to "turn on" or "turn off" a field depending whether the "affirmative is set to true (turn on) or false (turn off). I'm haveing no problem with any other part except for the "enabled" property. I use a very similar varriation of the...

I've moved the setfocus command to the module instead of the code that calls the module. Below is the entire module that changes each control. I'm stumped because I setfocus to the parent control just before I set the sub control to disabled and I still get the setfocus error. Private Function...

Does it work the same in reverse? eg. setting the focus from the subform to the parent. That's actually what I'm doing. I'll try it your way as a two step process.

The rename didn't help; no change.

Yes, it is the name of the form and the control (I see where your're going with this)

I'll check that right now! Nope, that's not the problem.

VehicleSub is the name of the sub form. The code shown here is on the main form. Directly below is the section of code that calls the function. Me.ButtonExit.SetFocus Me.VehicleSub.Visible = False Me.VehicleSub.Enabled = False StatusFieldOn(False) Me.FieldSN.SetFocus Me.VehicleSub.Visible =...

The focus moves to the first tab position on the sub form as soon as I attempt to set enabled property of a contol on the subform to FALSE. I want to disable all controls the subform individually so I've tried moving focus to the parent and seting the entire subform enabled property to false...

Thanks. Just for your information: I'm trying to call the function that looks at the data on the form and adjusts the field locking based on the circumstance, user role, etc. I've done this successfully quite a lot, but I've never tried to call the RefreshForm function from a parent. I went...

yeah.... I know; still, is there a way to do it directly.

Is there a way to refer to (call) a subform private module from the parent. I can't make it working using the normal syntax I use to manipulate controls and objects.

I figured it out and I'm going to take the time to write this out because I've not seen it anywhere else. The first form that was calling the second form was conveying its Allow edits, Deletions, Additions settings to the next form. The first form is a tabed list of subforms. Each subform...