📄 counter.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="base.asp"-->
<% if session("username")="" then Response.Redirect "login.htm"
if session("adminflag")>2 and session("class")<>"计数器管理" then Call PrintMsg(NotAdmin)
Response.Buffer=true
Response.Expires=0
sql="select * from counter"
set rs=conn.execute(sql)
i=1
%>
<script language="javascript">
function confirmfix(id){
if ( confirm("你确定要修改吗?")) {
window.location.href = "counterfix.asp?id="+id
}
}
</script>
<div align="center">
<h3><font color="#FF0000"><strong>计数器管理 </strong></font></h3>
<table width="458" border="1" cellspacing="0" cellpadding="3">
<tr bgcolor="#003399">
<td width="79"> <div align="center"><font color="#FFFFFF" size="2">序号</font></div></td>
<td width="125"> <div align="center"><font color="#FFFFFF" size="2">前台显示</font></div></td>
<td width="154"> <div align="center"><font color="#FFFFFF" size="2">当前数值</font></div></td>
<td width="100"> <div align="center"><font color="#FFFFFF" size="2">是否选中</font></div></td>
<td width="100"><div align="center"><font color="#FFFFFF" size="2">修改</font></div></td>
</tr>
<% do while not rs.eof %>
<tr>
<td><div align="center"><%=i%></div></td>
<td><div align="center"><img src="../<%=rs("path")%>/1.gif"><img src="../<%=rs("path")%>/2.gif"></div></td>
<td><div align="center"><%=rs("number")%></div></td>
<td><div align="center">
<% if rs("used")=true then %>
<font color="#FF0000" size="2">是</font>
<% else %>
<font color="#009933" size="2">否</font>
<% end if %>
</div></td>
<td><div align="center"><font size="2"><A HREF='javascript:confirmfix(<%=rs("id")%>)'>修改</a></font></div></td>
</tr>
<% i=i+1
rs.movenext
loop
rs.close
%>
</table>
<p><strong><font color="#FF0000" size="2">注意:只能有一种计数器被选中!否则会使网站不能运行!</font></strong></p>
</div>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -