如何求得一个polygon和polyline的交点啊？

<P>我在图上画了一个圆，(circleelement)，想得到该圆和与该圆相交线的交点，代码如下</P>
<P>  Dim ptopopr1 As ITopologicalOperator<BR>   Set ptopopr1 = ppolygon<BR>   Dim pptcoll1 As IPointCollection<BR>   Set pptcoll1 = ptopopr1.Intersect(pline1, 1)</P>
<P>总是提示自动化错误，怎么解决啊？</P>

<P>应该是ppolygon或者pline1对象为空．</P>

<P>ppolygon的空间参考等于pline1的空间参考，再intersect</P>
<P>set pline1.spatailreference=ppolygon.spatailreference</P>
<P>另外最好先返回IGeometry对象，再赋值给IPointcollection对象</P>