文章详情

  • 游戏榜单
  • 软件榜单
关闭导航
热搜榜
热门下载
热门标签
php爱好者> php文档>js动态添加word表格...

js动态添加word表格...

时间:2010-08-19  来源:zhuyi412546724

最近听说了一个名词word宏编程。自己也学习了一下js动态添加word表格

<mce:script type="text/javascript"><!-- function wordcontorl(){ alert("小孟佳的宝贝"); var WordApp=new ActiveXObject("Word.Application"); var wdCharacter=1 var wdOrientLandscape = 1 WordApp.Application.Visible=true; //执行完成之后是否弹出已经生成的word var myDoc=WordApp.Documents.Add();//创建新的空文档 WordApp.ActiveDocument.PageSetup.Orientation = wdOrientLandscape//页面方向设置为横向 WordApp. Selection.ParagraphFormat.Alignment=1 //1居中对齐,0为居右 WordApp. Selection.Font.Bold=true WordApp. Selection.Font.Size=20 WordApp. Selection.TypeText("孟佳烧香"); WordApp. Selection.MoveRight(wdCharacter);    //光标右移字符 WordApp.Selection.TypeParagraph()         //插入段落 WordApp. Selection.Font.Size=12 WordApp. Selection.TypeText("-----朱漪编写"); //分行插入日期 WordApp.Selection.TypeParagraph()         //插入段落 var myTable=myDoc.Tables.Add (WordApp.Selection.Range, 8,7) //8行7列的表格 //myTable.Style="网格型" var aa = "孟佳标题" var TableRange; //以下为给表格中的单元格赋值 for (i= 0;i<7;i++) { with (myTable.Cell(1,i+1).Range) { font.Size = 12; InsertAfter(aa); ColumnWidth =4 } } for (n =0;n<7;n++) { for (i =0;i<7 ;i++) { with (myTable.Cell(i+2,n+1).Range) {font.Size = 12; InsertAfter("孟佳小可爱"); } } } row_count = 0; col_count = 0 myDoc.Protect(1) } wordcontorl() // --></mce:script>

 每种功能的实现方法有很多,希望各位可以交流不同的思想和方法。可以加QQ412546724。呵呵

相关阅读 更多 +
排行榜 更多 +
辰域智控app

辰域智控app

系统工具 下载
网医联盟app

网医联盟app

运动健身 下载
汇丰汇选App

汇丰汇选App

金融理财 下载