nRetval = AccessibleObjectFromWindow(m.nhWnd, OBJID_CLIENT, .cguid, @oacc) oAccvfp = oacc IF TYPE("oaccvfp.accchild(int(2^31-1))") # "U" THIS.oVFP = oaccvfp.accchild(int(2^31-1)) ENDIF DO CASE CASE NOT (TYPE("This.oVFP.Name") # "U" AND This.oVFP.Name = "Microsoft Visual FoxPro") *-- If its not VFP application MESSAGEBOX(MSG_NONVFP_LOC, WINDOWTITLE_LOC, 16) lContinue = .f.It seems that THIS.oVFP = .NULL. anyone know whwy this might be!!??