查看完整版本: 今天看到一个贴，是讲用asp将doc转成html的，用到.vbs这是什么文件？怎么用

今天看到一个贴，是讲用asp将doc转成html的，用到.vbs这是什么文件？怎么用

他的示例是doc2html.vbs    可这该怎么用呢？在asp中，还有如果doc中有图片，存出来会是什么样？能连图一起存出来吗？

1、那个VBS应该就是个VBSCRIPT脚本，可以用在ASP中。  
2、具体原理是用CreateObject建立一个WORD对象（只要你的服务器装了OFFICE就可以），然后调用WORD对象读入DOC文档，再用WORD对象将DOC文档转成HTML文档。  
3、能把图存下来，如果你想看一下效果，你直接在WORD中打开你的DOC文档，然后保存成HTML文档，就是那种效果。

doc2html.vbs  
实际功能类似与word  的文件－另存为

VBS就是VB脚本程序，扩展名是VBS的可以直接双击运行，语法就是VBSCRIPT,与ASP中用的一样。  
他叫WSH,WINDOWS98开始系统就带了。  
它可以说是WINDOWS版的批处理，当然功能强大多了。  
它执行的程序好像叫WSCRIPT.EXE。  
客户段脚本就是由它支持的。  
因为WINDOWS有漏洞，怕执行HTML会传染病毒，有人把WSH删除了，这样就用不成了  
可以从微软网上下载最新版的WSH，现在好像是5.6版，不到2M  
...

那个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

<%   
on  error  resume  next  
Set  myword  =  server.CreateObject("word.application")  
set  mydocument  =  myword.Documents.Open(server.MapPath("word.doc")  ,False,  True)  
mydocument.SaveAs("C:\test.htm",  8)  
mydocument.Close  
myword.quit  
Set  mydocument  =  nothing  
Set  myword  =  nothing   
%>

楼上的，我按你的方法提示
Server 对象, ASP 0178 (0x80070005)
检查权限时，对 Server.CreateObject 的调用失败。拒绝对此对象的访问
检查了用FSO可以生成其它的HTM页面，应该不是权限的问题吧。。可以帮下么？