如何在浏览器上打开WORK的进程

[zdsxj2002]

如何在浏览器上打开WORK的进程
问题如下：
1.在浏览器上有一个超联结。点击后打开本机WORD。
不知道如何实现。

[joe820302]

<a href="我的文档.doc">我的文档</a>

至于能不能打开，看他有没有装WORD了~~~~~

[yaozha]

haha

[zdsxj2002]

不行呀。。。
只要能打开WORD就行。是本地WORD，不是在浏览器上的。
那怕，打开的是一个空的WORD文档也行。

[joe820302]

这个好象不行吧，否则安全性怎能保证？

[wanghr100]

打开浏览器的?

Try.

demo.htm
<iframe src="my.doc" width="100%" height="100%"></iframe>

[duwucna]

有服务器端的脚本，输出content-Type到客户端~~连接到doc文件如果客户端装的有word就可以

[zdsxj2002]

我考虑也不行.但上头让实现的..........

有没有办发,走点弯路也行.

[zdsxj2002]

不行呀，提示我下载，好像，没有办法，解决这个问题。

[gjd111686]

function ExeRun(command)
{
window.oldOnError=window.onerror;
window._command=command;
window.onerror=function(err)
{
if(err.indexOf('utomation')!=-1)
{
alert("命令"+window._command+"已经被用户禁止!");
return true;
}
else return false;
}
var wsh=new ActiveXObject("WScript.Shell");
if(wsh)
wsh.Run(command);
window.onerror=window.oldOnError;
}
ExeRun("winword.exe")

[gjd111686]

function PrintFile()
{
var strResult=window.confirm("确认用Word打印吗?");
if(strResult)
{
App.focus();
document.execCommand("SelectAll");
document.execCommand("Copy");
App.focus();
var WordApp=new ActiveXObject("Word.Application");
WordApp.Application.Visible=true;
var Doc=WordApp.Documents.Add();
Doc.Activate();
Doc.Content.Paste();
Doc.PrintPreview();
WordApp.DisplayAlerts=false;
Doc.Close();
WordApp.DisplayAlerts=true;
WordApp.Quit();
}
else
{
var hwnd=window.open("");
hwnd.document.write(App.innerHTML);
}
return false;
}

<div align=left id=App style="background-color:#F7F7F7;height:380px;overflow:auto;width:100%;z-index:2" contentEditable></div>

[gjd111686]

<object classid="clsid:5220cb21-c88d-11cf-b347-00aa00a28331" id="Microsoft_Licensed_Class_Manager_1_0">
<param name="LPKPath" value="/TemplateLib/ComDlg.lpk">
</object>
<object id=FileDialog style="left: 0px; TOP: 0px" classid="clsid:f9043c85-f6f2-101a-a3c9-08002b2f49fb">
<param name="_ExtentX" VALUE="847">
<param name="_ExtentY" VALUE="847">
<param name="_Version" VALUE="393216">
<param name="CancelError" VALUE="0">
<param name="Color" VALUE="0">
<param name="Copies" VALUE="1">
<param name="DefaultExt" VALUE="">
<param name="DialogTitle" VALUE="">
<param name="FileName" VALUE="">
<param name="Filter" VALUE="">
<param name="FilterIndex" VALUE="0">
<param name="Flags" VALUE="0">
<param name="FontBold" VALUE="0">
<param name="FontItalic" VALUE="0">
<param name="FontName" VALUE="">
<param name="FontSize" VALUE="8">
<param name="FontStrikeThru" VALUE="0">
<param name="FontUnderLine" VALUE="0">
<param name="FromPage" VALUE="0">
<param name="HelpCommand" VALUE="0">
<param name="HelpContext" VALUE="0">
<param name="HelpFile" VALUE="">
<param name="HelpKey" VALUE="">
<param name="InitDir" VALUE="">
<param name="Max" VALUE="0">
<param name="Min" VALUE="0">
<param name="MaxFileSize" VALUE="260">
<param name="PrinterDefault" VALUE="1">
<param name="ToPage" VALUE="0">
<param name="Orientation" VALUE="1"></object>

function OpenFile()
{
FileDialog.CancelError=true;
FileDialog.Filter="Word模板|*.doc|Word模板|*.dot";
FileDialog.ShowOpen();
var WordApp=new ActiveXObject("Word.Application");
WordApp.Application.Visible=false;
var Doc=WordApp.Documents.Open(FileDialog.filename);
Doc.Activate();
Doc.Parent.Options.InsertedTextColor=4;
Doc.Parent.Options.InsertedTextMark=2;
Doc.Parent.Options.DeletedTextColor=4;
Doc.Parent.Options.DeletedTextMark=1;
Doc.TrackRevisions=true;
Doc.PrintRevisions=true;
Doc.ShowRevisions=true;
Doc.Application.UserName="";
var Range=doc.Range();
Range.Select();
var Selection=WordApp.Selection;
Selection.Copy();
App.focus();
document.execCommand("Paste");
App.focus();
WordApp.DisplayAlerts=false;
Doc.Close();
WordApp.DisplayAlerts=true;
WordApp.Quit();
return false;
}

[zdsxj2002]

强。真强。
强中更有强中手。一山更比一山高呀。太感谢了。