Yes Nick,

This is THE EXACT CODE

*** COM1
*** Project VFPCom1

Define Class C1 as Custom OLEPUBLIC
Proc GetMyObject
Local aa As Object
aa = CreateObject("VFPCom2.C2")
Return aa
EndProc

EndDefine

*** COM2
*** Project VFPCom2

Define Class C2 as Custom OLEPUBLIC

Proc DumProc
Return "Return from DumProc"
EndProc

EndDefine

My purpose is that: I dont want users to create objects of VFPCom2.C2 directly.
The only way they can get VFPCom2.C2 objects is by VFPCom1.C1.

Pls help me