一个困扰了我一天的问题，method 'add' of object 'documents' failed

Question

错误码是'-2147417851(80010105)'
源程序中有如下几句   
 Dim app As New Word.Application
    Dim doc As Word.Document
    app.Visible = False    
    Set doc = app.Documents.Add
    doc.SaveAs FileName:="e:\first.doc"
    Set doc = Nothing
    app.Quit
    Set app = Nothing
同样documents的其它方法比如open也无法使用，提示是“上次打开normal.dot”出现严重错误，然后不管我点击“打开”还是“恢复数据”都无济于事，问题的所在可能是标准模板normal.dot出了问题，但是我把officexp重装了一遍还是没解决

Answer 1

试试这个
Dim objword As Object
     Dim i As Long
     Set objword = CreateObject("word.application")
     objword.Visible = True
     
     Dim newdoc As Object
     Set newdoc = objword.Documents.Add

Answer 2

这个问题最后终于解决了，不是程序的问题，我为此查了一整天的msdn文档，最后终于发现由于我的机子装了norton antivirus，每一次打开word文档，它都要查病毒，由于我的normal.dot模板坏了，norton就把word的automation功能关了，我先是照msdn说的对标准魔板进行重命名，结果还是不行，最后终于找到一个命令把norton检查去处了