chirenchafu

那个VBS是在WINDOWS命令行环境中使用的，很多代码没有用，我来试一下提练一下，编个ASP的过程。  

1、先申明，没测过，有兴趣的测一下吧。  
2、另外，据我以往的经验，OFFICE的东东都比较耗内存，要有心理准备。  
3、src、dest都是含绝对路径的文件名，src是DOC文档名，dest是HTML文档名。  

Function  Word2Html(src,dest)  
       Set  objWord  =  CreateObject("Word.Application")  
       objWord.Visible  =  False  
       objWord.Documents.Open  src  
       Set  objDoc  =  objWord.Activedocument  
       objDoc.SaveAs  dest,8  
       On  Error  Resume  Next  
       objDoc.Close  
       objWord.Quit  
       Set  objDoc  =  Nothing  
       Set  objWord  =  Nothing  
End  Function