在vb中如何实现将word转化为html

Question

    Dim a As Document
    Set a = Documents.Open("")
    a.SaveAs "c:\djskd.html", wdFormatHTML
    a.Close
    Set a = Nothing

Answer 1

Dim a As Document
    Set a = Documents.Open("c:\djskd.doc")
    a.SaveAs "c:\djskd.html", wdFormatHTML
    a.Close
    Set a = Nothing

Answer 2

这个Document是怎么回事
是要引用什么部件呀
还是要定义这个Document的类型呀?

Answer 3

这样把：前提是您的机器装了Worddim oWord As Object
dim oDocument  AS Object
Set oWord = CreateObject("Word.Application")
Set oDocument= oWord.Documents.Open ("c:\djskd.doc")
oDocument.SaveAs "c:\djskd.html", wdFormatHTML
oDocument.Close
Set oDocument =Norhing
oWord.Quit
Set oWord =Nothing