程序运行时报Run-time error '429' ActiveX componnent can't create object的错误
编号：QA004242
建立日期: 2001年6月6日 最后修改日期：2001年6月6日
所属类别：
None:
操作系统: pWin98
编程工具: VB6.0
问题: 我在使用下面这段代码读取WORD文件内容时，必须打开一个WORD窗口，即使WORD窗口中只包括一个空白的文档，这时程序会一次性把该文档中的所有内容全部读入，如果打开没有WORD窗口，则程序运行时会报Run-time error '429'
ActiveX componnent can't create object的错误，请问这是为什么？
Dim sFileName, sContent, sPartContent As String
Dim wrdApp As Object
CommonDialog1.ShowOpen
If Err <> 0 Then Exit Sub
sFileName = CommonDialog1.FileName
If sFileName = "" Then Exit Sub
Set wrdApp = Word.Application
wrdApp.Visible = False
wrdApp.Documents.Open (sFileName)
sContent = wrdApp.ActiveDocument.Content
水平: 刚入门
回答:
你可以这样做：
Set wrdApp = CreateObject("Word.Application")
wrdApp.Visible = True
或者
Set wrdApp = New Word.Application
wrdApp.Visible = True
此问题由李海回答。
| |
|
|
| |
|
|
