怎么调用word??? help!!!


<HTML>
<script>
function test(){
var wrd=new ActiveXObject("Word.Application")
wrd.visible=truewrd.Documents.Open("c:\\exam.doc")
wrd.Selection.TypeText(document.formname.inputname.value)
wrd.Application.Activate()
wrd.ActiveDocument.SaveAs("c:\\exam111.doc")
wrd=null
}
</script>
</HTML>

解决方案 »

  1.   

    http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dno2kta/html/offaut.asp
      

  2.   

    一位老大的执行word:--------------------------------
    <HTML>
    <script>
    var wrd=new ActiveXObject("Word.Application")
    wrd.visible=true
    alert("&Auml;ú&micro;&Auml;"+wrd.Application.Caption+"°&sup2;×°&Acirc;·&frac34;&para;&Icirc;&ordf;&pound;&ordm;\n"+wrd.Application.Path+"\n°&aelig;±&frac34;&ordm;&Aring;&Ecirc;&Ccedil;&pound;&ordm;"+wrd.Application.version+"\n×&cent;&sup2;á&Ecirc;&sup1;&Oacute;&Atilde;&Otilde;&szlig;&Ecirc;&Ccedil;&pound;&ordm;"+wrd.Application.UserName)
    wrd.Documents.Open("c:\\exam.doc")
    wrd.Selection.TypeText("This is some text.")
    wrd.Application.Activate()
    //wrd.ActiveDocument.SaveAs("c:\\exam111.doc")
    wrd=null
    </script>
    </HTML><HTML>
    <script language=Jscript>
    var xlApp, xlSheet;  
    xlApp = new ActiveXObject("Excel.Application");
    xlApp.Visible = true;  
    xlApp.Workbooks.Add(); 
    xlApp.Workbooks.Open("C:\\book2.xls");
    </script>
    </HTML>