2011年02月16日 星期三

复制网页内容到WORD

				$('#eTableWord').click(
						function() {
							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(dataTable);
							sel.select();
							sel.execCommand("Copy");
							oRange.Paste();
							oWD.Application.Visible = true;
						});