>WITH THISFORM.PageFrame1 > lnPages = .PAGECOUNT > FOR lnPage = 1 TO lnPages && Get the right page ID (lnPage) as they may be moved around > IF .ACTIVEPAGE = .PAGES(lnPage).PAGEORDER > EXIT && lnPage is what we are looking for > ENDIF > ENDFOR > lcPagename = .PAGES(lnPage).NAME >ENDWITH >I was hoping for something straightforward, but I guess this is the best we can do. Thanks!