📄 word2.asp
字号:
<%@LANGUAGE="VBSCRIPT"%>
<!--#INCLUDE file="dblink.asp" -->
<%
Dim rs,fileName,fileSubject
Set rs=Server.CreateObject("ADODB.RecordSet")
dim strsql
'********************************************************************
' 读数据库相关操作
strsql="select * from word" & " where ID=" & Request.QueryString(1)
rs.open strsql,conn,1,1
if rs.RecordCount > 0 then
fileName = rs.Fields("FileName").Value
fileSubject = rs.Fields("Subject").Value
end if
rs.Close
conn.Close
' 释放数据库连接对象
'51448黄色 5292104绿色 1083135桔红色
set rs=nothing
set conn=nothing
Randomize
dim menubarColor
menubarColor = Int((3 * Rnd()) + 1)
if menubarColor = 1 then
menubarColor = 51448
else
if menubarColor = 2 then
menubarColor = 1083135
else
menubarColor = 5292104
end if
end if
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE>SOAOffice网络文档控件 在线演示</TITLE>
<META http-equiv="Content-Type" content="text/html; charset=gb2312">
<META content="SOAOffice网络文档控件，OFFICE文档在线编辑、在线保存的完美解决方案。强制痕迹保留,手写批注,全文批注,手写签名电子盖章(电子印章,电子签章,电子签名),word留痕,公文留痕,web文档控件,数字签名,支持全部OFFICE菜单,打印预览,手工批注,集成,开发,创建OA系统的必选中间件！联系电话：010-62969896"
name="description">
<META content="SOAOffice,网络文档控件,痕迹保留,强制痕迹保留,全文批注,手写批注,OFFICE文档,电子印章,手写签名,word留痕,留痕,公文留痕,在线编辑,在线保存,办公自动化,OA,电子签名,数字签名,手工批注,打印预览" name="keywords">
<SCRIPT LANGUAGE="javascript" type="text/javascript" src="images/control.js"></SCRIPT>
<LINK href="images/template.css" type="text/css" rel="Stylesheet">
<LINK href="images/css.css" type="text/css" rel="Stylesheet">
<LINK href="images/css(1).css" type="text/css" rel="stylesheet">
<META content="MSHTML 6.00.2800.1498" name="GENERATOR">
</HEAD>
<BODY bgColor="#ffffff" leftMargin="0" topMargin="0" onload="soaOpen();window.focus();"
onunload="soaClose();">
<script language="javascript">
var bDocOpen = false;
function soaOpen()
{
try {
formData.SOAOfficeCtrl.UserMenuCaption = "自定义菜单(&N)";
formData.SOAOfficeCtrl.AppendMenuItem(1, "显示痕迹(&S)", false);
formData.SOAOfficeCtrl.AppendMenuItem(2, "隐藏痕迹(&H)", false);
formData.SOAOfficeCtrl.AppendMenuItem(3, "-");
formData.SOAOfficeCtrl.AppendMenuItem(4, "显示标题(&T)");
formData.SOAOfficeCtrl.AppendMenuItem(5, "-");
formData.SOAOfficeCtrl.AppendMenuItem(6, "全文手写批注(&D)");
formData.SOAOfficeCtrl.AppendMenuItem(7, "插入印章(&I)");
formData.SOAOfficeCtrl.AppendMenuItem(8, "接受所有修订(&A)", false);
formData.SOAOfficeCtrl.WebOpen( "<%=fileName%>",2,"<%=Request.QueryString(2)%>");
return true;
}
catch (e)
{
var ErrorMsg = '未定义的意外错误。';
alert(e.description);
WEBWORD_OBJECT.innerHTML="<div align=center><b><font color=red>文档加载失败，错误信息："+e.description+"</font></b></div>";
return false;
}
}
function soaClose()
{
try {
if (bDocOpen)
formData.SOAOfficeCtrl.Close();
return true;
}
catch (e)
{
alert("关闭文档失败!\n错误信息："+e.message);
return false;
}
}
</script>
<SCRIPT language="JavaScript" event="OnDocumentOpened(str, obj)" for="SOAOfficeCtrl">
bDocOpen = true;
</SCRIPT>
<SCRIPT language="JavaScript" event="OnDocumentClosed()" for="SOAOfficeCtrl">
bDocOpen = false;
</SCRIPT>
<SCRIPT language="JavaScript" event="OnUserMenuClick(index, caption)" for="SOAOfficeCtrl">
if(index == 1) soaShowTrack(true);
if(index == 2) soaShowTrack(false);
if(index == 4) alert("该菜单的标题是："+caption);
if(index == 6) StartHandDraw();
if(index == 7) formData.SOAOfficeCtrl.InsertSealFromURL(BaseUrl + "images/seal01.esf");
if(index == 8) AcceptAllRevisions();
</SCRIPT>
<form name="formData" method="post" action="UploadDoc.asp?Type=word&ID=<%=Request.QueryString(1)%>" id="formData">
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0 height=1 bgcolor=#ffffff>
<TR >
<TD></TD></TR>
</table>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0 height=19 background="images/SOA_01.gif">
<TR >
<TD width=20> </TD>
<TD class=mhTextEmph align=left ><SPAN>KHSOFT 科翰软件
</SPAN></TD>
<TD class=mhTextEmph align=right ><SPAN>销售热线：010-62969896
</SPAN></TD>
<TD width=20> </TD></TR>
</table>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0 height=44 background="images/SOA_03.gif">
<TR >
<td width=27></td>
<TD width=269><IMG SRC="images/SOA_05.gif" WIDTH=269 HEIGHT=25></TD>
<TD > </TD>
<TD width=255><IMG SRC="images/SOA_07.gif" WIDTH=255 HEIGHT=25></TD>
<TD width=20></TD>
</TR>
</table>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0 height=23 background="images/SOA_11.gif">
<TR >
<TD class=lnk_iconic align=right><A href="http://www.kehansoft.com/index.htm">科翰网站</A> | <A ⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -