Works on A2003 & A2010 but fails on A2007

[GraeagleBill]

I have a form "DirectoryItems" that contains a sub-form "FamDirItems" whose container name is "ContFamDirItems". The code below gets control when the user clicks on the label "Picture ID" you see in the design view of the "DirectoryItems" form (screen-shot below).

Private Sub ImageName_Click()
Select Case (SortColumn)
    Case ""
         Highlight ("ImageName")
         Me.ContFamDirItems.Form.RecordSource = "QPicsNoDir"
         'Me.RecordSource = "QPicsNoDir"
    Case "ImageName"
         Un_Highlight ("ImageName")
         Me.ContFamDirItems.Form.RecordSource = "QDirOrPics"
         'Me.RecordSource = "QDirOrPics"
         SortColumn = ""
    
    Case "lblImageFound"
         Un_Highlight ("lblImageFound")
         Highlight ("ImageName")
         Me.ContFamDirItems.Form.RecordSource = "QPicsNoDir"
         'Me.RecordSource = "QPicsNoDir"
End Select

Debug.Print Me.ContFamDirItems.Form.RecordSource
Me.ContFamDirItems.Form.Requery

    With Me.RecordsetClone
        Debug.Print .RecordCount
        If .RecordCount = 0 Then MsgBox "No image names found that are un-accompanied by Directory checks."
    End With

End Sub

The path taken in the above code is via Case "". The RecordSource is verified in that it displays "PicsNoDir" in the immediate window as expected. The statement Me.ContFamDirItems.Form.Requery you see executes as expected in A2003 and A2010 BUT NOT in A2007. No error is given. The record count value remains that of the initial load of the form at 236 records. Had the Requery run properly, the count would be 110 records. The display of the form "Directory Items" essentially shows an empty sub-form.

Below is a screen-shot of the design view of the form "Dirrectory Items", which hopefully will help make sense of what I'm saying here.

Is there some peculiarity about the Requery statement when run in A2007?

Thanks,
Bill

[June7]

I don't use the .Form qualifier.

Me.ContFamDirItems.Requery

[GraeagleBill]

No change after dropping the .Form qualifier . The client's A2007 system recently updated (8/14/13) to SP3.

Further evidence that the Requery isn't happening is that the sub-form FamDirItems has a Current Event that doesn't fire when running the code in Debug, but clearly does when running the app in A2003 or A2010.

[June7]

What are the OS's for each computer?

Have you tested on another computer running 2007?

[GraeagleBill]

The A2003 and A2010 as well as the A2007 are all Win 7 64Bit, Office installed as 32Bit on each of those machines.

Unfortunately, I only have the one A2007 machine.

[June7]

If you want to provide db, I will test on 2007. Describe the steps I must follow.

[GraeagleBill]

I'd be happy to do that, but the necessary elements add up to quite a bit, like about 270MB.

[June7]

Even after compact & repair and zipped? Without data or very few records?

If still too large can upload to fileshare site like Box.com and post link to ZIP (please) file.

[GraeagleBill]

The size issue relates to the size of an image library. If I try to rig a subset of that, I'm afraid it might muddy the water so much as to make debugging difficult.

[GraeagleBill]

I'm a dummy............. I can send you a release package that won't be any larger than about 15MB. However, I can't post that publicly because of proprietary reasons. Can I send a zip file to your email address?

[GraeagleBill]

You can send me your EMA at GraeagleBill@gmail.com so as to protect it.

[GraeagleBill]

Zip is only 6,898KB.

We can still post whatever resolution we find privately.

[June7]

You can upload to Box.com and then send me the link by PM. You can delete the Box.com file later if you want.

[GraeagleBill]

Okay, the file has been uploaded to Box.com. What do you mean "link by PM"?

[GraeagleBill]

By the way, I uploaded the zip file to the A2007 machine so I could test the package on the "failing" A2007 machine..............it does in fact fail.

Now I just need to know what you meant by "send me the link by PM". "Private Mail"?