打开EXCEL文档时报错

[WOFEIYANG]

在OPEN() 事件中赋值已申明(oleobject iole_object)的实例变量:
iole_object = create oleobject

在选择文档打开时:
li_ret = iole_object.ConnectToObject("","excel.application")
IF li_ret <> 0 THEN
li_ret = iole_object.ConnectToNewObject("excel.application")
END IF
IF li_ret <>0 Then
MessageBox("Connecting to COM Object Failed", &
"Error: " + String(li_ret))
Return 0
End IF

iole_object.visible = TRUE //这句语句报错
iole_object.Aplication.workbooks.open(FilePath)

//窗口关闭事件:
iole_object.DisConnectObject()
iole_object.Destroy

操作过程如下:
打开都个文档后都是正确的,当关闭所有打开的文档后,再重新选择打开某张文档时报错.错误语句在:iole_object.visible = TRUE这句.

但ConnectToObject()的返回值却是0,表示是当前连接是可用的,不知道是怎么回事,请高手指教.

[guo1223]

每次都用CONNECTNEWOBJECT,窗口关闭时关闭打开的WORD和EXCEL窗口