📄 manage_cars_xs.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file=../DataBase/conn.asp-->
<%
if session("admin_name")="" then
response.Redirect("login.asp")
end if
%>
<%
'取得默认表名
if request("biao")="" then
biao="tb_Cars_s"
else
biao=request("biao")
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title></title>
<style type="text/css">
<!--
.style1 {color: #FFFFFF}
.style2 {color: #FF0000}
a:link {
text-decoration: none;
}
a:visited {
text-decoration: none;
}
a:hover {
text-decoration: none;
}
a:active {
text-decoration: none;
}
.style3 {
font-size: 14px;
font-weight: bold;
}
-->
</style>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_goToURL() { //v3.0
var i, args=MM_goToURL.arguments; document.MM_returnValue = false;
for (i=0; i<(args.length-1); i+=2) eval(args[i]+".location='"+args[i+1]+"'");
}
//-->
</script>
</head>
<body>
<%
function xianshi
%>
<link href="../css/mangage.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.style1 {color: #FFFFFF}
body,td,th {
font-size: 12px;
}
-->
</style>
<table width="230" border="0" align="center">
<tr>
<td><div align="center" class="style3">销售车辆信息管理</div></td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td>
<form name="form1" method="post" action="">
<table width="530" border="0" align="center">
<tr>
<td width="401">关键字：
<input name="search" type="text" id="search">
<select name="table" id="table">
<option value="tb_Cars_s">乘用车</option>
<option value="tb_Cars_sy">商用车</option>
</select>
<input type="submit" name="Submit" value="查询"></td>
<td width="119" align="right"><a href="javascript:" onClick="window.open('Manage_Cars_xsg.asp','','width=500,height=560')">添加车辆信息</a></td>
</tr>
</table>
</form>
<a href="Manage_Cars_xs.asp?biao=tb_Cars_s"><span class="style2">乘用车管理</span></a> <a href="Manage_Cars_xs.asp?biao=tb_Cars_sy"><span class="style2">商用车管理</span></a> <table width="530" border="0" align="center" cellspacing="1">
<tr bgcolor="#595859" class="css">
<td width="106" height="23"><div align="center" class="style1">类型</div></td>
<td width="106"><div align="center" class="style1">品牌</div></td>
<td width="106"><div align="center" class="style1">型号</div></td>
<td width="106"><div align="center" class="style1">价钱</div></td>
<td width="106"><div align="center" class="style1">操作</div></td>
</tr>
<tr class="css">
<td bgcolor="#FFFFFF" colspan="5">
<%
if request("del")<>"" then
sql1="delete from "&biao&" where id="&request("del")
conn.execute(sql1)
end if
shum=30
set rs=server.CreateObject("ADODB.Recordset")
sql="Select * from "&biao&" order by id desc"
rs.open sql,conn,1,1
if not rs.eof then
tel=rs.recordcount
rs.pagesize=shum
maxpage=rs.pagecount
requestpage=clng(request("p"))
if requestpage="" or requestpage=0 then
requestpage=1
end if
if requestpage>maxpage then
requestpage=maxpage
end if
if not requestpage=1 then
rs.move (requestpage-1)*rs.pagesize
end if
for i=1 to rs.pagesize and not rs.eof
%>
<table width="100%" border="0" cellspacing="0">
<tr>
<td width="20%"><div align="center" class="css"><%=rs("type")%></div></td>
<td width="20%"><div align="center" class="css"><%=rs("pinpai")%></div></td>
<td width="20%"><div align="center" class="css"><%=rs("xinghao")%></div></td>
<td width="20%"><div align="center" class="css"><%=rs("shoujia")%></div></td>
<td width="8%"><div align="center">
<% If biao="tb_Cars_s" Then %>
<a href="javascript:" onClick="window.open('Manage_Cars_xsg.asp?id=<%=rs("id")%>','','width=500,height=560')">修改</a>
<% Else %>
<a href="javascript:" onClick="window.open('Manage_Cars_xsz.asp?id=<%=rs("id")%>','','width=500,height=560')">修改</a>
<% End If %>
</div></td>
<td width="6%"><div align="center"><a href="Manage_Cars_xs.asp?del=<%=rs("id")%>&biao=<%=biao%>&p=<%=requestpage%>" onClick="return confirm('你真的删除吗？')" >删除</a></div></td>
<%if biao="tb_Cars_s" then%><td width="6%"><%if rs("tuijian")=1 then%>
<a href="javascript:" onClick="window.open('Manage_Cars_xstuijian.asp?did=<%=rs("id")%>','','width=300,height=200')"><span class="style2">取消</span></a>
<%else%>
<a href="javascript:" onClick="window.open('Manage_Cars_xstuijian.asp?id=<%=rs("id")%>','','width=300,height=200')">推荐</a>
<%end if%>
</td>
<%end if%>
</tr>
</table>
<%
Rs.MoveNext
if rs.eof then exit for
next
Rs.Close
Set Rs=Nothing
else
response.Write("暂无车辆信息")
end if
%>
</td>
</tr>
<tr bgcolor="#F0F0F0">
<td height="24" colspan="5">
<div align="right"><span class="css">共<%= maxpage %>页 当前页：<%= requestpage %> <a href=Manage_Cars_xs.asp?p=<%=requestpage-1%>&biao=<%=biao%>>上一页</a> <a href=Manage_Cars_xs.asp?p=<%=requestpage+1%>&biao=<%=biao%>>下一页</a></span> </div></td>
</tr>
</table>
<%
end function
%></td>
</tr>
</table>
<%
function search
%>
<link href="../css/mangage.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.style1 {color: #FFFFFF}
body,td,th {
font-size: 12px;
}
-->
</style>
<table width="230" border="0" align="center">
<tr>
<td><div align="center" class="style3">销售车辆信息管理</div></td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td>
<form name="form1" method="post" action="">
<table width="530" border="0" align="center">
<tr>
<td width="420">关键字：
<input name="search" type="text" id="search">
<select name="table" id="table">
<option value="tb_Cars_s">乘用车</option>
<option value="tb_Cars_sy">商用车</option>
</select>
<input type="submit" name="Submit" value="查询">
<input name="Submit2" type="submit" onClick="MM_goToURL('self','Manage_Cars_xs.asp');return document.MM_returnValue" value="返回">
</td>
<td width="100" align="right"><a href="javascript:" onClick="window.open('Manage_Cars_xsg.asp','','width=500,height=560')">添加车辆信息</a></td>
</tr>
</table>
</form>
<table width="530" border="0" align="center" cellspacing="1">
<tr bgcolor="#5A595A" class="css">
<td width="106" height="23"><div align="center" class="style1">类型</div></td>
<td width="106"><div align="center" class="style1">品牌</div></td>
<td width="106"><div align="center" class="style1">型号</div></td>
<td width="106"><div align="center" class="style1">价钱</div></td>
<td width="106"><div align="center" class="style1">操作</div></td>
</tr>
<tr class="css">
<td bgcolor="#FFFFFF" colspan="5">
<%
shum=30
table=request("table")
set rs=server.CreateObject("ADODB.Recordset")
sql="Select * from "&table&" where pinpai like '%"&request("search")&"%' or xinghao like '%"&request("search")&"%'order by id desc"
rs.open sql,conn,1,1
if not rs.eof then
tel=rs.recordcount
for i=1 to tel
%>
<table width="100%" border="0" cellspacing="0">
<tr>
<td width="20%"><div align="center" class="css"><%=rs("type")%></div></td>
<td width="20%"><div align="center" class="css"><%=rs("pinpai")%></div></td>
<td width="20%"><div align="center" class="css"><%=rs("xinghao")%></div></td>
<td width="20%"><div align="center" class="css"><%=rs("shoujia")%></div></td>
<td width="10%"><div align="center">
<% If request("table")="tb_Cars_s" Then %>
<a href="javascript:" onClick="window.open('Manage_Cars_xsg.asp?id=<%=rs("id")%>','','width=500,height=560')">修改</a>
<% Else %>
<a href="javascript:" onClick="window.open('Manage_Cars_xsz.asp?id=<%=rs("id")%>','','width=500,height=560')">修改</a>
<% End If %>
</div>
</td>
<td width="5%"><div align="center"><a href="Manage_Cars_xs.asp?del1=<%=rs("id")%>&table=<%=table%>" onClick="return confirm('你真的删除吗？')">删除</a></div></td>
<td width="5%"><%if rs("tuijian")=1 then%>
<a href="javascript:" onClick="window.open('Manage_Cars_xstuijian.asp?did=<%=rs("id")%>','','width=300,height=200')"><span class="style2">取消</span></a>
<%else%>
<a href="javascript:" onClick="window.open('Manage_Cars_xstuijian.asp?id=<%=rs("id")%>','','width=300,height=200')">推荐</a>
<%end if%></td>
</tr>
</table>
<%
Rs.MoveNext
if rs.eof then exit for
next
Rs.Close
Set Rs=Nothing
else
response.Write("没有您想要查找的信息")
end if
%>
</td>
</tr>
<tr bgcolor="#F0F0F0">
<td height="24" colspan="5"> <div align="right"><span class="css">共<%= maxpage %>页 当前页：<%= requestpage %> <a href=Manage_Cars_xs.asp?p=<%=requestpage-1%>&biao=<%=biao%>>上一页</a> <a href=Manage_Cars_xs.asp?p=<%=requestpage+1%>&biao=<%=biao%>>下一页</a></span> </div></td>
</tr>
</table>
</td>
</tr>
</table>
<p align="center"> </p>
<%
end function
%>
<%
if request("search")<>"" then
call search
else
call xianshi
end if
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -