📄 carlist.asp
字号:
<!--#include file="check.asp"-->
<!--#include file="checkpower.asp"-->
<!--#INCLUDE FILE="connect.asp" -->
<%
if Request.ServerVariables("Request_Method")="POST" then
if request("choosedel")="choosedel" then
j=request("checkbox").count
sql=request("checkbox")(1)
for i=2 to j
delid=request("checkbox")(i)
sql=sql&" or id="&delid
next
sql="delete from car where id="&sql
conn.execute(sql)
else
set rs=server.createobject("adodb.recordset")
sql="select * from car where id=1"
rs.open sql,conn,1,3
rs.addnew
rs("carname")=request("carname")
rs("carid")=request("carid")
rs.update
rs.close
set rs=nothing
end if
end if
%>
<html>
<head>
<title>车辆管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language="JavaScript" src="apply.js"></script>
<link rel="stylesheet" href="apply.css" type="text/css">
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" oncontextmenu="return false">
<%set rs=server.createobject("adodb.recordset")
sql="select * from car"
rs.open sql,conn,1,1
%>
<div align="center"> </div>
<table width="100%" cellpadding="0" cellspacing="0" align="center">
<tr>
<td valign="top" height="477" width="940">
<form name="form" method="post" action="">
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="50">
<tr>
<td align="center" class="title"> <img src="images/systemcar.gif"></td>
</tr>
</table>
<table width="90%" border="0" cellspacing="0" cellpadding="0" align="center" height="26">
<tr height=1>
<td bgcolor="#A7BAE4" height="1" colspan="4"></td>
</tr>
<tr>
<td bgcolor="#D4DEF4" valign="top">
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="26">
<tr>
<td width="30">
<input type="hidden" name="choosedel">
</td>
<td width="160">目前共有<font class="picknum"><b><%=rs.recordcount %></b></font>个车辆 </td>
<td><a href="#" onClick="return checkaddcar()" class="aapply">添加车辆</a>
<a href="#" onClick="return checkdelcar()" class="aapply">删 除</a>
<a href="javascript:gosystem()" class="aapply"> 返 回</a> </td>
</tr>
</table>
</td>
</tr>
<tr height=1>
<td bgcolor="#A7BAE4" height="1" colspan="4"></td>
</tr>
</table>
<table width="90%" border="0" cellspacing="0" align="center" cellpadding="0">
<tr align="center" bgcolor="#E7ECF7">
<td height="26" width="24%">车 牌 号 码：</td>
<td height="26" width="57%">车 辆 名 称：</td>
<td height="26" width="19%">删 除：</td>
</tr>
<%if rs.eof then %>
<tr height="1">
<td bgcolor="#ffffff" colspan="4"><img src="images/spacer.gif" width="1" height="1"></td>
</tr>
<tr bgcolor="#F5FAFD" align="center">
<td height="26" colspan="4" class="f6wait">目前您还没有添加车辆</td>
</tr>
<tr height="1">
<td bgColor="#D6E1F8" colspan="4"><img src="images/spacer.gif" width="1" height="1"></td>
</tr>
<%
else
dim i
i=0
while not rs.eof
response.write("<script language=javascript>id["&i&"]='"&rs("carid")&"';</script>")
i=i+1
%>
<tr height="1">
<td bgcolor="#ffffff" colspan="4"><img src="images/spacer.gif" width="1" height="1"></td>
</tr>
<tr align="center" bgcolor="#F5FAFD">
<td height="26" width="24%"><%=rs("carid")%></td>
<td height="26" width="57%"><%=rs("carname")%></td>
<td height="26" width="19%">
<input type="checkbox" name="checkbox" value="<%=rs("id")%>">
</td>
</tr>
<tr height="1">
<td bgColor="#D6E1F8" colspan="3"><img src="images/spacer.gif" width="1" height="1"></td>
</tr>
<%rs.movenext
wend
end if
%>
</table>
<table width="90%" border="0" cellspacing="0" cellpadding="0" align="center" height="26">
<tr height=1>
<td bgcolor="#A7BAE4" height="1" colspan="4"></td>
</tr>
<tr>
<td bgcolor="#D4DEF4" align="center">车牌号码：
<input type="text" name="carid" size="20" maxlength="30">
车辆名称：
<input type="text" name="carname" size="20" maxlength="30">
</td>
</tr>
<tr height=1>
<td bgcolor="#A7BAE4" height="1" colspan="4"></td>
</tr>
</table>
</form>
</td>
</tr>
</table>
<!--#include file="close.asp"-->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -