开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > .net编程 > 查看源码
word.aspx~RFd95b11.TMP
资源名称：whpower2007-8-24.rar　[点击查看]
上传用户：tiancihang
上传日期：2014-03-12
资源大小：21387k
文件大小：12k
源码类别：

.net编程

开发平台：

C#

word.aspx~RFd95b11.TMP：源码内容
  1. <%@ Page Language="VB" %>
  2. <%
  3.     Dim conn, dbpath
  4.     conn = Server.CreateObject("ADODB.Connection")
  5.     dbpath = Server.MapPath("demodata/soademo.mdb")
  6.     conn.open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & dbpath)
  7.  %>
  8.  <%
  9.      Dim BaseUrl, ServerIP, mScriptName, mHttpUrl
  10.      mScriptName = "word.aspx"
  11.      mHttpUrl = "http://" & Request.ServerVariables("HTTP_HOST") & Request.ServerVariables("SCRIPT_NAME")
  12.      BaseUrl = Left(mHttpUrl, Len(mHttpUrl) - Len(mScriptName))
  13.      ServerIP = Request.ServerVariables("HTTP_HOST")
  14. %>
  16. <%
  17.     Dim rs, fileName, fileSubject
  18.     rs = Server.CreateObject("ADODB.RecordSet")
  19.     Dim strsql
  20.     '********************************************************************
  21.     ' 读数据库相关操作
  22.     strsql = "select * from word" & " where ID=" & Request.QueryString(1)
  23.     rs.open(strsql, conn, 1, 1)
  24.     If rs.RecordCount > 0 Then
  25.         fileName = rs.Fields("FileName").Value
  26.         fileSubject = rs.Fields("Subject").Value
  27.     End If
  28.     rs.Close()
  29.     conn.Close()
  30.     ' 释放数据库连接对象
  31.     rs = Nothing
  32.     conn = Nothing
  33.     
  34.     Randomize()
  35.     Dim menubarColor
  36.     menubarColor = Int((3 * Rnd()) + 1)
  37.     If menubarColor = 1 Then
  38.         menubarColor = 51448
  39.     Else
  40.         If menubarColor = 2 Then
  41.             menubarColor = 1083135
  42.         Else
  43.             menubarColor = 5292104
  44.         End If
  45.     End If
  46. %>
  48. <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
  50. <script language =vbscript runat="server">
  51.       
  52. </script>
  54. <HTML>
  55. <HEAD runat =server>
  56. <TITLE>SOAOffice网络文档控件 在线演示</TITLE>
  57. <META http-equiv="Content-Type" content="text/html; charset=gb2312">
  58. <META content="SOAOffice网络文档控件，OFFICE文档在线编辑、在线保存的完美解决方案。强制痕迹保留,手写批注,全文批注,手写签名电子盖章(电子印章,电子签章,电子签名),word留痕,公文留痕,web文档控件,数字签名,支持全部OFFICE菜单,打印预览,手工批注,集成,开发,创建OA系统的必选中间件！联系电话：010-62969896"
  59. name="description">
  60. <META content="SOAOffice,网络文档控件,痕迹保留,强制痕迹保留,全文批注,手写批注,OFFICE文档,电子印章,手写签名,word留痕,留痕,公文留痕,在线编辑,在线保存,办公自动化,OA,电子签名,数字签名,手工批注,打印预览" name="keywords">
  61. <script language="javascript">
  62. var BaseUrl = "<%=BaseUrl%>";
  63. </script>
  64. <SCRIPT LANGUAGE="javascript"  type="text/javascript" src="images/control.js"></SCRIPT>
  65. <LINK href="images/template.css" type="text/css" rel="Stylesheet">
  66. <LINK href="images/css.css" type="text/css" rel="Stylesheet">
  67. <LINK href="images/css(1).css" type="text/css" rel="stylesheet">
  68. <META content="MSHTML 6.00.2800.1498" name="GENERATOR">
  69. </HEAD>
  70. <BODY bgColor="#ffffff" leftMargin="0" topMargin="0" onload="soaOpen();window.focus();"
  71. onunload="soaClose();">
  72. <script language="javascript">
  73. var bDocOpen = false;
  75. function soaOpen() 
  76. { 
  77. try {
  78. formData.SOAOfficeCtrl.UserMenuCaption = "自定义菜单(&N)";
  79. formData.SOAOfficeCtrl.AppendMenuItem(1, "显示痕迹(&S)", false);
  80. formData.SOAOfficeCtrl.AppendMenuItem(2, "隐藏痕迹(&H)", false);
  81. formData.SOAOfficeCtrl.AppendMenuItem(3, "-");
  82. formData.SOAOfficeCtrl.AppendMenuItem(4, "显示标题(&T)");
  83. formData.SOAOfficeCtrl.AppendMenuItem(5, "-");
  84. formData.SOAOfficeCtrl.AppendMenuItem(6, "全文手写批注(&D)");
  85. formData.SOAOfficeCtrl.AppendMenuItem(7, "插入印章(&I)");
  86. formData.SOAOfficeCtrl.AppendMenuItem(8, "接受所有修订(&A)", false);
  87. formData.SOAOfficeCtrl.AppendMenuItem(9, "-");
  88. formData.SOAOfficeCtrl.AppendMenuItem(10, "分层显示手写批注(&G)");
  89. formData.SOAOfficeCtrl.SaveDocURL = "SaveDoc.asp";
  90. formData.SOAOfficeCtrl.WebOpen( "<%=fileName%>",2,"<%=Request.QueryString(2)%>");
  91. return true; 
  92. } 
  93. catch (e) 
  94. { 
  95. var ErrorMsg = '未定义的意外错误。';
  96. alert(e.description);
  97. WEBWORD_OBJECT.innerHTML="<div align=center><b><font color=red>文档加载失败，错误信息："+e.description+"</font></b></div>"; 
  98. return false; 
  99. } 
  100. } 
  101. function soaClose() 
  102. { 
  103. try {
  104. if (bDocOpen)
  105. formData.SOAOfficeCtrl.Close();
  106. return true; 
  107. } 
  108. catch (e) 
  109. { 
  110. alert("关闭文档失败!n错误信息："+e.message); 
  111. return false; 
  112. } 
  113. }  
  114. //文档另存为Html，并发布到web服务器
  115. function SaveAsHtml()
  116. {
  117. try {
  118. alert("绿色版没有提供另存HTML的功能。");
  119. //formData.SOAOfficeCtrl.WebSaveAsHtml();
  120. } 
  121. catch (e) 
  122. {
  123. alert("保存为Html失败！n错误信息:" + e.message); 
  124. }
  125. }
  126. </script>
  127. <SCRIPT language="JavaScript" event="OnDocumentOpened(str, obj)" for="SOAOfficeCtrl">
  128. bDocOpen = true;
  129. </SCRIPT>
  130. <SCRIPT language="JavaScript" event="OnDocumentClosed()" for="SOAOfficeCtrl">
  131. bDocOpen = false;
  132. </SCRIPT>
  133. <SCRIPT language="JavaScript" event="OnUserMenuClick(index, caption)" for="SOAOfficeCtrl">
  134. if(index == 1) soaShowTrack(true);
  135. if(index == 2) soaShowTrack(false);
  136. if(index == 4) alert("该菜单的标题是："+caption);
  137. if(index == 6) soaStartHandDraw();
  138. if(index == 7) soaInsertSeal();
  139. if(index == 8) soaAcceptAllRevisions();
  140. if(index == 10) soaShowHandDrawDispBar();
  141. </SCRIPT>
  142. <form name="formData" method="post" action="UploadDoc.asp?Type=word&ID=<%=Request.QueryString(1)%>" id="formData">
  145. <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0 height=23 >
  146. <tr>
  147. <td  bgcolor="#FF6600" height="2"></td>
  148. <td  bgcolor="#FF6600" height="2"></td>
  149. <td  bgcolor="#FF6600" height="2"></td>
  150. </tr>
  151. </table>
  152. <table cellSpacing=0 cellPadding=0 width="100%" border=0 >
  153. <tr>
  154. <td height="4"></td>
  155. </tr>
  156. </table>
  157. <TABLE height="10" cellSpacing="0" cellPadding="0" width="100%" border="0" bgcolor="">
  158. <TBODY>
  159. <TR>
  160. <TD  width="10" height ="10"  align="left" >  <IMG src="images/img_blanklogo_1.gif" width="10" height="10"></TD>
  161. <TD   width="98%" background="images/img_blanklogo_2.gif" align="center"></TD>
  162. <TD   width="10"   align="right"><IMG src="images/img_blanklogo_3.gif" width="10" height="10"></TD>
  163.   </TR>
  164. </TBODY>
  165.    </TABLE>
  167. <TABLE height="21" cellSpacing="0" cellPadding="0" width="100%" border="0" bgcolor="#EEEEEE">
  168. <TBODY>
  169. <TR>
  170. <td width="6" bgcolor="#FFFFFF">&nbsp;</td>
  171. <TD  style="font-size:9pt" width=140 nowrap>&nbsp;&nbsp;文档功能菜单
  172.                             </TD>
  173. <TD><SPAN class="ltsep">|</SPAN></TD>
  174. <TD  style="font-size:9pt" width=177 nowrap>&nbsp;&nbsp;当前操作模式：<font color="#FF0000">修改无痕迹</font></TD>
  175. <TD><SPAN class="ltsep">|</SPAN></TD>
  176. <TD style="font-size:9pt" width="100%">&nbsp;&nbsp;文档主题：<input name="inputSubject" class=thinInput type="text" value="<%=fileSubject%>"><font color="#FF0000">&nbsp;&nbsp;双击控件标题栏最大化运行</font></TD>
  177. <td width="5" bgcolor="#FFFFFF">&nbsp;</td>
  178. </TR>
  179. </TBODY>
  180. </TABLE>
  182. <TABLE cellSpacing="0" cellPadding="0" width="100%" border="0">
  183. <TBODY>
  184. <TR vAlign="top">
  185. <TD style="OVERFLOW-X: hidden" width="10" height="100%" bgcolor="#FFFFFF">&nbsp; </TD>
  186. <TD style="OVERFLOW-X: hidden" width="144" height="100%">
  187. <DIV class="mnpMenuTop" id="mnpMenuTop" style="OVERFLOW-X: hidden; WIDTH: 144px">
  188. <DIV class="mnpMenuRow" >
  189. 部分功能列表 </DIV>
  190. <DIV class="menuItem" >
  191. <A disabled>显示痕迹</A></DIV>
  192. <DIV class="menuItem" >
  193. <A disabled>隐藏痕迹</A></DIV>
  194. <DIV class="menuItem" >
  195. <A disabled>接受所有修订</A></DIV>
  196. <DIV class="menuItem" >
  197. <A disabled>列举所有痕迹内容</A></DIV>
  198. <DIV class=mnpMenuBorder style="WIDTH: 141px"></DIV>
  199. <DIV class="menuItem" >
  200. <A href="javascript:soaStartHandDraw();">全文手写批注[<font color="#993300">绘图</font>]</A></DIV>
  201. <DIV class="menuItem" >
  202. <A href="javascript:soaInsertSeal();">插入印章</A></DIV>
  203. <DIV class="menuItem" >
  204. <A href="javascript:soaInsertLocalSeal();">插入本地印章</A></DIV>
  205. <DIV class="menuItem" >
  206. <A href="javascript:soaInsertSignature();">插入手写签名</A></DIV>
  207. <DIV class="menuItem" >
  208. <A href="javascript:soaValidateSeal();">验证印章/签名</A></DIV>
  209. <DIV class="menuItem" >
  210. <A href="javascript:soaCanCopy(false);">禁止复制/拷贝</A></DIV>
  211. <DIV class="menuItem" >
  212. <A href="javascript:soaCanCopy(true);">允许复制/拷贝</A></DIV>
  213. <DIV class=mnpMenuBorder style="WIDTH: 141px"></DIV>
  214. <DIV class="menuItem" >
  215. <A href="javascript:InsertWebImage();">插入Web图片</A></DIV>
  216. <DIV class="menuItem" >
  217. <A href="javascript:OpenImageDialog();">插入本地图片</A></DIV>
  218. <DIV class="menuItem" >
  219. <A href="javascript:soaSave();">直接保存文档</A></DIV>
  220. <DIV class="menuItem" >
  221. <A href="javascript:soaSubmitSave();">提交页面保存文档</A></DIV>
  222. <DIV class="menuItem" >
  223. <A href="javascript:SaveAsHtml();">另存Html到服务器</A></DIV>
  224. <DIV class=mnpMenuBorder style="WIDTH: 141px"></DIV>
  225. <DIV class="menuItem" >
  226. <A href="javascript:InsertVBATemplate();">VBA套红</A></DIV>
  227. <DIV class="menuItem" >
  228. <A href="javascript:ApplyFileTemplate();">模板套红</A></DIV>
  229. <DIV class="menuItem" >
  230. <A disabled>切换标题栏</A></DIV>
  231. <DIV class="menuItem" >
  232. <A href="javascript:ToggleMenubar();">切换菜单栏</A></DIV>
  233. <DIV class="menuItem" >
  234. <A href="javascript:ToggleToolbars();">切换工具栏</A></DIV>
  235. <DIV class="menuItem" >
  236. <A href="javascript:DocPageSetup();">页面设置</A></DIV>
  237. <DIV class="menuItem" >
  238. <A href="javascript:EnablePrint(false);">禁止打印</A></DIV>
  239. <DIV class="menuItem" >
  240. <A href="javascript:EnablePrint(true);">允许打印</A></DIV>
  241. <DIV class="menuItem" >
  242. <A href="javascript:EnableSave(false);">禁止保存</A></DIV>
  243. <DIV class="menuItem" >
  244. <A href="javascript:EnableSave(true);">允许保存</A></DIV>
  245. <DIV class="menuItem" >
  246. <A href="javascript:EnableSaveAs(false);">禁止另存</A></DIV>
  247. <DIV class="menuItem" >
  248. <A href="javascript:EnableSaveAs(true);">允许另存</A></DIV>
  249. <DIV class="menuItem" >
  250. <A href="javascript:WordToText();">获取文档Txt正文</A></DIV>
  251. <DIV class="menuItem" >
  252. <A href="javascript:DisableDragAndDrop();">禁止/允许WORD拖曳</A></DIV>
  253. <DIV class="mnpMenuBorder" style="MARGIN-BOTTOM: 0px; WIDTH: 143px"></DIV>
  254. </DIV>
  255. </TD>
  256. <TD width="100%">
  257. <TABLE cellSpacing="0" cellPadding="0" width="100%" border="0">
  258. <TBODY>
  259. <TR vAlign="top" align="left">
  260. <td height="655"><SPAN id="WEBWORD_OBJECT">
  261. <OBJECT id="SOAOfficeCtrl" codeBase="<%=BaseUrl%>SOAOffice.ocx#version=3,1,1,0" height="100%"
  262. width="100%" classid="clsid:BBD0982A-63C3-4105-B7AF-5FF3E2649082" data="">
  263. <param name="Server" value="<%=ServerIP%>">
  264. <param name="ServerPort" value="4357">
  265. <param name="BorderStyle" value="0">
  266. <param name="TitleBarColor" value="16777215">
  267. <param name="TitlebarTextColor" value="0">
  268. <param name="MenubarColor" value="<%=menubarColor%>">
  269. <param name="MenubarStyle" value="<%=Int((6 * Rnd()) + 1)%>">
  270. <SPAN STYLE="color:red">未能载入SOAOfficeCtrl文档控件。请在安装控件的提示对话框里确认安装，才能使用本控件的功能。</SPAN>
  271. </OBJECT>
  272. </SPAN></td>
  273. </TR>
  274. </TBODY>
  275. </TABLE>
  276. </TD>
  277. <TD style="OVERFLOW-X: hidden" width="10" height="100%" bgcolor="#FFFFFF">&nbsp;</TD>
  278. </TR>
  279. </TBODY>
  280. </TABLE>
  281. <TABLE height="12" cellSpacing="0" cellPadding="0" width="100%" border="0" bgcolor="">
  282. <TBODY>
  283. <TR>
  284. <TD  width="12" height ="12"  background="images/img_blanklogo_14.gif" align="left" ></TD>
  285. <TD   width="98%" background="images/img_blanklogo_15.gif" align="center"></TD>
  286. <TD   width="12"  background="images/img_blanklogo_16.gif" align="right"></TD>
  287.   </TR>
  288. </TBODY>
  289. </TABLE>
  290. <hr  width="90%" size=1 color=black>
  291. </form>
  292. </BODY>
  293. </HTML>