📄 admin.asp
字号:
<!--#include file="../login/checklogin.asp"-->
<!--#include file="../database/opendb.asp"-->
<!--#include file="../bg/css.asp"-->
<BODY>
<table width="778" align="center" bgcolor="#FFFF66" style="BORDER-RIGHT: #dddddd 1px dotted; BORDER-TOP: #dddddd 1px dotted; BORDER-LEFT: #dddddd 1px dotted; BORDER-BOTTOM: #dddddd 1px dotted">
<tr>
<td >
<div align="center">
</div></td>
</tr>
</table>
<table width="778" border="1" align="center" cellspacing="1" style="BORDER-RIGHT: #dddddd 1px dotted; BORDER-TOP: #dddddd 1px dotted; BORDER-LEFT: #dddddd 1px dotted; BORDER-BOTTOM: #dddddd 1px dotted">
<tr bgcolor="#6699FF" >
<td ><div align="center" class="style1">
<div align="center">ID</div>
</div></td>
<td ><div align="center" class="style1">
<div align="center">标题</div>
</div></td>
<td ><div align="center" class="style1">
<div align="center">栏目ID</div>
</div></td>
<td colspan="2"> <div align="center"><span class="style1">操作</span></div></td>
</tr>
<%
sql="select ID,name,date,fatherid from data order by fatherid,date desc "
rst.Open sql,my_conn,1,1
if rst.EOF and rst.BOF then
%>
<font color="#FF0000"><%Response.Write "没有记录"%></font>
<%
else
rst.movefirst
do while not rst.EOF or rst.BOF
%>
<tr>
<td><div align="center"> </div> <div align="left" class="style1">
<div align="center"><%=rst("ID")%> </div>
</div></td>
<td ><div align="left" class=" style1">
<div align="center"><%=rst("name")%> </div>
</div></td>
<td ><div align="left" class=" style1">
<div align="center"><%=rst("fatherid")%> </div>
</div></td>
<td width="9%"><div align="center">
<input type="button" name="edit" onClick="location.href='edit.asp?id=<%=rst("ID")%>'" value="编辑" >
</div></td>
<td width="9%"><div align="center">
<input type="button" name="DEL" onClick="{if(confirm('确认要删除?')){location.href='del.asp?id=<%=rst("ID")%>';}return false;}" value="删除" >
</div></td>
</tr>
<%
rst.movenext
loop
end if
<!--#include file="../database/closedb.asp"-->
%>
</table>
</body>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -