ASP中的表格导入到Word中打印

最新推荐文章于 2025-09-28 13:37:59 发布
转载 最新推荐文章于 2025-09-28 13:37:59 发布 · 1.3k 阅读 · 0
标签
#asp #vbscript #generator #table #html
#button
本文介绍了一种使用VBS脚本将ASP页面中的表格数据导出并格式化到Word文档的方法，包括设置标题样式及表格内容。

ASP中的表格导入到Word中打印

 

<HTML>
<HEAD>
<TITLE> New Document </TITLE>
<META NAME="Generator" CONTENT="EditPlus">
<META NAME="Author" CONTENT="">
<META NAME="Keywords" CONTENT="">
<META NAME="Description" CONTENT="">
</HEAD>

<BODY>
<TABLE id="data" border="1">
<TR>
<TD><B>asdfaf</B></TD>
<TD><B>asfafaf</B></TD>
</TR>
<TR>
<TD>asdfaf</TD>
<TD>asfafaf</TD>
</TR>
</TABLE>
<input  type="button"  name="out_word"  onclick="vbscript:buildDoc"  value="导出到word"  class="notPrint">    
<script  language="vbscript">  
Sub  buildDoc  
set  table  =  document.all.data  
row  =  table.rows.length  
column  =  table.rows(1).cells.length  
 
Set  objWordDoc  =  CreateObject("Word.Document")  
 
'objWordDoc.Application.Documents.Add  theTemplate,  False  
objWordDoc.Application.Visible=True  
 
Dim  theArray(20,10000)  
for  i=0  to  row-1  
       for  j=0  to  column-1  
               theArray(j+1,i+1)  =  table.rows(i).cells(j).innerTEXT  
       next  
next  
objWordDoc.Application.ActiveDocument.Paragraphs.Add.Range.InsertBefore("综合查询结果集")  //显示表格标题  
 
objWordDoc.Application.ActiveDocument.Paragraphs.Add.Range.InsertBefore("")  
Set  rngPara  =  objWordDoc.Application.ActiveDocument.Paragraphs(1).Range  
With  rngPara  
       .Bold  =  True  //将标题设为粗体  
       .ParagraphFormat.Alignment  =  1  //将标题居中  
       .Font.Name  =  "隶书"  //设定标题字体  
       .Font.Size  =  18  //设定标题字体大小  
End  With  
Set  rngCurrent  =  objWordDoc.Application.ActiveDocument.Paragraphs(3).Range  
Set  tabCurrent  =  ObjWordDoc.Application.ActiveDocument.Tables.Add(rngCurrent,row,column)  
 
for  i  =  1  to  column                                  
 
       objWordDoc.Application.ActiveDocument.Tables(1).Rows(1).Cells(i).Range.InsertAfter  theArray(i,1)  
       objWordDoc.Application.ActiveDocument.Tables(1).Rows(1).Cells(i).Range.ParagraphFormat.alignment=1  
next  
For  i  =1  to  column  
       For  j  =  2  to  row                          
                   objWordDoc.Application.ActiveDocument.Tables(1).Rows(j).Cells(i).Range.InsertAfter  theArray(i,j)      
                 objWordDoc.Application.ActiveDocument.Tables(1).Rows(j).Cells(i).Range.ParagraphFormat.alignment=1  
       Next  
Next  
 
End  Sub  
</SCRIPT>
</BODY>
</HTML>
asp 利用word模板生成word
08-31
利用word.dot模板生成word 采用书签替换的方法！
asp html转word文档,【转】利用ASP导出文档到WORD或Excel
weixin_39850699的博客
06-03 822
ASP导出WORD或Excel文档(比较另类，而且超级强的。)Response.Buffer = TrueResponse.ContentType = "文档类型"Response.AddHeader "content-disposition", "inline;filename="保存的名称.格式"%>可以使用ASP将一些数据导出为Word或者Excel文档，其实很简单，导出的资料即为...
asp html 导出word,asp生成word文档的又一方法_asp实例
weixin_35353583的博客
06-16 908
在网上，利用Asp生成Word文档的方法实在不少，最常见到的方法就是利用Word生成.dot的文档，再用Asp向.dot文档中传递宏，这种方法虽好，但实现起来非常复杂，而且不能循环生成表格。在实际应用中，我总结出来一种新的生成Word文件的方法，生成的Word文件有页眉、页角，现拿出一例与大家探讨。实现：我的解决办法，用WordXP(其他版本还没有试过)制作表格，将做好的Word表格转换为HTM...
使用ASP生成/导出WORD文档代码
slavewen的专栏
02-11 1408
 在很多场合我们需要将某个页面或具体内容导出为Word保存在本地硬盘上，今天Saturn就告诉大家如何通过ASP代码实现将页面的具体内容导出为Word文档。女声公社  www.shesay.org原理：当用户向服务器请求某个页面时，我们希望将这个页面中的HTML内容生成为一个Word文档，而不是在浏览器显示它。此时，我们需要通过ASP代码修改此页面的文档响应类型（即Content
asp生成和导出excel和word数据源码和代码，简单好用（已经测试可以用）
weixin_34309543的博客
06-05 800
生成EXCEL表格（直接放在asp列表内，自动会生成整个页码内table数据） <% Response.ContentType="application/vnd.ms-excel"Response.AddHeader"Content-Disposition","p_w_upload;filename=红宝网络表格.xls"%> 生成WO...
将asp页面导出到WORD
翔的窝窝
05-06 3170
js代码script language="javascript"> function OpenWord()...{ Layer1.style.border=0 ExcelSheet = new ActiveXObject(word.Application); ExcelSheet.Application.Visible = true; var mydoc=ExcelSheet.Docu
ASP生成Word文档的又一方法
jason2008的专栏
11-29 2361
在网上，利用Asp生成Word文档的方法实在不少，最常见到的方法就是利用Word生成.dot的文档，再用Asp向.dot文档中传递宏，这种方法虽好，但实现起来非常复杂，而且不能循环生成表格。在实际应用中，我总结出来一种新的生成Word文件的方法，生成的Word文件有页眉、页角，现拿出一例与大家探讨。 实现：我的解决办法，用Word XP(其他版本还没有试过)制作表格，将做好的Wor
asp调用Word打印的代码
深之JohnChen的专栏
02-24 1689
 asp调用Word打印的代码调用Word打印.运行下列的脚本需要将IE的安全级别设为低，或在中级安全级别下将那个ActiveX控件设为启用，别忘记了。 Build Document by Script 产品名称 产品描述 产品单价 产品等级 产品一 This is a test 300.50 一级 产品二 This is a test 300.50 一级 产品三 Thi
巧用ASP实现Web数据统计、报表和打印
yu77的专栏
03-07 3249
 巧用ASP实现Web数据统计、报表和打印 摘  要：本文阐述一种利用ASP实现Web数据统计、报表的基本思路和实现方法，同时提供一种巧妙调用Word打印报表的解决方案。关键词： ASP，数据统计，报表，打印，Word 1、 引言随着Internet的飞速发展，基于Web开发的业务应用系统越来越多，如办公自动化、电子商务和管理信息系统（MIS）等。这些Web业务应用系统
ASP导出到Word
知識在于積累！----(福洪的足迹)
09-20 961
＜script language="vbscript"＞ Sub buildDoc set table = document.all.data row = table.rows.length column = table.rows(1).cells.length Set objWordDoc = CreateObject("Word.document") objWordDoc.Applicatio
ASP.NET实现将网页内容输出到WORD并下载到本地
SunMoonJP的博客
03-20 6998
个人觉得要实现这个功能如果没有类库提供的几个关键函数，还是比较繁琐的。所以首先介绍几个将要在代码中使用的关键函数和参数，然后再说函数实现、注意问题等。关键函数：1.函数原型：Response.AppendHeader(name,value);　　 本例中使用： Response.AppendHeader(“Content-Disposition”, “attachment;filename=fil
ASP输出生成Word 、Excel、Txt文件的方法
weixin_30412577的博客
03-17 357
在ASP中生成Word文件、Excel文件和Txt文件，参考了微软的官方文档，自己简单弄了下，基本可以实现了，不足之处，望指导！下面言归正传。 1、用ASP生成Word文档，代码示例： 01 <% 02 Response.ContentType = "application/msword" 03 Response.AddHeader "Content-Di...
.NET 通过Word模板，使用AsposeWord进行数据动态导出Word
weixin_44146294的博客
05-11 7747
文章目录先看一下导出的整体效果（如下图），其中标注的区域都是通过后台动态生成的：一、先在Word中建立好表格模板1.1、参数创建方法（Word和WPS）1.1.1、Office中Word域的创建1.1.1.1、选中指定的单元格 -> 点击头部工具栏中的”插入“ -> 选择 ”文档部件“ -> 选择 ”域“；1.1.1.2、在左侧的 “选择域” 中找到 “Mergefield” -> 在域名中填写变量名（==注：填写的域名需要和后台中定义的字段名数组中的字段一样，这样才会填充对应的数.
ASP按定制格式导出word文件的完美解决思路
11-07 308
注意：该函数是我在做一个学生成绩管理系统时作得，当用户点击了“导出到word文件”后的执行过程，由于数据库设置的原因，因此需要单独取出用户所在的系，班级，学号 另外这个实现的思路实际是fso生成文件的过程，然后把定制好的word文件保存为html文件，再编辑此html文件，在适当的位置加入动态数据，最后按照规则循环出成绩列表即可 生成的文件名可以任意定义，但是生成文件后必须要用wor...
使用asp动态生成页面，并将页面保存为word
有梦就可以飞翔
05-11 4200
      在做一个论文管理系统的时候碰到要动态生成word表格的问题，多次试用均告失败，几乎放弃，后来一个国外的网站上看到一个相当简单的方法，于是试了下！竟然可以！好东西大家分享！呵呵现将代码公布如下，以备需要者不时之需！     Response.ContentType = "application/msword"    Response.AddHeader "Content-Disp
asp.net 导出Excel/Word
simsure的专栏
05-02 547
asp.net中导出有很多方法。其中比较推荐的兼容导出是导出为word/excel兼容的mhtml格式并设置流格式为word或excel。这中方法的好处是可以建立一个通用的库。本文中提出了一个通用的导出类，实践中使用效果较好。（ps，html解析类写的比较仓促，各位如有兴趣可重写一下~） //////@Author Simsure///@Version 1.0///us
aspose-words导出word方法
qq_42051115的博客
09-20 1679
以前做的导出
随心所欲的Web页面打印技术
weixin_30933531的博客
11-23 172
随心所欲的Web页面打印技术 一.概述 对基于B/S架构的应用程序而言，客户端的页面打印一直是比较头疼的问题，简单的做法是：1.使用IE的打印功能；2.使用水晶报表。但以上两种办法，都有很大的局限性，很难实现特殊要求的排版和精确的定位，所以不能满足一些特殊客户的BT要求。为此，本人总结了自己在使用Web打印上的一点经验，和大家分享。 本文涉及以下技术：javascript、ActiveX、A...
用aspose.excel 组件完成导出、打印等复杂工作
|码农传奇|的专栏
04-20 4467
前言：aspose.excel组件是一款做复杂excel的强大工具，比其他的excel组件有更多优势，最近做导出、打印被折磨的死去活来，在网上查很多资料，但是都不是太详细。下面给大家介绍怎样用这个神奇的组件。 第一步：下载一个aspose.excel组件 网上这个资料还算多 第二步：添加引用    在解决方案中-->添加引用->浏览  找到该组件 第三步：写一个excel帮助类(这样在以后的
JSP页面打印功能实现与页眉页脚自定义技术详解
最新发布
weixin_30789053的博客
09-28 874
在企业级应用中，打印不仅是简单的信息复制，更是对外交付的重要环节。因此，必须制定清晰的样式定义策略，确保打印输出具备良好的可读性、结构完整性和品牌一致性。是当前最可行的跨页固定方案；必须为主内容区预留垂直间距；页码提示依赖JavaScript模拟，无法精确到“当前页”；多浏览器兼容需测试验证，特别是IE遗留环境；可结合后端生成PDF作为终极解决方案（详见第五章）。最直接有效的方式是定义一个通用CSS类.no-print，并在所有不需要打印的元素上应用该类。
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值