网页上的html表格转换为word时,标题怎样居中?<script language="javascript" type="text/javascript">
function outDoc(){
var wdapp=new ActiveXObject("Word.Application");
wdapp.visible=true;
wddoc=wdapp.Documents.Add(); //添加新的文档var range = wddoc.Range(0,0);
range.Text="文档标题"+"\n"; //就是这几个字怎样居中或设置字体等?wdapp.Application.Activedocument.Paragraphs.Add(range);
wdapp.Application.Activedocument.Paragraphs.Add();
rngcurrent=wdapp.Application.Activedocument.Paragraphs(3).Range;wdapp=null;
}
function Button1_onclick() {
outDoc();
}
</script><body>
<form id="form1" runat="server"> <input id="Button1" type="button" value="button" onclick="return Button1_onclick()" />
</form>
</body>
</html>就是标题怎么处理,大家可谈谈自己的经验和处理思路?
function outDoc(){
var wdapp=new ActiveXObject("Word.Application");
wdapp.visible=true;
wddoc=wdapp.Documents.Add(); //添加新的文档var range = wddoc.Range(0,0);
range.Text="文档标题"+"\n"; //就是这几个字怎样居中或设置字体等?wdapp.Application.Activedocument.Paragraphs.Add(range);
wdapp.Application.Activedocument.Paragraphs.Add();
rngcurrent=wdapp.Application.Activedocument.Paragraphs(3).Range;wdapp=null;
}
function Button1_onclick() {
outDoc();
}
</script><body>
<form id="form1" runat="server"> <input id="Button1" type="button" value="button" onclick="return Button1_onclick()" />
</form>
</body>
</html>就是标题怎么处理,大家可谈谈自己的经验和处理思路?
<script>
function wordcontorl(){
alert("1111")
var WordApp=new ActiveXObject("Word.Application");var wdCharacter=1
var wdOrientLandscape = 1
WordApp.Application.Visible=true;
var myDoc=WordApp.Documents.Add();WordApp.ActiveDocument.PageSetup.Orientation = wdOrientLandscapeWordApp. Selection.ParagraphFormat.Alignment=1 //1居中对齐,0为居右
WordApp. Selection.Font.Bold=true
WordApp. Selection.Font.Size=20WordApp. 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 (i =0;i<7;i++)
{
for (n =0;n<7 ;n++)
{with (myTable.Cell(i+2,n+1).Range)
{font.Size = 12;
InsertAfter("bbbb");
}
}
}
row_count = 0;
col_count = 0
myDoc.Protect(1)
}
wordcontorl()
</script>
http://hi.baidu.com/gzwfdy/blog/item/5e479019f686667edab4bdde.html
<script>
function wordcontorl(){
alert("1111")
var WordApp=new ActiveXObject("Word.Application");var wdCharacter=1
var wdOrientLandscape = 1
WordApp.Application.Visible=true;
var myDoc=WordApp.Documents.Add();WordApp.ActiveDocument.PageSetup.Orientation = wdOrientLandscapeWordApp. Selection.ParagraphFormat.Alignment=1 //1居中对齐,0为居右
WordApp. Selection.Font.Bold=true
WordApp. Selection.Font.Size=20WordApp. 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 (i =0;i<7;i++)
{
for (n =0;n<7 ;n++)
{with (myTable.Cell(i+2,n+1).Range)
{font.Size = 12;
InsertAfter("bbbb");
}
}
}
row_count = 0;
col_count = 0
myDoc.Protect(1)
}
wordcontorl()
</script>
http://hi.baidu.com/gzwfdy/blog/item/5e479019f686667edab4bdde.html