o1 = CREATEOBJECT( "MyForm" ) o1.Show() READ EVENTS DEFINE CLASS MyForm AS Form WindowState = 2 PROCEDURE Init THISFORM.AddObject("Excel", "oleExcelObject") THISFORM.Excel.Visible = .T. PROCEDURE Activate() THISFORM.Resize() PROCEDURE Resize THISFORM.Excel.Height = THISFORM.Height THISFORM.Excel.Width = THISFORM.Width PROCEDURE QueryUnload CLEAR EVENTS ENDDEFINE DEFINE CLASS oleExcelObject as OLEControl OleClass = "Excel.Sheet" DocumentFile = "d:\MYBIZ\info request.xls" ENDDEFINE>Hi everybody!