如何将excel以网页形式打开?
<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%><!DOCTYPEhtmlPUBLIC"-//W3C//DTDXHTML1.0Transiti...
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>word</title>
</head>
<body onmousemove=\HideMenu()\ oncontextmenu="return false" ondragstart="return false" onselectstart ="return false" onselect="document.selection.empty()" oncopy="document.selection.empty()" onbeforecopy="return false" onmouseup="document.selection.empty()">
<noscript>
<iframe src="*.htm"></iframe>
</noscript>
<input type=button value="阅读" onclick='OpenFile()'>
<div align=left id=App style="border:1 solid #000000;background-color:#FFFFFF;overflow:auto;width:100%;z-index:2" contentEditable></div>
<script>
function OpenFile()
{
try
{
var WordApp=new ActiveXObject("Word.Application");
WordApp.Application.Visible=false;
var Doc=WordApp.Documents.open("E:\\华为的冬天.doc");
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();
window.clipboardData.setData( "text"," ")
WordApp.DisplayAlerts=false;
Doc.Close();
WordApp.DisplayAlerts=true;
WordApp.Quit();
}
catch(e){}
return false;
}
</script>
</body>
</html>
以上代码是实现将word文档以网页形式打开,如何才能将Excel也同样以网页形式打开呢?我感觉同是office软件应该差不多吧,可是试着写了几次都不行,Excel打开了,网页形式的打不开。应该是哪些地方有点问题,希望熟悉这方面的大哥能帮帮小弟,感激不尽。
我是为了防止浏览者复制粘贴和另存为等操作才将excel改为网页形式的,这样方便写代码保护内容。
若直接发布web格式的当然简单,但是每个都要添加些保护代码,多了很麻烦,就不现实了。
哪位兄弟知道有什么方法可以解决这个问题吗?很感谢 展开
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>word</title>
</head>
<body onmousemove=\HideMenu()\ oncontextmenu="return false" ondragstart="return false" onselectstart ="return false" onselect="document.selection.empty()" oncopy="document.selection.empty()" onbeforecopy="return false" onmouseup="document.selection.empty()">
<noscript>
<iframe src="*.htm"></iframe>
</noscript>
<input type=button value="阅读" onclick='OpenFile()'>
<div align=left id=App style="border:1 solid #000000;background-color:#FFFFFF;overflow:auto;width:100%;z-index:2" contentEditable></div>
<script>
function OpenFile()
{
try
{
var WordApp=new ActiveXObject("Word.Application");
WordApp.Application.Visible=false;
var Doc=WordApp.Documents.open("E:\\华为的冬天.doc");
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();
window.clipboardData.setData( "text"," ")
WordApp.DisplayAlerts=false;
Doc.Close();
WordApp.DisplayAlerts=true;
WordApp.Quit();
}
catch(e){}
return false;
}
</script>
</body>
</html>
以上代码是实现将word文档以网页形式打开,如何才能将Excel也同样以网页形式打开呢?我感觉同是office软件应该差不多吧,可是试着写了几次都不行,Excel打开了,网页形式的打不开。应该是哪些地方有点问题,希望熟悉这方面的大哥能帮帮小弟,感激不尽。
我是为了防止浏览者复制粘贴和另存为等操作才将excel改为网页形式的,这样方便写代码保护内容。
若直接发布web格式的当然简单,但是每个都要添加些保护代码,多了很麻烦,就不现实了。
哪位兄弟知道有什么方法可以解决这个问题吗?很感谢 展开
博思aippt
2024-07-20 广告
2024-07-20 广告
作为深圳市博思云创科技有限公司的工作人员,对于Word文档生成PPT的操作,我们有以下建议:1. 使用另存为功能:在Word中编辑完文档后,点击文件->另存为,选择PowerPoint演示文稿(*.pptx)格式,即可将文档内容转换为PPT...
点击进入详情页
本回答由博思aippt提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询