SET CLASSLIB TO ("mindseyereportengine.vcx") ADDITIVE SET CLASSLIB TO ("mindseyereportpreviewforms.vcx") ADDITIVE loHost=CREATEOBJECT('MindsEyeReportEngine') *loHost.cScope=loReport.cScope *loHost.cWhileExpression=loReport.cWhile *loHost.cForExpression=loReport.cFor *loHost.nRecords=loReport.nInitialRecord *loHost.lDisplayexecutiontime=!loReport.Silent *loHost.cReportPreviewFormCaption=loReport.Caption loForm = loHost.ReportFormObject("your_report",0) loEngine=loForm.oReportEngine *loEngine.DisplayNewPageButton=loReport.PRV.UpdateMode *loEngine.DisplayDeletePageButton=loReport.PRV.UpdateMode loEngine.Scale=5000 loForm.Show(1)MartinJ