LOCAL upt as UPT.UptCtrl.1 OF upt.ocx * Next line causes error Object class is invalid for this container. upt = CREATEOBJECT('upt') upt.AboutBox() RETURN DEFINE class upt as olecontrol OleClass = 'UPT.UptCtrl.1' ENDDEFINEbut got exception in createobject as shown in comment