📄 car_list.asp

📁 网络办公系统源码
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../../config.asp"-->
<!--#include file="../checklogin.asp"-->
<%
Submit=trim(request.Form("Submit"))
blogid=replace(trim(request.Form("blogid"))," ","")
if Submit="删除信息" then
	if  ChkAdmin("oa_car")=False then
  		call message("您没有删除车辆的权限","back")
   		call endexit()
	end if

	if blogid="" then
		call message("请至少选择一项删除","back")
		call EndExit()
	end if
	bid=split(blogid,",")
	for i=0 to ubound(bid)
		delsql="delete from oa_car where id="&bid(i)&""
		conn.execute(delsql)
	next
	call message("删除成功","car_list.asp")
	call EndExit()
end if
%>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title></title>
<link href="../img/css1.css" type=text/css rel=stylesheet>
<style type="text/css">
<!--
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
.style1 {color: #FFFFFF}
body,td,th {
	font-size: 12px;
}
.style3 {color: #FFFFFF; font-weight: bold; }
-->
</style>
</head>
<body>
<form name="form1" method="post" action="car_list.asp">
<table width="99%"  border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#F2F2F2" class="tabel1">
  <tr align="right">
    <td width="18%" height="25" align="left" bgcolor="#CC0000"><span class="style1"><strong>车辆统计</strong></span></td>
    <td height="25" colspan="6" bgcolor="#CC0000"><input name="Submit" type="button" class="bon" id="Submit" value="添加车辆" onClick="window.location.href='car_dj.asp'">
      <input name="Submit" type="submit" class="bon" id="Submit" value="删除信息">
      <input name="Submit3" type="button" class="tabel1" value="返回" onClick="window.history.go(-1)"></td>
  </tr>
    <tr bgcolor="#F9F9F9">
      <td colspan="7" align="right" bgcolor="#F2F2F2">&nbsp; </td>
    </tr>
  <tr bgcolor="#CC6633">
    <td height="25" align="center"><span class="style3"> 车牌号</span></td>
    <td width="20%" height="25" align="center"><span class="style3"> 品牌 </span></td>
    <td width="17%" align="center"><span class="style1"><strong>购买日期</strong></span></td>
    <td width="13%" height="25" align="center"><span class="style3">颜色 </span></td>
    <td width="11%" align="center"><span class="style3">驾驶员</span></td>
    <td width="10%" height="25" align="center"><span class="style3">  状态</span></td>
    <td width="11%" align="center"><span class="style3">操作</span></td>
  </tr>
  <%
		sql="select id,car_num,car_type,car_color,car_driver,car_flag,car_buytime from oa_car where companyid="&session("companyid")
		set rs=conn.execute(sql)
		do while not rs.eof
	%>
  <tr>
    <td height="25" align="center"><a href="car_dj.asp?act=view&id=<%=rs(0)%>"><%=rs(1)%></a></td>
    <td height="25" align="center"><%=rs(2)%></td>
    <td height="25" align="center"><%=rs(6)%></td>
    <td height="25" align="center"><%=rs(3)%></td>
    <td height="25" align="center"><%=rs(4)%></td>
    <td height="25" align="center"><%=rs(5)%></td>
    <td height="25" align="center"><a href="car_dj.asp?act=edits&id=<%=rs(0)%>">修改</a> 
    <input name="blogid" type="checkbox" id="blogid" value="<%=rs(0)%>"></td>
  </tr>
  <%
		rs.movenext
		loop
		rs.close
		set rs=nothing
	%>
</table>
</form>
</body>
</html>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -