📄 view_area.asp
字号:
<!--#include file=../include/config.asp-->
<!--#include file=../include/conn_view.asp-->
<!--#include file=../include/access.asp-->
<!--#include file=../include/function.asp-->
<html>
<head>
<title>无标题文档</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../style.css" type="text/css">
</head>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0">
<div align="center"><br>
<b><font size="3">区 域 信 息</font></b><br>
</div>
<center>
<br>
</center>
<table width="600" border="0" cellpadding="0" cellspacing="2" class="kuan" align="center" height="49" bgcolor="#FFFFFF">
<%
dim strSql,rs,i,PageNo
strSql="select * from [area] order by id"
set rs=Server.CreateObject("ADODB.RecordSet")
rs.open strSql,conn,3,3
%>
<tr>
<td background="../images/system1.gif" height="25" align="center" width="100"><font color="#FF6633" class="font"><b><font color="#FF6633" class="font"><b><font color="#FF9B59">编号</font></b></font></b></font></td>
<td background="../images/system1.gif" height="25" align="center" width="143"><font color="#FF6633" class="font"><b><font color="#FF9B59">小区名称</font></b></font></td>
<td background="../images/system1.gif" height="25" align="center" width="42"><font color="#FF6633" class="font"><b><font color="#FF9B59">删除</font></b></font></td>
<td background="../images/system1.gif" height="25" align="center" width="70"><font color="#FF6633" class="font"><b></b></font><font color="#FF6633" class="font"><b><font color="#FF9B59">详细资料</font></b></font></td>
</tr>
<%
i=0
do while not rs.eof
i=i+1
%>
<tr bgcolor="#ECFFEC">
<td class="font" align="center" valign="middle" height="26" width="100" bgcolor="#C1D6EA"><font color="red"><%=rs("id")%></font></td>
<td class="font" align="center" valign="middle" height="26" width="143" bgcolor="#DBE7F2"><%=rs("area_name")%></td>
<td class="font" align="center" valign="middle" height="26" width="42" bgcolor="#C1D6EA"><a href="del_area.asp?id=<%=rs("id")%>" class="linkfont">删除</a></td>
<td class="linkfont" align="center" valign="middle" height="26" width="70" bgcolor="#DBE7F2"><a href="change_area.asp?id=<%=rs("id")%>" class="linkfont" target="_blank">查看或修改</a></td>
</tr>
<%
rs.MoveNext
Loop
rs.close
set rs=nothing
%>
</table>
<div align="center"><br>
<table width="600" border="0" cellpadding="0" cellspacing="2" class="kuan" align="center" height="20" bgcolor="#FFFFFF">
<form name="form1" method="post" action="save_area.asp">
<tr>
<td background="../images/system1.gif" height="20" align="center" width="191"><font color="#FF6633" class="font"><b><font color="#FF6633" class="font"><b><font color="#FF9B59">添加区域：</font></b></font></b></font>
</td>
<td background="../images/system1.gif" height="20" align="center" width="403">
<input class=text type="text" name="area_name" size="15">
<input type="submit" name="Submit3" value="添加">
<input type="reset" value="重写" name="B1">
</td>
</tr>
</form>
</table>
</div>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -