我现在需要做一个在网页中通过javascript调用word打印的功能,其实就是从数据库中读出人员信息列表循环插入到word表格中再打印,在word模板文档里就用一个Table通过javascript程序调用这个模板动态增加表格行从而循环插入数据:
......
MyDoc.Tables(1).Rows.Add();
MyDoc.Tables(1).Rows(i).Cells(j).Text="";
......
人员记录数不一定,经常会出现一页放不下的情况,由于程序处理特定的需要,我想将表格在每页最后一行的外边框去掉(目的就是想把最后一行作成隐藏的效果,其实它还占据着原来的位置,由于整个为一个表格不能删除单行,否则下一页的行就会向上一页串),我知道用javascript程序可以将最后一行的左边线、右边线和下边线隐藏,可是由于下一页第一行的上边线的存在导致上一页最后一行始终存在一条下边线(实际就是下一页第一行的上边线)但是还不能把下一页第一行的上边线隐藏...
在手动操作word文档时通过橡皮擦将“最后一行的下边线“擦掉可以实现我想要的效果,可是通过javascript程序该怎么实现呢?不知道我说的明不明白,请达人们指点~
......
MyDoc.Tables(1).Rows.Add();
MyDoc.Tables(1).Rows(i).Cells(j).Text="";
......
人员记录数不一定,经常会出现一页放不下的情况,由于程序处理特定的需要,我想将表格在每页最后一行的外边框去掉(目的就是想把最后一行作成隐藏的效果,其实它还占据着原来的位置,由于整个为一个表格不能删除单行,否则下一页的行就会向上一页串),我知道用javascript程序可以将最后一行的左边线、右边线和下边线隐藏,可是由于下一页第一行的上边线的存在导致上一页最后一行始终存在一条下边线(实际就是下一页第一行的上边线)但是还不能把下一页第一行的上边线隐藏...
在手动操作word文档时通过橡皮擦将“最后一行的下边线“擦掉可以实现我想要的效果,可是通过javascript程序该怎么实现呢?不知道我说的明不明白,请达人们指点~
解决方案 »
- 求解这段函数selfOpt||{}是什么意思?
- prototype里的函数不能直接用吗
- cufon.min.js或者cufon.js,英文字体渲染中的中文字体问题。
- 向高手求一个导航型的css代码。如图。
- 问一个$.param()的问题
- 在js中写<body>的事件的时候,总是提示:尚未实现
- 关于JS失去焦点再获取焦点的问题
- 百分求解:extjs支持将一个新的结构不同的表(或者一段html代码)插入原来的表中的某行的位置么?
- 如何用js往文本框里输出大于号
- 如何在校验控件数据后,使该控件得到焦点。
- prototype 初学,undefined
- ExtJs Grid导出到Excel,只导出一页的问题
1、先按照常规方法导出到WORD;
2、打开WORD文件,手动操作word文档,通过橡皮擦将“最后一行的下边线“擦掉;
3、将该文件保存为web格式,然后查看源码,看看你用橡皮擦掉的最后一行的代码是什么样的;
4、考虑用JS实现那个效果乱出个主意,LZ不要见怪
生成的VBA代码大概为:
ActiveDocument.Shapes.AddTextbox(msoTextOrientationHorizontal, 81#, _
750.6, 432#, 15.6).Select
Selection.ShapeRange.TextFrame.TextRange.Select
Selection.Collapse
Selection.ShapeRange.Select
Selection.ShapeRange.Fill.ForeColor.RGB = RGB(255, 255, 255)
我在javascript中再试了一下:
var word = new ActiveXObject("Word.Application");
var doc = word .documents.open("c:\\Doc1.doc");
doc.Shapes.AddTextbox(1, 81, 650.6, 432, 15.6).Select();
上面的这行我试了没问题,能在特定的位置上插入一个空白文本
可是再往下将此文本框的边线设为白色,我试了下总是出错(好象提示说ShapeRange为空或不是对象),这部分代码我就不会转了,还请大家指点该如何转成javascript