发信人: sy0081(笑吟)
整理人: kamkam(2002-05-02 17:46:52), 站内信件
|
我按照如下代码启动OLE对象,发生了错误。
Sub Postopen(Source As Notesuidocument)
Set note = Source.document
Dim sProgid As String
sProgid = note.~$OLEObjProgId(0)
Source.GotoField(note.~$OLEObjField(0))
Call Source.CreateObject("OLEObject", sProgId ,"")
End Sub
错误提示信息是:对象执行申请时发生错误。
哪位大侠请帮帮忙,我都困惑好久了。如何纠正此类问题?
谢谢!
我来回答这个问题吧!
“对象执行申请时发生错误”这个错误发生的原因就是:OLE对象的后台数据丢失了!!!
千真万确!!!
存储OLE对象的时候,有关组件的相关数据和对象数据本身经常出现不能够吻合的
情况,此时Notes报错,此问题在OLE嵌入方式中偶有发生,在Lotus Notes中特别
经常而已!
唯一的建议:不要用OLE方式存储,采用附件方式存储!
|
|