Posted on 2007-08-27 11:31
冰江獨行 閱讀(241)
評論(0) 編輯 收藏
//指定頁面區域內容導入Word
function AllAreaWord()
{
var oWD = new ActiveXObject("Word.Application");
var oDC = oWD.Documents.Add("",0,1);
var oRange =oDC.Range(0,1);
var sel = document.body.createTextRange();
sel.moveToElementText(PrintA);
sel.select();
sel.execCommand("Copy");
oRange.Paste();
oWD.Application.Visible = true;
//window.close();
}
其中PrintA為table表單的id