Posted in Javascript onOctober 26, 2009
/* ??给几个js写word的参考: ??this.Word.Selection.Font.Size = 16; //字体大小 ??this.Word.Selection.Font.Bold = true; //是否加粗 ??this.Word.Selection.ParagraphFormat.Alignment = 2; //0左对齐,1居中,2右对齐,数字只能0-9,慢慢试吧 ??this.Word.Selection.InsertRowsBelow(1); //下面加入一行 ??this.Word.Selection.MoveRight(1); //光标右移 ??this.Word.Selection.TypeText(string); //只能写string ??this.Word.Selection.MoveDown(); //光标下移 ??this.Word.Selection.EndKey(); //光标移动到末尾 ??this.Word.ActiveDocument.Sections(1).Headers(1).Range.InsertAfter(string); //写页眉,结尾处写 ??this._LoadData = function () { ??//替换函数,用于替换$strFld$类型的文本 ?? function replace( Range, strFld ) { ??//[FindText], [MatchCase], [MatchWholeWord], [MatchWildcards], [MatchSoundsLike], [MatchAllWordForms], [Forward], [Wrap], [Format], [ReplaceWith], [Replace], [MatchKashida], [MatchDiacritics], [MatchAlefHamza], [MatchControl] ?? Range.Find.Execute( "$"+strFld+"$", true, false, false, false, false, true, wdFindContinue, false, getElValue("l"+strFld) ) ?? } ??//初始化Word控件 ?? this._InitWord = function () ?? { ?? try{ ?? this.Word = new ActiveXObject("Word.Application"); ?? this.Word.visible = true; ?? this.Doc = this.Word.Documents.Open( this.TemplatePath ); ?? this.Doc.Activate(); ?? this.Range = this.Doc.Range(); ?? return true ?? } catch(e) { ?? //TODO: 如果用户手动取消ActiveX的运行,则会留一WINWORD.EXE的进程。 ?? //除非"设为可信站点,并在自定义级别里将第二项启用",则不会出现启用ActiveX的对话框。 ?? try { ?? if ( this.Doc ) { this.Doc.Close(0) }; ?? if ( this.Word ) { this.Word.Quit() } ?? } ?? catch (e){} ?? return false ?? } ?? } ??*/
几个javascript操作word的参考代码
声明:登载此文出于传递更多信息之目的,并不意味着赞同其观点或证实其描述。
Reply on: @reply_date@
@reply_contents@