<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
|
<%Session.CodePage=65001%>
|
<!--#include virtual="/inc/chkadmin.gds"-->
|
<!--#include virtual="/inc/function.gds"-->
|
<%
|
if isDepartment("0502")=0 then
|
Response.Redirect "/"
|
Response.End()
|
end If
|
|
searchTXT=SafeRequest(Request("searchTXT"))
|
|
Set rs = Server.CreateObject("ADODB.Recordset")
|
'默认显示字段
|
If OrdState="" Then OrdState=0
|
If OrdClassList="" Then OrdClassList="0"
|
If OrdClassList="0" Then
|
OrdClassName="未审核"
|
ElseIf OrdClassList="1" Then
|
OrdClassName="已审核"
|
Else
|
OrdClassName="全部"
|
End if
|
|
'各种返回信息
|
SystemMessageType=trim(Request("SystemMessageType"))
|
SMT=trim(Request("SMT"))
|
if SystemMessageType<>"" then
|
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
|
end if
|
|
|
If OrdState<>"0" then
|
OrdListName = ServiceOrdStateA(OrdState)&"记录"
|
Else
|
OrdListName = "会员积分流水记录"
|
End If
|
|
|
page_URL="&searchTXT="&searchTXT&""
|
%>
|
<!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"-->
|
<script src="js/jquery-1.12.3.min.js"></script>
|
</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><%If searchTXT<>"" then%>会员积分查询 <%=searchTXT%><%else%><%=OrdDateTypeName1&" "&OrdListName%><%End if%></h5>
|
<ul class="links">
|
<%If isDepartment("050201")=1 Then%>
|
<li>
|
</li>
|
<!--<li><a onclick="javascript:JS_CarRepairAdd();">新建</a></li>--><%End If%>
|
<%If isDepartment("050201")=1 Then%><li><a onClick="javascript:JS_CarRepairDel()">删除</a></li><%End If%>
|
<div class="search">
|
<form action="?" method="post">
|
<div class="input">
|
<input type="text" id="searchTXT" name="searchTXT" value="<%=searchTXT%>" />
|
</div>
|
<div class="button">
|
<input type="submit" name="submit" value="搜索" />
|
</div>
|
</form>
|
</div>
|
</ul>
|
</div>
|
<!-- end box / title -->
|
<%
|
acc1=request("page")
|
if acc1=empty then acc1=clng(1)
|
QuantityInt = 100
|
acc2=0
|
acc3=0
|
|
if searchTXT<>"" Then
|
searchSql=" and (CarLicense like '%"&searchTXT&"%' or MaintenanceItem like '%"&searchTXT&"%' or MaintenancePlace like '%"&searchTXT&"%') "
|
else
|
searchSql=""
|
end If
|
|
sql="select * from UserPoints where Points_State<>4"&searchSql&" order by Points_Time desc"
|
'Response.Write sql
|
rs.open sql,objConn,1,1
|
if not rs.eof then
|
rs.pagesize=QuantityInt
|
rs.absolutepage=acc1
|
acc2=rs.pagecount
|
acc3=rs.recordcount
|
else
|
SystemMessageType=2
|
SystemMessageTXT="数据库中相关无数据！"
|
end if
|
%>
|
<!--#include virtual="/inc/SystemMessages.gds" -->
|
<script>
|
//全选按钮点击事件
|
function allCheck(allBoxName,itemBoxName) {
|
|
if($("input[name="+allBoxName+"]").prop("checked")){
|
$("input[name=" + itemBoxName + "]").prop("checked",true);
|
} else {
|
$("input[name=" + itemBoxName + "]").prop("checked",false);
|
}
|
}
|
|
//子项按钮点击事件
|
function itemCheck(allBoxName,itemBoxName) {
|
var hasNoSel = false;
|
var itemBoxArray = $("input[name="+itemBoxName+"]");
|
itemBoxArray.each(function() {
|
if(!$(this).prop("checked")){
|
hasNoSel = true;
|
}
|
});
|
if(hasNoSel){
|
$("input[name="+allBoxName+"]").prop("checked",false);
|
} else {
|
$("input[name="+allBoxName+"]").prop("checked",true);
|
}
|
}
|
</script>
|
<div class="table" style="overflow:auto">
|
<form id="form1" name="form1" action="" method="post">
|
<input name="admin_save" type="hidden" value="52">
|
<input name="Car_Check" type="hidden" value="">
|
<input name="searchTXT" type="hidden" value="<%=searchTXT%>">
|
<input name="page" type="hidden" value="<%=acc1%>">
|
<table>
|
<thead>
|
<tr style="white-space: nowrap;">
|
<th class="selected"><input type="checkbox" class="checkall" name="checkAll" onclick="allCheck('checkAll','CarRepairID')"/></th>
|
<!--<th>单据编号</th>-->
|
<th>用户ID</th>
|
<th>积分</th>
|
<th>记录类型</th>
|
<th>记录时间</th>
|
<th>状态</th>
|
<th>Points_Value1</th>
|
<th>Points_Value2</th>
|
<th class="last">Points_Value3</th>
|
</tr>
|
</thead>
|
<tbody>
|
|
<%i=1
|
do while not rs.Eof and i<=QuantityInt
|
Pid = rs("Pid")
|
ToUserID = rs("ToUserID")
|
P_Score = rs("Points_Score") '积分
|
P_Type = rs("Points_Type")
|
P_Time = FormatDateTime(rs("Points_Time"),2)&" "&FormatDateTime(rs("Points_Time"),4)
|
P_State = rs("Points_State")
|
P_Value1 = rs("Points_Value1")
|
P_Value2 = rs("Points_Value2")
|
P_Value3 = rs("Points_Value3")
|
P_ServiceOrdIDDt= rs("ServiceOrdIDDt")
|
If P_Type="1" Then '1.消费积分：自己消费产生的积分（任务单号、任务时间、积分）
|
P_TypeName="获得消费积分"
|
ElseIf P_Type="2" Then '2.转入积分：别人转赠给你的积分（转让人、转入时间、积分）
|
P_TypeName="转入积分"
|
ElseIf P_Type="3" Then '3.推荐积分：推荐其他用户消费产生的积分（微信头像、微信昵称、下单时间、积分）
|
P_TypeName="推荐积分"
|
ElseIf P_Type="4" Then '4.积分提现：（提现方式、提现单号、处理状态、提现时间、积分）
|
P_TypeName="积分提现"
|
ElseIf P_Type="5" Then '5.转出积分：转赠给别人的积分（转让人、转入时间、积分）
|
P_TypeName="转出积分"
|
ElseIf P_Type="6" Then ''6.使用积分：自己使用的积分（任务单号、使用时间、积分）
|
P_TypeName="使用积分"
|
End If
|
If P_ServiceOrdIDDt<>"" And P_ServiceOrdIDDt<>"0" Then P_Value1="<a href=""/ServiceOrder.gds?ServiceOrdID="&P_ServiceOrdIDDt&""">"&P_Value1&"</a>"
|
i=i+1
|
|
%>
|
<tr style="white-space: nowrap;">
|
<td class="selected"><input type="checkbox" id="Pid_<%=Pid%>" name="Pid" value="<%=Pid%>" onclick="itemCheck('checkAll','CarRepairID')"/></td>
|
<!--
|
<td class="category category2"><A <%If isDepartment("050201")=1 Then%>onclick="JS_CarRepairEdit('<%=CarRepairID%>','<%=RepairCarID%>','<%=CarLicense%>','<%=RepairMileage%>','<%=MaintenanceItem%>','<%=ReplacementParts%>','<%=MaterialMoney%>','<%=ManHourMoney%>','<%=MaintenancePlace%>','<%=RepairDate%>');"<%End If%>>CR<%=Right("000000"&CarRepairID,6)%></A></td>
|
-->
|
<td class="category category2"><%=ToUserID%></td>
|
<td class="category category2"><%=P_Score%></td>
|
<td class="category category2"><%=P_TypeName%></td>
|
<td class="category category2"><%=P_Time%></td>
|
<td class="category category2"><%=P_State%></td>
|
<td class="category category2"><%=P_Value1%></td>
|
<td class="category category2"><%=P_Value2%></td>
|
<td class="category category2 last"><%=P_Value3%></td>
|
</tr>
|
<%rs.movenext
|
loop
|
rs.close()
|
%>
|
<%for j=i to 20%>
|
<tr>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td class="last"> </td>
|
</tr>
|
<%next%>
|
</tbody>
|
</table>
|
<!-- pagination -->
|
<div class="pagination pagination-left">
|
<div class="results">
|
<%
|
ShowingLeast = (acc1-1)*QuantityInt+1
|
ShowingMax = QuantityInt*acc1
|
if ShowingMax>acc3 then ShowingMax=acc3
|
%>
|
<span><%="显示 "& ShowingLeast &"-"& ShowingMax &" of "&acc3%></span>
|
</div>
|
<%if acc2>1 then%>
|
<ul class="pager">
|
<%if acc1=1 then%>
|
<li class="disabled">« 上页</li>
|
<%else%>
|
<li><a href="?page=<%=acc1-1%><%=page_URL%>">« 上页</a></li>
|
<%end if%>
|
<%
|
acc4=""
|
for i=1 to acc2
|
if acc2<=9 then
|
acc4=acc4&","&i
|
else
|
if i=1 then
|
acc4=acc4&","&i
|
elseif acc1<=5 and i<=7 then
|
acc4=acc4&","&i
|
elseif acc1>=acc2-4 and i>=acc2-6 then
|
acc4=acc4&","&i
|
elseif i>=acc1-2 and i<=acc1+2 then
|
acc4=acc4&","&i
|
elseif i=acc2 then
|
acc4=acc4&","&i
|
elseif i=2 or i=acc2-1 then
|
acc4=acc4&",0"
|
end if
|
end if
|
next
|
acc4SP=SPLIT(acc4,",")
|
for i = 1 to UBOUND(acc4SP)%>
|
<%if acc4SP(i)="0" then%>
|
<li class="separator">...</li>
|
<%elseif acc1=cint(acc4SP(i)) then%>
|
<li class="current"><%=acc4SP(i)%></li>
|
<%else%>
|
<li><a href="?page=<%=acc4SP(i)%><%=page_URL%>"><%=acc4SP(i)%></a></li>
|
<%end if%>
|
<%next%>
|
<%if acc1>=acc2 then%>
|
<li class="disabled">下页 »</li>
|
<%else%>
|
<li><a href="?page=<%=acc1+1%><%=page_URL%>">下页 »</a></li>
|
<%end if%>
|
</ul>
|
<%end if%>
|
</div>
|
<!-- end pagination -->
|
</form>
|
</div>
|
</div>
|
<!-- end table -->
|
|
|
|
</div>
|
<!-- end content / right -->
|
</div>
|
<!-- end content -->
|
<!--#include FILE="vicgame.asp"-->
|
<IFRAME id="HiddenFrame" name="HiddenFrame" WIDTH=0 HEIGHT=0 MARGINWIDTH=0 MARGINHEIGHT=0 HSPACE=0 VSPACE=0 FRAMEBORDER=0 SCROLLING=no BORDERCOLOR=#ffffff></IFRAME>
|
</body>
|
</html>
|
