?? seals.asp.bak
字號(hào):
<%@ Language=VBScript %>
<!--#include file="conn.asp"-->
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<meta http-equiv="content-type" content="text/html;charset=gb2312">
<TITLE>NTKO Office印章控件ASP示例</TITLE>
</HEAD>
<BODY>
<CENTER>
<h1>NTKO Office印章控件ASP示例</h1>
<TABLE width=500 border=0 cellpadding=2 cellspacing=2>
<TR height="25">
<TD bgcolor="#9cc3de" align="middle"><A href="createseal.asp" target=_blank>創(chuàng)建新印章</a>
</TR></TABLE><BR>
<button onclick="window.location.reload();">刷新</button>
<H3></H3>
</table>
<hr width="80%"><B>以下是數(shù)據(jù)庫(kù)中保存的印章</B><hr width="80%">
<table width=700 border=1 cellpadding=0 cellspacing=0>
<tr bgcolor="#9cc3de"><td width=150>名稱</td><td width=150>用戶</td><td width=150>操作</td></tr>
<%
'讀取數(shù)據(jù)庫(kù)中的文件列表
Set RS = Server.CreateObject("ADODB.Recordset")
RS.Open "seals", conn, adOpenForwardOnly, adLockReadOnly 'forward only,read only
while not RS.EOF
response.write "<tr><td>" & RS("sname") & _
"</td><td>" & RS("user") & _
"</td><td><a href=" & Chr(34) & "viewseal.asp?fid=" & _
RS("sid") & chr(34) & "target=_blank>瀏覽</a></td><tr>"
RS.MoveNext
wend
RS.Close
Set Rs= Nothing
%>
</table>
<BR><BR><BR>
<h3>@版權(quán)所有：劉伶訓(xùn)</h3>
<h3><a href="http://www.ntko.com" target="_blank">http://www.ntko.com</h3>
<h3><A href="mailto:tanger@ntko.com">tanger@ntko.com</a></h3>
</CENTER>
</BODY>
</HTML>?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -