ASP操作Word文件的例子!!!
2012-04-23 17:43
405 查看
确实可行!!!我已经在本地的机子上试过了!!! 不过有一些代码看不懂!还望各位大虾教教我!!! 主要是opr_doc_inc.asp里面那些对dot模版的操作不懂,具体是怎样操作的? 如果各位大虾有空的话,能教教小弟一些关于调用ActiveX控件的知识就更好了!!! 感激不尽,我现在有个项目的重要技术难点就是要操作word文档! ⑴.安装Office 2000,其中Word 2000必选 ⑵.设置IE中Internet的安全性:ActiveX控件和插件全部启用 ⑶.设置工作目录的文件权为Internet及System读取/修改/写入 ⑷.编写模版course.dot ⑸.具体代码: ###opr_doc_inc.asp <% Response.write "Dim Var_Num" & chr(13) Response.write " Var_Num = 2 " & chr(13) Response.write "Dim varstrings(2)" & chr(13) Response.write "varstrings(0)=" & chr(34) & "起草人:" & chr(34) & chr(13) Response.write "varstrings(1)=" & chr(34) & "日期:" & chr(34) & chr(13) Response.write "Dim varvalues(2)" & chr(13) Response.write "varvalues(0)=" & chr(34) &"起草人:涂海涛"& chr(34) & chr(13) Response.write "varvalues(1)=" & chr(34) & "日期:"&date()& chr(34) & chr(13) %> Sub instead(word) Set myRange = word.ActiveDocument.Content for i=0 to Var_Num - 1 call myRange.Find.Execute(varStrings (i),false,false,false,false,false,false,false,false,varvalues(i),2) Next End Sub ###opr_doc.asp <% '获取保存的路径 path=server.mappath("opr_doc.asp") path=left(path,len(path)-11) filenames=path&"test.doc" w1="word.activedocument.saveAs"&chr(32)&chr(34)&filenames&chr(34) w2="wApp.Documents.open"&chr(32)&chr(34)&filenames&chr(34) %> <script language="vbscript"> On Error Resume Next '生成指定文件名的Word文档 Dim word set word = CreateObject("Word.Application") if Err.number > 0 Then Alert "发生错误,请确认文件是否存在" else word.visible = False word.documents.open "<%response.write path%>course.dot" <%Response.write w1%> word.documents.close set word=nothing end if <!--#include file="opr_doc_inc.asp"--> Dim wApp Set wApp = CreateObject("Word.Application") If Err.number > 0 Then Alert "发生错误,请确认文件是否正确创建" else wApp.visible = True <%Response.write w2%> call instead(wApp) set wApp=nothing end if </script> 效果:看看生成了doc文件吗?这个新建的doc文件和模版文件有什么区别?起草人和日 期发生了变化了吗?保存一下,看看新生成的doc文件的内容。 -- 是不是从你拔起石中剑后,我们就仅能以君臣相交? 我们是最相互信赖的伙伴,共同誓言以我天下第一剑士的威名、 以你撼动人心的领导气量,建造我们的王国。 “为彼此奉献牺牲使我们自由”这是圆桌武士的精神所在……
相关文章推荐
- 【ASP】ASP vbscript一个综合的例子,操作html文件添加、删除代码、删除文件。
- 在ASP.NET中操作文件的例子(VB)
- 在ASP.NET中操作文件的例子(VB)
- asp.net文件操作小例子(创建文件夹,读,写,删)【转】
- 在ASP.NET中操作文件的例子(VB)
- 在ASP.NET中操作文件的例子
- 在ASP.NET中操作文件的例子
- 在ASP.NET中操作文件的例子(VB)
- asp.net文件操作小例子(创建文件夹,读,写,删)
- asp.net 文件操作小例子(创建文件夹,读,写,删)
- JAVA IO操作文件(包括word文档的显示)-asp.net关注
- [C#.Net]在ASP.NET中操作文件的例子
- ASP FSO文件操作函数代码(复制文件、重命名文件、删除文件、替换字符串)
- ASP.NET中导出excel/word等类型文件的简单方法
- asp.net core 之静态文件目录的操作
- ASP文件操作
- ASP.NET操作Word的IIS权限配置
- matlab 环境 word 和 excel 文件操作
- Asp.Net 文件操作基类(读取,删除,批量拷贝,删除,写入,获取文件夹大小,文件属性,遍历目录)
- ASP.NET 2.0,C#----利用GridView控件导出其他文件(导出Excel,导出Word文件)