在客户端用javascript或VBSCRIPT生成WORD文档(转)

注意：客户端要装OFFICE

下面我就把代码给大家参考一下，希望大家以后能用到。

对WORD文档，使用的文字型窗体区域的功能，所有区域定义好以后有个名字，也就是要替换的名字。（替换内容长度可以不限！）
VBSCRIPT代码：
<SCRIPT LANGUAGE="vbscript">
function word_onclick()
  Set myDocApp = CreateObject("Word.Application")
  myDocApp.Visible = True
  myDocApp.Activate
  set myDoc = myDocApp.Documents.Open("http://localhost/test/test.doc")  
  str = word_proc.textarea.value
  myDoc.FormFields("test").Range = str
  
end function
</SCRIPT>

javascript代码：
<SCRIPT LANGUAGE="javascript">
function word_onclick()
{
  var myDocApp =new ActiveXObject("word.Application");
  myDocApp.visible = true;
  myDocApp.activate();
  var myDoc = myDocApp.documents.open("http://localhost/test/test.doc");  
  var str = word_proc.textarea.value;
  myDoc.formFields("test").range = str;
  
}
</SCRIPT>