LOCAL lcFileName lcFileName = GETFILE("BMP", ; this.Caption, ; SELECTBUTTON_LOC) IF !EMPTY(lcFileName) thisform.pageframe1.page3.imgPhoto.Picture = lcFileName REPLACE employee.photo_file WITH lcFileName thisform.Refresh() ENDIF