>Here is some very simple code to enumerate through the different objects that could reside within the DE:
>
>Local nObject,cObject,x
>Local Array aObjects[1]
>nObjects = Amembers(aObjects,ThisForm.DataEnvironment,2)
>If nObjects > 0
> For x = 1 To Alen(aObjects,1)
> cObject = aObjects[x]
> ?ThisForm.DataEnvironment.&cObject..Class
> Next cObject
>Endif

Thanks