?? r_zi.asp
字號:
<!--#include file="conn.inc"-->
<%
sql1="select * from kind where kind='收文'"
rs1.open sql1,conn,3,2
%>
<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Language" CONTENT="zh-cn">
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
<META NAME="GENERATOR" CONTENT="Microsoft FrontPage 4.0">
<META NAME="ProgId" CONTENT="FrontPage.Editor.Document">
<TITLE>收文“字”維護</TITLE>
<STYLE>
<!--
.border { background-color: #D0D7AF; border-left: 1 solid #ECEFDE;
border-right: 1 solid #808000; border-top: 1 solid #EFF1E4;
border-bottom: 1 solid #808000 }
p, td, input, select { font-size: 9pt }
A:visited {TEXT-DECORATION: none;color:#000000}
A:active {TEXT-DECORATION: none;color:#ff0000}
A:hover {TEXT-DECORATION: underline;color:#ff0000}
A:link {TEXT-DECORATION: none;color:#000000}
.button01 { background-color: #D0D7AF; border: 1 solid #999966 }
-->
</STYLE>
</HEAD>
<BODY BGCOLOR="#EAEDDC" TOPMARGIN="0" LEFTMARGIN="0">
<TABLE BORDER="0" WIDTH="100%" CELLSPACING="0" CELLPADDING="0">
<TR>
<TD WIDTH="100%" HEIGHT="25" CLASS="border">
<P ALIGN="center">修改或刪除“字”可能會刪除部分文件。小心！！！</TD>
</TR>
<TR>
<TD WIDTH="100%">
<BR>
<DIV ALIGN="center">
<CENTER>
<TABLE BORDER="0" WIDTH="80%" CELLSPACING="1" CELLPADDING="0" BGCOLOR="#808000">
<TR HEIGHT="20">
<TD WIDTH="17%" BGCOLOR="#EAEDDC">
<P ALIGN="center">序號</TD>
<TD WIDTH="49%" BGCOLOR="#EAEDDC">
<P ALIGN="center"> 現有收文“字”</P>
</TD>
<TD WIDTH="34%" BGCOLOR="#EAEDDC">
<P ALIGN="center">編號操作</P>
</TD>
</TR>
<%
i=1
on error resume next
if rs1.eof then rs.movefirst
while not rs1.eof
%>
<TR HEIGHT="20">
<TD WIDTH="17%" BGCOLOR="#EAEDDC">
<P ALIGN="center"><%=i%></TD>
<TD WIDTH="49%" BGCOLOR="#EAEDDC">
<P ALIGN="center"><%=rs1("zi")%></P>
</TD>
<TD WIDTH="34%" BGCOLOR="#EAEDDC">
<P ALIGN="center"><A HREF="r_zi.asp?action=edit&ID=<%=rs1("id")%>">編輯</A> <A HREF="action_r.asp?action=del&id=<%=rs1("id")%>">刪除</A></P>
</TD>
</TR>
<%
i=i+1
rs1.movenext
wend
%>
</TABLE>
</CENTER>
</DIV>
<%
if request("action")="" then
%>
<FORM METHOD="POST" ACTION="action_r.asp?action=add">
<P ALIGN="center"><FONT COLOR="#FF0000">
添加</FONT>新“字”：<INPUT TYPE="text" NAME="zi" SIZE="17">
<INPUT TYPE="hidden" NAME="kind" value="收文" SIZE="17"> <INPUT TYPE="submit" VALUE="確定" NAME="B1" CLASS="button01"></P>
</FORM>
<%
else
sql2="select * from kind where ID="&request("ID")
rs2.open sql2,conn,3,2
%>
<FORM METHOD="POST" ACTION="action_r.asp">
<P ALIGN="center"><FONT COLOR="#FF0000">編輯</FONT>現有“字”：<INPUT TYPE="text" NAME="zi" SIZE="17" VALUE="<%=rs2("zi")%>">
<INPUT TYPE="hidden" NAME="id" VALUE="<%=rs2("id")%>">
<INPUT TYPE="hidden" NAME="action" VALUE="edit">
<INPUT TYPE="submit" VALUE="確定" NAME="B1" CLASS="button01"></P>
<%
end if
%>
</FORM>
</TD>
</TR>
</TABLE>
<P ALIGN="center">【<A HREF="javascript:self.close()">關閉窗口</A>】</P>
</BODY>
</HTML>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -