加载中…
个人资料
  • 博客等级:
  • 博客积分:
  • 博客访问:
  • 关注人气:
  • 获赠金笔:0支
  • 赠出金笔:0支
  • 荣誉徽章:
正文 字体大小:

ASP读取word内容并显示于网站

(2014-02-21 13:44:43)
标签:

asp

读取word

网页显示

组件服务

管理工具

分类: 技术

像百度文库一样,能将文档是网页形式显示出来,一直是我们这些自觉网站制作的高级目标,一直以为这个目标一直不能实现。今天在网站上研究了一篇相关的文章后,按文章的操作方法,加上自己的一些设置,竟然实现了这个功能,虽然不能像百度文库一样所见即所得,但至少解决了我的一大困惑。文章应该是台湾人写的,题目叫“ASP如何读取Word文档内容并显示于网页”,大家可以直接通过百度文库查找并按要求操作。下面用我学习后使用的方法,教大家实现这一功能。

1.建立AxWord.wsc文件

打开记事本,复制下面代码,并粘贴进记事本。

< ?xml version="1.0"? >
< component>
< registration
 description="PH ActiveX Word Windows Script Component"
 progid="AxWsc.Word"
 version="1.00"
 classid="{5F644CD7-E1D4-4D54-A260-B4CCC2F540FC}">
 < /registration>
 < public> 
 < method name="GetDocContent">
 < /method>
 < /public> 
 < script language="VBScript">
 < ![CDATA[ 
 Function GetDocContent(strFile)
 Dim wdObj 
 Set wdObj = CreateObject("Word.Application")
 With wdObj 
 .Documents.Open strFile 
 GetDocContent = .ActiveDocument.Content
 On Error Resume Next
 .ActiveDocument.Close
 .ActiveWindow.Close
 .Quit
 End With 
 Set wdObj = Nothing
 End Function
 ]] >
 < /script>
 < /component>
将这个文件另存为AxWord.wsc,并存放到磁盘不容易删除的地方,如C:\windows\下,因为如果注册成功后删除这个文件,将网站显示将出错。

2.注册AxWord.wsc文件

右击AxWord.wsc文件,在右击菜单中选择注册,弹出注册成功字样。

3.生成scriptlet.tlb文件

右击AxWord.wsc文件,选择通用类型库,将自动生成scriptlet.tlb文件。

4.新建组件服务-->COM+应用程序

在开始运行中输入dcomcnfg或直接在“管理工具”中选择“组件服务”,打开组件服务,按图展开COM+应用程序,右击新建应用程序。进入“COM+应用程序安装向导”,选择“创建空应用程序”。输入新应用程序的名称为AxWord后进入下一步,在使用者中,一定要注意要选择anyone或网站访问用户,否则页面打开会出错,此处设置可以在“组件服务”展开图中的角色进行添加或设置。

ASP读取word内容并显示于网站

接下来按图右击,新建组件,在“COM+组件安装向导”中选择安装新组件,对scriptlet.tlb进行注册,完成组件服务安装。

ASP读取word内容并显示于网站
5.建asp文件,运行测试

新建asp文件,命名为doc.asp,输入下面内容。

< % Dim wd  
'建立先前写的 DLL 对象 , 个体化 
Set wd = Server.CreateObject("AxWsc.Word")
'执行 Dll 中的 GetDocContent 方法读 Word 内容
Response.Write replace(wd.GetDocContent("D:\test.doc"),vbcr,"< p>")
 %>

此方法仅能显示文字,对图片的显示无能为力。

注:以上代码在复制后,要删除<右侧及>左侧的空格。

0

阅读 收藏 喜欢 打印举报/Report
  

新浪BLOG意见反馈留言板 欢迎批评指正

新浪简介 | About Sina | 广告服务 | 联系我们 | 招聘信息 | 网站律师 | SINA English | 产品答疑

新浪公司 版权所有