关于CreateOLEObject求助

有一个过程TfrmMain.LoadData(),从文件"学生名册.mdb"中读取数据，（文件已事先写好）
该过程的前三句是：
ControlModule.Engine:=CreateOLEObject('DAO.DBEinge.36');
ControlModule.testDB:=controlModule.Engine.OpenDataBase('学生名册.mdb');
ControlModule.testRS:=controlModule.testDB.OpenRecordSet('SELECT
         * FROM 学生信息 INNER JOIN 原学历 ON 学生信息.学号=原学历.学号
         ORDER BY 学生信息。学号');
且有：
type
  TControlModule = class(TDataModule)
  private
    { Private declarations }
  public
    { Public declarations }
    Engine:oleVariant;
    testDB:oleVariant;
    testRS:oleVariant;
    editFlag:string;
  end;var
  ControlModule: TControlModule;编译时显示：undeclared identifier'CreateOLEObject'（第一句）
undeclared identifier'FROM'（第三句）
这个CreateOLEObject在帮助中找不到，请指教！