发信人: 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方式存储，采用附件方式存储!
|
|