?? createdoc.asp
字號:
<%@ Language=VBScript %>
<!--#include file="conn.asp"-->
<HTML>
<HEAD>
<meta http-equiv="content-type" content="text/html;charset=gb2312">
<SCRIPT LANGUAGE="JavaScript" src="ntkoocx.js"></SCRIPT>
<SCRIPT LANGUAGE="JavaScript" src="word.js"></SCRIPT>
<TITLE>NTKO Office文檔控件ASP示例-編輯文檔</TITLE>
</HEAD>
<%
dim docid,htmlid
dim fileRS,htmlRS,SQL
filename = month(now()) & year(now()) & day(now()) & Minute(now()) & _
Second(now()) & ".doc" '缺省文件名
htmlfile = Mid(filename,1,instrrev(filename,".")) & "html" '缺省html文件名
title = "未命名"
%>
<BODY onLoad='javascript:TANGER_OCX_OpenDoc(false,"<% = "" %>")'>
<center>
<h3>NTKO Office文檔控件ASP示例</h3>
<TABLE BORDER=0 width = 700>
<tr>
<td align="center">
<INPUT type=BUTTON VALUE="保存文檔到數據庫" onclick="TANGER_OCX_SaveEditToServer();">
</td>
<td align="center">
<INPUT type=BUTTON VALUE="保存為HTML" onclick="TANGER_OCX_SaveAsHTML();">
</td>
<td align="center">
<INPUT type=BUTTON VALUE="刷新" onclick="window.location.reload();">
</td>
<td align="center">
<INPUT type=BUTTON VALUE="關閉窗口" onclick="javascript:window.close();">
</td>
</tr>
</TABLE>
<FORM id="myForm" METHOD="POST" ENCTYPE="multipart/form-data" ACTION="uploadedit.asp">
<TABLE BORDER=0 width = 100%>
<tr>
<td><input id="filename" name="filename"style="display:none" MAXLENGTH=50 size=50 value="<% = filename %>"></td>
</tr>
<tr>
<td></td>
<td><input id="htmlfile" name="htmlfile"style="display:none" MAXLENGTH=50 size=50 value="<% = htmlfile %>"></td>
</tr>
<tr>
<td></td>
<td><input id="docid" name="docid"style="display:none" MAXLENGTH=50 size=50 value="<% = docid %>"></td>
</tr>
<tr>
<tr>
<td></td>
<td><input id="htmlid" name="htmlid" style="display:none"MAXLENGTH=50 size=50 value="<% = htmlid %>"></td>
</tr>
<tr>
<td>標題</td>
<td><input id="title" name="title" MAXLENGTH=50 size=50 value="<% = title%>"></td>
</tr>
<tr>
<td>類型</td>
<td>
<select name="selecttype" class="formclass" id="selecttype" style="width:100%">
<option value="1" selected>1</option><option value="2" selected>2</option></select>
</td>
</tr>
</TABLE>
<style>
button.op{
width:90px;
background-color:#9DC2DB;
border:1px #EEEEEE solid;
cursor: hand;
}
</style>
<table width=100% height=700 border=1 cellpadding=0 cellspacing=0 style="border:1px #9dc2db solid">
<tr height=26><td colspan=2><font color="red">提示：本地印章需要使用專門的印章制作工具，<a href="seals.asp">印章制作</a></font></td>
</tr>
<tr height=26><td colspan=2><font color="red">提示：所有遠程印章(財務章，合同章，行政章)的口令是8個1：11111111</font></td>
</tr>
<tr height=26 width=100%>
<td class="opinfo" width=90>文檔相關操作:</td>
<td width=100%>
<BUTTON class="op1" onclick="TANGER_OCX_SetDocUser(document.all('TANGER_OCX_Username').value);">設置演示用戶</button>
<INPUT id="TANGER_OCX_Username" type=text size=8 VALUE="用戶49">
<button class="op" onclick='var selObj = document.all("TaoHongSelect");var tempurl=selObj.options[selObj.selectedIndex].value;try{TANGER_OCX_OBJ.ActiveDocument.Application.Selection.HomeKey(6);}catch(err){};TANGER_OCX_OBJ.AddTemplateFromURL(tempurl)'>選擇模板套紅</BUTTON><select id="TaoHongSelect"><option value="fawenT.doc">發文套紅
<option value="gongwenpicT.doc">公文套紅2
<option value="gongwenT.doc">公文套紅
<option value="shouwenT.doc">收文套紅
</select>
<button class="op" onclick="TANGER_OCX_AddDocHeader('某某政府機關紅頭文件')">編程動態套紅</BUTTON>
<button class="op" onclick="TANGER_OCX_SetMarkModify(true)">保留痕跡</button>
<button class="op" onclick="TANGER_OCX_SetMarkModify(false)">不留痕</button>
<button class="op" onclick="TANGER_OCX_ShowRevisions(true)">顯示痕跡</button>
<button class="op" onclick="TANGER_OCX_ShowRevisions(false)">隱藏痕跡</button><BR>
<button class="op" onclick="TANGER_OCX_AcceptAllRevisions()">接受所有修訂</button>
<button class="op" onClick="AddPictureFromLocal()">添加本地圖片</button>
<button class="op" onclick="DoHandDraw()">手工繪圖</button>
<button class="op" onclick='var selObj = document.all("ImageSelect");var tempurl=selObj.options[selObj.selectedIndex].value;AddPictureFromURL(tempurl)'>從URL添加圖片</button><select id="ImageSelect">
<option value="200_80Logo.jpg">圖像2
<option value="200_80Logo.jpg">圖像1
<option value="200_80Logo.jpg">圖像3</select>
</td></tr>
<tr width=100%>
<td valign=top width=90>
<span class="opinfo" onclick="">[打印控制]</span>
<button class="op" onclick="TANGER_OCX_ChgLayout()">頁面布局</button>
<button class="op" onclick="TANGER_OCX_PrintDoc(true)">后臺打印</button>
<button class="op" onclick="TANGER_OCX_PrintDoc(false)">前臺打印</button>
<button class="op" onclick="TANGER_OCX_EnableFilePrintMenu(false)">禁止打印</button>
<button class="op" onclick="TANGER_OCX_EnableFilePrintMenu(true)">允許打印</button>
<span class="opinfo" onclick="">[簽字蓋章]</span>
<button class="op" onclick="AddSignFromLocal()">添加本地印章</button>
<button class="op" onclick='var selObj = document.all("SignSelect");var sid=selObj.options[selObj.selectedIndex].value;AddSignFromURL("readseal.asp?sid="+sid)'>添加所選章</button>
<select id = "SignSelect" style="WIDTH: 90px">
<%
set RS = Server.CreateObject("ADODB.Recordset")
RS.Open "seals", conn, adOpenForwardOnly, adLockReadOnly 'forward only,read only
while not RS.EOF
response.write "<option value =" & RS("sid") & ">"&RS("sname")&"</option>"
RS.MoveNext
wend
RS.Close
Set Rs= Nothing
%></select>
<button class="op" onclick="DoHandSign()">手寫簽名</button>
<button class="op" onclick="DoCheckSign()">印章驗證</button>
<span class="opinfo" onclick="">[界面相關]</span>
<button class="op" onclick="TANGER_OCX_OBJ.Menubar=!TANGER_OCX_OBJ.Menubar;">切換菜單</button>
<button class="op" onclick="TANGER_OCX_OBJ.Titlebar=!TANGER_OCX_OBJ.Titlebar;">切換標題欄</button>
<button class="op" onclick="TANGER_OCX_OBJ.Toolbars=!TANGER_OCX_OBJ.Toolbars;">切換工具欄</button>
<button class="op" onclick="TANGER_OCX_OBJ.Statusbar=!TANGER_OCX_OBJ.Statusbar;">切換狀態欄</button>
<span class="opinfo" onclick="">[其它控制]</span>
<button class="op" onclick="TANGER_OCX_OBJ.IsShowToolMenu=!TANGER_OCX_OBJ.IsShowToolMenu;">切換工具菜單</button>
<button class="op" onclick="TANGER_OCX_OBJ.IsNoCopy=true;">禁止拷貝</button>
<button class="op" onclick="TANGER_OCX_OBJ.IsNoCopy=false;">允許拷貝</button>
<button class="op" onclick="TANGER_OCX_EnableFileNewMenu(false)">禁止新建</button>
<button class="op" onclick="TANGER_OCX_EnableFileNewMenu(true)">允許新建</button>
<button class="op" onclick="TANGER_OCX_EnableFileOpenMenu(false)">禁止打開</button>
<button class="op" onclick="TANGER_OCX_EnableFileOpenMenu(true)">允許打開</button>
<button class="op" onclick="TANGER_OCX_EnableFileSaveMenu(false)">禁止保存</button>
<button class="op" onclick="TANGER_OCX_EnableFileSaveMenu(true)">允許保存</button>
<button class="op" onclick="TANGER_OCX_EnableFileSaveAsMenu(false)">禁止另存</button>
<button class="op" onclick="TANGER_OCX_EnableFileSaveAsMenu(true)">允許另存</button>
</td>
<SPAN ID="TANGER_OCX_key" style="display:none">MAIR-63N9S6</SPAN>
<td width=100%>
<object id="TANGER_OCX" classid="clsid:C9BC4DFF-4248-4a3c-8A49-63A7D317F404" codebase="officecontrol.cab#version=4,0,0,7" width="100%" height="100%">
<param name="BorderStyle" value="1">
<param name="BorderColor" value="14402205">
<param name="TitlebarColor" value="14402205">
<param name="TitlebarTextColor" value="0">
<param name="Caption" value="NTKO OFFICE文檔控件ASP示例。V4,0,0,7版本。http://www.ntko.com">
<param name="IsShowToolMenu" value="-1">
<param name="IsNoCopy" value="-1">
<SPAN STYLE="color:red">不能裝載文檔控件。請在檢查瀏覽器的選項中檢查瀏覽器的安全設置。</SPAN>
</object>
<!-- 以下函數相應控件的兩個事件:OnDocumentClosed,和OnDocumentOpened -->
<script language="JScript" for=TANGER_OCX event="OnDocumentClosed()">
TANGER_OCX_OnDocumentClosed();
</script>
<script language="JScript" for=TANGER_OCX event="OnDocumentOpened(TANGER_OCX_str,TANGER_OCX_obj)">
TANGER_OCX_OnDocumentOpened(TANGER_OCX_str,TANGER_OCX_obj);
</script>
</td>
</tr></table>
</FORM>
</center>
</BODY>
</HTML>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -