Hi,

Pls make like this.

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

EndDefine

*** COM2
*** Project VFPCom2

Define Class C2 as Custom
Proc DumProc
Return "Return from DumProc"
EndProc

EndDefine

Regards
Ajay Mishra