📄 signaturelist.asp

📁 OFFICE办公自动化
💻 ASP
字号:
<%
'功能：
%>

<!--#include file="../inc/Secure.asp"-->
<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/Const.asp"-->

<%
'------------------------------------------------设置参数
LoginID=trim(session("LoginID")) : if LoginID="" then LoginID=0 '当前用户ID
'------------------------------------------------
maxmessage=15 '每页显示记录数
currentpage=request("page") '当前页码
'------------------------------------------------
'------------------------------------------------取记录
'分页取模板记录 （返回rs对象）
'rs.recordcount 为记录总数
'rs.PageSize 为本页记录数
'

set rs=Server.CreateObject("ADODB.RecordSet")
sql="select * From tbioaOffice_Signature where userid=0 order by SignatureID desc" 
rs.open sql,oConn,1,1
Showpage=Paging(rs,maxmessage,currentpage,"type="&stype)
'------------------------------------------------
%>
<html>
<head>
<title>iWebOffice2003——公章管理</title>
<link rel='stylesheet' type='text/css' href='../css/main.css'>
<script language="javascript">
function ConfirmDel(FileUrl){
	if (confirm('是否确定删除该印签！')){
		location.href=FileUrl;
	}	
}

function DoMenu(MenuValue){
    location.href=MenuValue;
    return true;
}
</script>
</head>
<body bgcolor="#ffffff">
<table border=0 cellspacing='1' cellpadding='2' width=100% align=center>
	<tr>
		<td colspan=4 nowrap>
		  <img src="../images/icon_title.gif" align=left>
		  公章管理
		</td>

		<td colspan=1 width="100" nowrap>
		  <input type=button name="Add" value="增加印签"  onclick="javascript:location.href='SignatureAddFrm.asp'" class="button0" onmouseout=className="button0" onmouseover=className="button1">
		</td>
	</tr>
</table>
<hr width="100%" size=1 color="#000000">
<br>
<%=Showpage%> 
<%
if rs.RecordCount=0 then
	response.write "<BR><BR>暂时为空！"
else
%>
<table border=0 cellspacing='1' cellpadding='2' width=100% align=center class=tab>
	<tr>
		<td nowrap align=center class="td2" height="26">编号</td>
		<td nowrap align=center class="td2">印签名称</td>
		<td nowrap align=center class="td2">印签类型</td>
		<td nowrap align=center class="td2">操作</td>
	</tr>
  <%

	i=0
	do while not Rs.eof
		if i mod 2 = 0 then td_class="td1" else td_class="td2"
	%>
	<tr>
		<td class="<%=td_class%>"><%=Rs("SignatureID")%>&nbsp;</td>
		<td class="<%=td_class%>"><%=Rs("MarkName")%>&nbsp;</td>
		<td class="<%=td_class%>"><%=Rs("MarkType")%>&nbsp;</td>
		<td class="<%=td_class%>" width=148 nowrap>
			<input type=button onclick="javascript:location.href='SignatureEditFrm.asp?SignatureID=<%=Rs("SignatureID")%>';" name="Edit" value=" 修 改 " class="button0" onmouseout=className="button0" onmouseover=className="button1">
			<input type=button onclick="javascript:ConfirmDel('SignatureDel.asp?SignatureID=<%=Rs("SignatureID")%>');" name="Del" value=" 删 除 " class="button0" onmouseout=className="button0" onmouseover=className="button1">
		</td>
	</tr>
  <%
		Rs.MoveNext
		i=i+1
		Loop
	Rs.Close
	Set Rs=Nothing
	%>
</table>
</body>
</html>
<%end if%>
<%'释放对象变量
<!--#include file="../inc/conn_close.asp"-->
%>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -