VB高手请进，关于Word.Application

Question

    Dim docTemp As Word.document
    Dim prjTemp As New Word.Application
    Set docTemp = prjTemp.Documents.Open("c:\doc\test.doc")
    docTemp.SaveAs "c:\doc\test.html", wdFormatHTML
    docTemp.Close
    prjTemp.Quit
    Set prjTemp = Nothing我的程序是这样的，你们看有什么不对的地方吗？帮我分析一下原因啊，为什么显示拒绝的权限呢？

Answer 1

提示我的错误一直是 “拒绝的权限”！why?

Answer 2

Private Sub Command1_Click()
    Dim w As Word.Application
    With w
    
        ChangeFileOpenDirectory "D:\"
        Documents.Open FileName:="test.doc", ConfirmConversions:=False, ReadOnly:= _
            False, AddToRecentFiles:=False, PasswordDocument:="", PasswordTemplate:= _
            "", Revert:=False, WritePasswordDocument:="", WritePasswordTemplate:="", _
            Format:=wdOpenFormatAuto
        ActiveDocument.SaveAs FileName:="test.htm", FileFormat:=wdFormatHTML, _
            LockComments:=False, Password:="", AddToRecentFiles:=True, WritePassword _
            :="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:=False, _
            SaveNativePictureFormat:=False, SaveFormsData:=False, SaveAsAOCELetter:= _
            False
        ActiveWindow.View.Type = wdWebView
        ActiveWindow.Close
    End With
End Sub

Answer 3

OPEN的语法
expression.Open(FileName, ConfirmConversions, ReadOnly, AddToRecentFiles, PasswordDocument, PasswordTemplate, Revert, WritePasswordDocument, WritePasswordTemplate, Format, Encoding, Visible)

Answer 4

你的DOC文件已经打开的吧！或我的HTML文件已经存在了，都可以提示‘拒绝的权限’。

Answer 5

我知道 Open的语法，但是后面的都是可选的，可以省去不写的啊！

Answer 6

我这里可行
安装microsoft word 9.0 object library

Answer 7

Word文件没有打开，另外也没有同名的HTML文件存在，但是不知道为什么会提示这种错误呢？

Answer 8

上面问错了,
是否你的文件处于独占打开状态
这种情况WORD下我没见过,EXCEL下试这个原因

Answer 9

我在工程里引用了 microsoft word 9.0 object library 为什么还不行啊？