<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
|
<%Session.CodePage=65001%>
|
<!--#include virtual="/inc/chkadmin.gds"-->
|
<!--#include virtual="/inc/function.gds"-->
|
<%
|
'各种返回信息
|
SystemMessageType=trim(Request("SystemMessageType"))
|
SMT=trim(Request("SMT"))
|
if SMT="1" then
|
SystemMessageTXT="数据不足!!!"
|
elseif SMT="2" then
|
SystemMessageTXT="车辆资料修改完成"
|
elseif SMT="3" then
|
SystemMessageTXT="新建车辆资料完成"
|
elseif SMT="4" then
|
SystemMessageTXT="车辆资料禁用完成"
|
elseif SMT="5" then
|
SystemMessageTXT="车牌或车架号重复"
|
elseif SMT="6" then
|
SystemMessageTXT="请选择需要修改的项目"
|
elseif SMT="7" then
|
SystemMessageTXT="新建分公司资料完成,请录入分公司名下车辆资料"
|
end if
|
|
searchTXT=trim(Request("searchTXT"))
|
OrderClass=trim(Request("OrderClass"))
|
CarOrdClass=trim(Request("CarOrdClass"))
|
If CarOrdClass="" Then OrdClassName="全部"
|
Set rs = Server.CreateObject("ADODB.Recordset")
|
|
'单据类型表列
|
OrdClassTypes = ",全部|"
|
sql="select vID,vtext,vOrder2 from dictionary where vType=2 and vtitle='OrderClass' order by vOrder"
|
rs.open Sql,objConn,1,1
|
do while not rs.Eof
|
ClassName=replace(rs("vtext"),"调度单","地区")
|
OrdClassTypes = OrdClassTypes & rs("vOrder2") &","& ClassName & "|"
|
If CarOrdClass=rs("vOrder2") Then OrdClassName=ClassName
|
rs.movenext
|
Loop
|
rs.close()
|
OrdClassTypes = left(OrdClassTypes,len(OrdClassTypes)-1)
|
OrdClassTypesPS = SPLIT(OrdClassTypes,"|")
|
%>
|
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
|
<html xmlns="http://www.w3.org/1999/xhtml">
|
<head>
|
<title><%=LindemanAdmin%></title>
|
<!--#include virtual="/inc/ccs.gds"-->
|
</head>
|
<body onkeydown="xKeyEvent(event)">
|
<!--#INCLUDE FILE="menu_header.gds" -->
|
<!-- content -->
|
<div id="content">
|
<!--#INCLUDE FILE="Car_menu_left.gds" -->
|
<!-- content / right -->
|
<div id="right">
|
<!-- table -->
|
<div class="box">
|
<!-- box / title -->
|
<div class="title">
|
<h5>车辆资料管理</h5>
|
<ul class="links">
|
<li>
|
<div class="search">
|
<div id="OrdClass_container" class="select-container" style="overflow: hidden;cursor:pointer" onclick="JS_OrdClassType()">
|
<span class="select-content" style="width: 46px;">车辆地区：<%=OrdClassName%></span><span class="arrow" id="OrdClass_arrow"></span>
|
</div>
|
<div id="OrdClass_list" class="select-list scroll-pane" style="overflow: hidden; position: absolute; background-color: white; width: 77px; display: none;background-position: initial initial; background-repeat: initial initial;margin-left: 69px;">
|
<div class="jspContainer" style="width: 75px;">
|
<div style="padding: 0px; top: 0px; width: 80px;">
|
<%for z = 0 to UBOUND(OrdClassTypesPS)
|
OrdClassTypesPS1=SPLIT(OrdClassTypesPS(z),",")
|
vID=OrdClassTypesPS1(0)
|
vtext=OrdClassTypesPS1(1)
|
%>
|
<span title="<%=vtext%>" onmouseover="JS_OrdClassTypeMouseover('OrdClassType_<%=vID%>')" onclick="JS_OrdClassTypeJump('<%=vID%>')" id="OrdClassType_<%=vID%>" class="list-option<%if vID=OrdClassName then Response.Write " option"%>"><%=vtext%></span>
|
<%next%>
|
</div>
|
</div>
|
</div>
|
</div>
|
</li>
|
<li><a href="/CarData_Schedules.gds">车辆排序</a></li>
|
<li><a onclick="javascript:CarCreate.style.display='block';">新建</a></li>
|
<li><a onClick="form1_Car_update()">修改</a></li>
|
<li><a onClick="form1_Car_delete()">禁用</a></li>
|
</ul>
|
<script type="text/javascript">
|
|
//单据类型显示下拉菜单
|
function JS_OrdClassType(){
|
if (OrdClass_container.className!="select-container select-container-show-list"){
|
OrdClass_container.className="select-container select-container-show-list";
|
OrdClass_arrow.className="arrow arrow-up";
|
OrdClass_list.style.display="block";
|
Date_container.className="select-container";
|
Date_arrow.className="arrow";
|
Date_list.style.display="none";
|
OrdDateTypeCreate.style.display="none";
|
}
|
else {
|
OrdClass_container.className="select-container";
|
OrdClass_arrow.className="arrow";
|
OrdClass_list.style.display="none";
|
}
|
}
|
//单据类型指针移动到下拉菜单
|
function JS_OrdClassTypeMouseover(id){
|
var d=document.getElementById(id);
|
<%for z = 0 to UBOUND(OrdClassTypesPS)
|
OrdClassTypesPS1=SPLIT(OrdClassTypesPS(z),",")
|
vID=OrdClassTypesPS1(0)
|
vtext=OrdClassTypesPS1(1)
|
%>
|
document.getElementById("OrdClassType_<%=vID%>").className="list-option";
|
<%next%>
|
document.getElementById("OrdClassType_0").className="list-option";
|
d.className="list-option option";
|
}
|
//表列转跳
|
function JS_OrdClassTypeJump(id){
|
window.location.href='CarData.gds?CarOrdClass='+id;
|
|
}
|
|
</script>
|
<script LANGUAGE="javascript">
|
//修改车辆
|
function form1_Car_update(){
|
document.form1.action = "admin_save.gds";
|
document.form1.admin_save.value = "22";
|
form1.submit();
|
}
|
//禁用车辆
|
function form1_Car_delete(){
|
document.form1.action = "admin_save.gds";
|
document.form1.admin_save.value = "23";
|
form1.submit();
|
}
|
//选择修改车辆
|
function form1_Car_Edit(id){
|
if (document.getElementById('Show_CarModels_'+id).style.display=="none")
|
{
|
document.getElementById('Show_CarLicense_'+id).style.display='';
|
document.getElementById('Edit_CarLicense_'+id).style.display='none';
|
document.getElementById('Show_CarModels_'+id).style.display='';
|
document.getElementById('Edit_CarModels_'+id).style.display='none';
|
document.getElementById('Show_CarVIN_'+id).style.display='';
|
document.getElementById('Edit_CarVIN_'+id).style.display='none';
|
document.getElementById('Show_GPS_IMEI_'+id).style.display='';
|
document.getElementById('Edit_GPS_IMEI_'+id).style.display='none';
|
document.getElementById('Show_Video_ID_'+id).style.display='';
|
document.getElementById('Edit_Video_ID_'+id).style.display='none';
|
document.getElementById('Show_CarOrdClass_'+id).style.display='';
|
document.getElementById('Edit_CarOrdClass_'+id).style.display='none';
|
document.getElementById('Show_CarStateTXT_'+id).style.display='';
|
document.getElementById('Edit_CarStateTXT_'+id).style.display='none';
|
}
|
else
|
{
|
document.getElementById('Show_CarLicense_'+id).style.display='none';
|
document.getElementById('Edit_CarLicense_'+id).style.display='';
|
document.getElementById('Show_CarModels_'+id).style.display='none';
|
document.getElementById('Edit_CarModels_'+id).style.display='';
|
document.getElementById('Show_CarVIN_'+id).style.display='none';
|
document.getElementById('Edit_CarVIN_'+id).style.display='';
|
document.getElementById('Show_GPS_IMEI_'+id).style.display='none';
|
document.getElementById('Edit_GPS_IMEI_'+id).style.display='';
|
document.getElementById('Show_Video_ID_'+id).style.display='none';
|
document.getElementById('Edit_Video_ID_'+id).style.display='';
|
document.getElementById('Show_CarOrdClass_'+id).style.display='none';
|
document.getElementById('Edit_CarOrdClass_'+id).style.display='';
|
document.getElementById('Show_CarStateTXT_'+id).style.display='none';
|
document.getElementById('Edit_CarStateTXT_'+id).style.display='';
|
}
|
|
|
}
|
//新建车辆-关闭窗口
|
function JS_CarCreateClose()
|
{
|
CarCreate.style.display="none";
|
}
|
//新建车辆-保存
|
function JS_CarCreateSave()
|
{
|
form2.submit();
|
}
|
</script>
|
</div>
|
<div class="dialogJ dialogJfix dialogJshadow" id="CarCreate" style="width: 370px; right: 300px; top: 150px;display:none;">
|
<div class="dialogJtitle">
|
<a href="javascript:JS_CarCreateClose();" class="dialogJclose" title="关闭本窗口"> </a>
|
<span class="dialogJtxt" id="EditPhotoTXT">新建车辆资料</span>
|
</div>
|
<form id="form2" name="form2" action="admin_save.gds" method="post">
|
<input name="admin_save" type="hidden" value="21">
|
<div class="dialogJcontent">
|
<div class="dialogJbody" id="dialogJbody">
|
<div class="modify-album-name">
|
<p class="album-tips"></p>
|
<span>车牌：</span>
|
<input id="CarLicense" name="CarLicense" type="text" value="" maxlength="99/">
|
</div>
|
<div class="modify-album-name">
|
<p class="album-tips"></p>
|
<span>车型：</span>
|
<input id="CarModels" name="CarModels" type="text" value="" maxlength="99/">
|
</div>
|
<div class="modify-album-name">
|
<p class="album-tips"></p>
|
<span>车架号：</span>
|
<input id="CarVIN" name="CarVIN" type="text" value="" maxlength="99/" style="width: 248px;">
|
</div>
|
<div class="modify-album-name">
|
<p class="album-tips"></p>
|
<span>GPS设备IMEI：</span>
|
<input id="GPS_IMEI" name="GPS_IMEI" type="text" value="" maxlength="99/" style="width: 248px;">
|
</div>
|
<div class="modify-album-name">
|
<p class="album-tips"></p>
|
<span>视频监控设备号：</span>
|
<input id="Video_ID" name="Video_ID" type="text" value="" maxlength="99/" style="width: 248px;">
|
</div>
|
<div class="modify-album-name">
|
<p class="album-tips"></p>
|
<span>调度类型：</span>
|
<%for z = 0 to UBOUND(OrdClassTypesPS)
|
OrdClassTypesPS1=SPLIT(OrdClassTypesPS(z),",")
|
vID=OrdClassTypesPS1(0)
|
vtext=OrdClassTypesPS1(1)
|
%>
|
<input type="checkbox" id="CarOrdClass_<%=vID%>" value="<%=vID%>"<%If CStr(vID)=CStr(OrderClass) Then Response.Write " checked"%> name="CarOrdClass" style="margin: auto;width: 15px;"/>
|
<label for="CarOrdClass_<%=vID%>" style="line-height: 25px;"><%=vtext%></label>
|
<%If (z+1) mod 3=0 Then Response.Write "<br>"
|
next%>
|
</div>
|
</div>
|
</div>
|
</form>
|
<div class="dialogJanswers">
|
<input type="button" class="dialogJbtn first-child" onclick="JS_CarCreateSave()" value="确定">
|
<input type="button" class="dialogJbtn" onclick="JS_CarCreateClose()" value="取消">
|
</div>
|
</div>
|
<!-- end box / title -->
|
<%
|
If CarOrdClass<>"" Then
|
SearchSql=" and CarOrdClass like '%"&CarOrdClass&"%' "
|
End If
|
sql="select * from CarData where CarState>0"&SearchSql&" order by replace(CarOrdClass,'SA','1'),CarTop,CarID desc"
|
rs.open sql,objConn,1,1
|
if rs.eof then
|
SystemMessageType=2
|
SystemMessageTXT="数据库中相关无数据！"
|
end if
|
%>
|
<!--#include virtual="/inc/SystemMessages.gds" -->
|
<div class="table">
|
<form id="form1" name="form1" action="" method="post">
|
<input name="admin_save" type="hidden" value="22">
|
<table>
|
<thead>
|
<tr>
|
<th class="selected"><input type="checkbox" class="checkall" /></th>
|
<th>车牌</th>
|
<th>车型</th>
|
<th>车架号</th>
|
<th>GPS设备IMEI</th>
|
<th>视频设备号</th>
|
<th>调度类型</th>
|
<th>状态</th>
|
<th>监控</th>
|
<th class="last">二维码</th>
|
</tr>
|
</thead>
|
<tbody>
|
|
<%i=1
|
do while not rs.Eof
|
CarID = rs("CarID")
|
CarLicense = rs("CarLicense") '车牌
|
CarVIN = rs("CarVIN") '车架号
|
CarModels = rs("CarModels") '车型
|
GPS_IMEI = rs("GPS_IMEI") 'GPS设备IMEI
|
Video_ID = rs("Video_ID") '视频设备号
|
CarState = rs("CarState") '车辆状态(0禁用,1正常,2保养维修)
|
CarStateTXT = rs("CarStateTXT") '车辆状态(文字)
|
CarOrdClass = rs("CarOrdClass") '车辆所属调度类型
|
If CarState="1" Then
|
CarState="正常"
|
ElseIf CarState="2" Then
|
CarState="保养维修"
|
End If
|
CarOrdClassSP = SPLIT(CarOrdClass,",")
|
i=i+1
|
%>
|
<tr style="white-space: nowrap;">
|
<td class="selected"><input type="checkbox" id="CarID_<%=CarID%>" name="CarID" value="<%=CarID%>" onclick="javascript:form1_Car_Edit('<%=CarID%>')"/></td>
|
<td class="category" id="Show_CarLicense_<%=CarID%>"><A HREF="#"><%=CarLicense%></A></td>
|
<td class="category" id="Edit_CarLicense_<%=CarID%>" style="display:none;"><input id="CarLicense_<%=CarID%>" name="CarLicense_<%=CarID%>" class="small" style="width:120px;text-align: center;" value="<%=CarLicense%>" type="text"></td>
|
<td class="category" id="Show_CarModels_<%=CarID%>"><A HREF="#"><%=CarModels%></A></td>
|
<td class="category" id="Edit_CarModels_<%=CarID%>" style="display:none;"><input id="CarModels_<%=CarID%>" name="CarModels_<%=CarID%>" class="small" style="width:50px;text-align: center;" value="<%=CarModels%>" type="text"></td>
|
<td class="category" id="Show_CarVIN_<%=CarID%>"><%=CarVIN%></td>
|
<td class="category" id="Edit_CarVIN_<%=CarID%>" style="display:none;"><input id="CarVIN_<%=CarID%>" name="CarVIN_<%=CarID%>" class="small" style="width:150px;text-align: center;" value="<%=CarVIN%>" type="text"></td>
|
<td class="category" id="Show_GPS_IMEI_<%=CarID%>"><%=GPS_IMEI%></td>
|
<td class="category" id="Edit_GPS_IMEI_<%=CarID%>" style="display:none;"><input id="GPS_IMEI_<%=CarID%>" name="GPS_IMEI_<%=CarID%>" class="small" style="width:120px;text-align: center;" value="<%=GPS_IMEI%>" type="text"></td>
|
<td class="category" id="Show_Video_ID_<%=CarID%>"><%=Video_ID%></td>
|
<td class="category" id="Edit_Video_ID_<%=CarID%>" style="display:none;"><input id="Video_ID_<%=CarID%>" name="Video_ID_<%=CarID%>" class="small" style="width:120px;text-align: center;" value="<%=Video_ID%>" type="text"></td>
|
<td class="category" id="Show_CarOrdClass_<%=CarID%>">
|
<%for z = 0 to UBOUND(OrdClassTypesPS)
|
OrdClassTypesPS1=SPLIT(OrdClassTypesPS(z),",")
|
vID=OrdClassTypesPS1(0)
|
vtext=OrdClassTypesPS1(1)
|
for i = 0 to UBOUND(CarOrdClassSP)
|
If vID=Trim(CarOrdClassSP(i)) Then
|
Response.Write vtext&" "
|
If (i+1) mod 5=0 Then Response.Write "<br>"
|
End If
|
next
|
next%>
|
</td>
|
<td class="category" id="Edit_CarOrdClass_<%=CarID%>" style="display:none;">
|
<%for z = 0 to UBOUND(OrdClassTypesPS)
|
OrdClassTypesPS1=SPLIT(OrdClassTypesPS(z),",")
|
vID=OrdClassTypesPS1(0)
|
vtext=OrdClassTypesPS1(1)
|
OrderClass_is=""
|
for i = 0 to UBOUND(CarOrdClassSP)
|
If vID=Trim(CarOrdClassSP(i)) Then OrderClass_is="1"
|
next
|
%>
|
<input type="checkbox" id="CarOrdClass_<%=vID%>_<%=CarID%>" value="<%=vID%>" name="CarOrdClass_<%=CarID%>" style="margin: auto;"<%If OrderClass_is="1" Then Response.Write " checked=""checked"""%>/>
|
<label for="CarOrdClass_<%=vID%>_<%=CarID%>"><%=vtext%></label>
|
<%If (z+1) mod 5=0 Then Response.Write "<br>"
|
next%>
|
</td>
|
<td class="category" id="Show_CarStateTXT_<%=CarID%>"><%=CarStateTXT%></td>
|
<td class="category" id="Edit_CarStateTXT_<%=CarID%>" style="display:none;"><input id="CarStateTXT_<%=CarID%>" name="CarStateTXT_<%=CarID%>" class="small" style="width:150px;text-align: center;" value="<%=CarStateTXT%>" type="text"></td>
|
<td class="category"><%If Video_ID<>"" Then%><a href="/808gps/CarGPS.php?VidnoID=<%=Video_ID%>" target="_blank">实时定位</a> <a href="/808gps/video.php?Vidno_ID=<%=Video_ID%>" target="_blank">实时监控</a><%End If%></td>
|
<td class="category last"><a href="https://wx.966120.com.cn/wx_QR.asp?QR_Name=<%=CarLicense%>&QR_type=1&QR_Key=<%=CarID%>" target="_blank">查看二维码</a></td>
|
</tr>
|
<%rs.movenext
|
loop
|
rs.close()
|
%>
|
<%for j=i to 21%>
|
<tr>
|
<td class="selected"> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td class="last"> </td>
|
|
</tr>
|
<%next%>
|
</tbody>
|
</table>
|
|
</form>
|
</div>
|
</div>
|
<!-- end table -->
|
|
|
</div>
|
<!-- end content / right -->
|
</div>
|
<%if OrderClass<>"" then Response.Write "<script>CarCreate.style.display='block';</script>"%>
|
<!-- end content -->
|
<!--#include FILE="vicgame.asp"-->
|
</body>
|
</html>
|
