for each loPage in loForm.PageFrameName.Pages FOR EACH oControl IN loPage.COntrols>working on it. the problem I am running into is that the form has a pageframe with 6 pages on it...
>>MODIFY FORM MyForm NOWAIT >>aselobj(laForm, 1) >>loForm = laForm(1) >>WITH THIS >> FOR EACH oControl IN loForm >> * test to see of baseclass is a textbox here. if not, loop >> LcDesiredCode = "THISFORM.mcalendorse=.T." + CHR(13) ; >> + oControl.ReadMethod("VALID") >> oControl.WriteMethod("VALID", LcDesiredCode) >> ENDFOR >>ENDWITH >>