用JAVASCRIPT在客户端启动WORD,并排版WORD的格式,形成一个报表

原创 2004年09月07日 10:22:00
   var title = document.forms[0].title.value    //取报表标题
     if (title.length<1 )
     {
       alert("报表数据不存在,请进行统计")
       return;
     }
    
     var ksrq = document.forms[0].bbksrq.value
     var jsrq = document.forms[0].bbjsrq.value
     var row_count = document.forms[0].row_count.value
     var col_count = document.forms[0].col_count.value
     var zd = document.forms[0].zd.value
     var context = document.forms[0].context.value
     var temp
    
     var i=0,n =0
     var vzd = new Array();
     var vcontext = new Array();
     var vcontext1 = new Array();
     vzd = zd.split("//");
   
 var WordApp=new ActiveXObject("Word.Application");    //得到WORD对象
   
 var wdCharacter=1
 var wdOrientLandscape = 1
 WordApp.Application.Visible=true;
 var myDoc=WordApp.Documents.Add();
 
     WordApp.ActiveDocument.PageSetup.Orientation = wdOrientLandscape
 
 
     WordApp. Selection.ParagraphFormat.Alignment=0  //居中对齐
 WordApp. Selection.Font.Bold=true
     WordApp. Selection.Font.Size=20
    
     WordApp. Selection.TypeText(title+"("+ksrq+"至"+jsrq+")");
     WordApp. Selection.MoveRight(wdCharacter);    //光标右移字符
     WordApp.Selection.TypeParagraph()         //插入段落
     WordApp.Selection.TypeParagraph()         //插入段落
    
    
    
    var myTable=myDoc.Tables.Add (WordApp.Selection.Range, row_count,col_count)  //五行4列的表格
     
     
     
     var TableRange;  //以下为给表格中的单元格赋值
     for (i= 0;i<vzd.length;i++)
     {
     with (myTable.Cell(1,i+1).Range)
     {font.Size = 12;
 InsertAfter(vzd[i]);
 }
 }
 
 for (i =0;i<row_count-1;i++)
 {
 vcontext = context.split("<纵标>")
 for (n =0;n<col_count ;n++)
 {
 temp = vcontext[i]
     vcontext1 = temp.split("<标记>")
    
     with (myTable.Cell(i+2,n+1).Range)
     {font.Size = 12;  
 InsertAfter(vcontext1[n]);
 }
}
}
     row_count = 0;
     col_count = 0
 myDoc.Protect(1)

数学建模Word排版——样式

样式与大多数论文写作类似,使用样式能够极大提高排版速度。 提前准备好自己的样式文件,可以快速进行写作。一般是边写边排版,初期只应用所需样式即可,最后再对图表的位置、次序等进行进一步调整。创建所需样式...
  • csdn_moming
  • csdn_moming
  • 2016-01-25 11:44:03
  • 1259

基于Word模板的快速报表生成

在自动测试项目中,报表生成必不可少,当测试项种类繁多,又需要在Word中添加表格,填写数据时,便十分复杂。因此将一直使用的快速报表生成方法告诉大家,以方便更多人的编程。 大致步骤为: 1、新建一个...
  • daleiceman
  • daleiceman
  • 2016-11-03 17:06:02
  • 402

如何在Word中排版出漂亮的编程语言代码样式?(较好用的部分方法汇总)

[1] 能输出各种编程语言并保持代码格式和语法高亮显示的网站:PlanetB | Syntax Highlight Code in Word Documents  http://www.planetb...
  • NeXT_Voyager
  • NeXT_Voyager
  • 2018-03-19 17:36:22
  • 160

Word文档格式混乱出错等排版问题的解决方法

编辑文档的时候,很多同学都苦恼于格式混乱、出错。文字过胖或过瘦等问题。这里,小编就教各位几招,学会后就基本可以对付文档啦。(PS:小编使用的是WORD2013,不过各个版本之间的布局一致,不用担心不适...
  • baidu_36847344
  • baidu_36847344
  • 2016-12-12 16:26:56
  • 5449

数学建模Word排版——细节决定成败

样式问题 当一个样式难以调整的时候,学会用清除样式,这个功能在排版过程中非常重要!字间距问题:第一行的字间距会变大(公式引发的这个问题通过2013/365/2016版行内公式可以解决) 中文版式里面其...
  • csdn_moming
  • csdn_moming
  • 2016-01-25 22:17:50
  • 1240

美赛论文\MCM两个word模板+论文格式+word排版注意事项整理资料

  • 2012年01月10日 06:31
  • 198KB
  • 下载

word 论文排版 —— 按指定格式章节的自动编号

在word中如何实现章节标题自动编号标题样式与标题的编号是两个步骤,为标题建立编号是在为标题样式确定的基础后进行的。这是显而易见的,也即只有先定义了多级标题(也可使用 word 自带的标题样式),才可...
  • lanchunhui
  • lanchunhui
  • 2017-03-06 19:14:53
  • 541

如何在web_oa客户端生成word文件

在web-oa系统中,公文管理好象不可或缺,有时需要从数据库中查询一些数据以某种格式输出来,并以word文档的形式展现,有时许多word文档保存到数据库中的某个表的Blob字段里,服务器再把保存在Bl...
  • Tunix126
  • Tunix126
  • 2006-10-19 12:39:00
  • 845

word中图片排版问题

 word中经常有“图”,这就涉及到一些排版问题。这里讲一下。word中,图有两种:“图形”和“图片”。所谓的图形,指用word,ppt,visio提供的一些基本图形组成的图。这些图的特点是,在wor...
  • zccwqw
  • zccwqw
  • 2011-03-20 17:45:00
  • 6782

使用VB对word文档进行格式调整

在word文档中,有时候会出现大量表格,在需要调整格式时,只能一个一个手动刷格式,这样不仅费时而且很费力。本人在写文档时,碰到这种情况,熬夜干活儿,太累。所以下定决心,抽点时间研究WORD中的宏编程。...
  • polisman
  • polisman
  • 2015-12-22 16:53:05
  • 1861
收藏助手
不良信息举报
您举报文章:用JAVASCRIPT在客户端启动WORD,并排版WORD的格式,形成一个报表
举报原因:
原因补充:

(最多只允许输入30个字)