<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
|
<%Session.CodePage=65001%>
|
<!--#include virtual="/inc/chkadmin.gds"-->
|
<!--#include virtual="/inc/function.gds"-->
|
<%
|
searchTXT=trim(Request("searchTXT"))
|
ShopOrdMoney_is=trim(Request("ShopOrdMoney_is"))
|
If ShopOrdMoney_is="" Then ShopOrdMoney_is=0
|
order_type=trim(Request("order_type"))
|
If order_type="" Then order_type=7
|
ShopOrdType=order_type
|
DateStart=trim(Request("DateStart"))
|
DateEnd=trim(Request("DateEnd"))
|
|
|
|
page_URL="&searchTXT="&searchTXT&"&order_type="&order_type&"&ShopOrdMoney_is="&ShopOrdMoney_is&"&DateStart="&DateStart&"&DateEnd="&DateEnd
|
|
|
Set rs = Server.CreateObject("ADODB.Recordset")
|
|
'只能查询个人相关订单短信记录
|
If isDepartment("070107")=1 Then
|
If InStr(searchTXT,"DispatchOrdID:")=1 Then
|
DispatchOrdID=Mid(searchTXT,15)
|
ServiceOrdID=0
|
sql="select ServiceOrdIDDt from DispatchOrd where DispatchOrdID="&DispatchOrdID
|
rs.open sql,objConn,1,1
|
If not rs.eof Then
|
ServiceOrdID=rs("ServiceOrdIDDt")
|
End If
|
rs.close()
|
sql="select ServiceOrdID from ServiceOrder where ServiceOrdID="&ServiceOrdID&" and (((ServiceOrdPtOutHospID in (select HospID from HospData where HospOAID='"&session("adminID")&"' or HospOAID like '%,"&session("adminID")&",%') or ServiceOrdPtInHospID in (select HospID from HospData where HospOAID='"&session("adminID")&"' or HospOAID like '%,"&session("adminID")&",%')) and FromHQ_is=1) or ServiceOrdID in (select ServiceOrdIDDt from ServiceOrd_Message where MessageState=1 and MessageOAid="&session("adminID")&") or ServiceOrd_Sale_ID="&session("adminID")&") "
|
rs.open sql,objConn,1,1
|
if rs.eof Then
|
Response.Redirect "/"
|
Response.End()
|
End If
|
rs.close()
|
ElseIf InStr(searchTXT,"ServiceOrdID:")=1 Then
|
ServiceOrdID=Mid(searchTXT,14)
|
sql="select ServiceOrdID from ServiceOrder where ServiceOrdID="&ServiceOrdID&" and (((ServiceOrdPtOutHospID in (select HospID from HospData where HospOAID='"&session("adminID")&"' or HospOAID like '%,"&session("adminID")&",%') or ServiceOrdPtInHospID in (select HospID from HospData where HospOAID='"&session("adminID")&"' or HospOAID like '%,"&session("adminID")&",%')) and FromHQ_is=1) or ServiceOrdID in (select ServiceOrdIDDt from ServiceOrd_Message where MessageState=1 and MessageOAid="&session("adminID")&") or ServiceOrd_Sale_ID="&session("adminID")&") "
|
rs.open sql,objConn,1,1
|
if rs.eof Then
|
Response.Redirect "/"
|
Response.End()
|
End If
|
rs.close()
|
End If
|
End If
|
|
|
TitleTXT="短信发送记录"
|
|
'If isDepartment("080301")=0 Then Response.Redirect "/"
|
|
If searchTXT<>"" Then TitleTXT=TitleTXT&"--搜索 “"&searchTXT&"”"
|
|
'各种返回信息
|
SystemMessageType=trim(Request("SystemMessageType"))
|
SMT=trim(Request("SMT"))
|
SMT_Int=trim(Request("SMT_Int"))
|
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="请输入正确的金额!!"
|
end if
|
|
'短信模板
|
sql="select vtext,vOrder2 from dictionary where vtitle in ('SMS') and vType=1 order by id desc"
|
rs.open sql,objConn,1,1
|
SMS_dictionary="短信模板：<br>"
|
do while not rs.Eof
|
vtext = rs("vtext")
|
vOrder2 = rs("vOrder2")
|
vOrder2 = Replace(vOrder2," ","")
|
SMS_dictionary=SMS_dictionary&" <a onclick=JavaScript:document.getElementById('New_Send_Text').value='"&vOrder2&"';JS_SendText_Len();>"&vtext&"</a><br>"
|
rs.movenext
|
Loop
|
SMS_dictionary=SMS_dictionary&"<br>"
|
rs.close()
|
%>
|
<!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.7.1.min.js" type="text/javascript"></script>
|
<script type="text/javascript">
|
$(function () {
|
$("#div2").css("overflow-x", "scroll").height(16).width($("#div1").width()+20); //设置一个高度10的DIV2层 长度与DIV1层一致
|
$("#div2").html($("#div1").html()); //并给DIV2层填充内容
|
|
$("#div2").scroll(function () {
|
$("#div1")[0].scrollLeft = $("#div2")[0].scrollLeft; //拉动DIV2层滚动条，DIV1层滚动条同步被改变
|
});
|
});
|
</script>
|
</head>
|
<body onkeydown="xKeyEvent(event)">
|
<!--#INCLUDE FILE="menu_header.gds" -->
|
<!-- content -->
|
<div id="content">
|
<!--#INCLUDE FILE="Admin_menu_left.gds" -->
|
<!-- content / right -->
|
<div id="right">
|
<!-- table -->
|
<div class="box">
|
<!-- box / title -->
|
<div class="title">
|
<h5><%If searchTXT<>"" then%>短信发送记录查询 <%=searchTXT%><%else%>短信发送记录<%End if%></h5>
|
<ul class="links">
|
<%if isDepartment("080302")=1 And 1=2 then%><li><a href="SMS_dictionary.gds">短信模板管理</a></li><%end if%>
|
<%if isDepartment("080302")=1 And 1=2 then%><li><a onclick="JS_smsTosend('','')">短信发送</a></li><%end if%>
|
<script LANGUAGE="javascript">
|
//新建-关闭上传窗口
|
function JS_SMSCreateClose()
|
{
|
SMSCreate.style.display="none";
|
}
|
//新建字典-保存
|
function JS_SMSCreateSave()
|
{
|
formSMS.submit();
|
}
|
//显示发送短信窗口
|
function JS_smsTosend(Send_Phone,Send_Text)
|
{
|
var sTop=document.documentElement.scrollTop;
|
if (sTop==0) {sTop=document.body.scrollTop;}
|
var sLeft= document.documentElement.scrollLeft;
|
if (sLeft==0) {sLeft=document.body.scrollLeft;}
|
var dTop = document.getElementById("form1").getBoundingClientRect().top;
|
var dLeft = document.getElementById("form1").getBoundingClientRect().left;
|
if (dTop<200) {dTop=400;}
|
if (dLeft<120) {dLeft=500;}
|
SMSCreate.style.display="block";
|
SMSCreate.style.left=(dLeft+300)+"px";
|
SMSCreate.style.top=(sTop+dTop-200)+"px";
|
document.getElementById('New_Send_Phone').innerHTML = Send_Phone;
|
document.getElementById('New_Send_Text').innerHTML = Send_Text;
|
JS_SendText_Len();
|
document.formSMS.admin_save.value='96';
|
}
|
//输入字符数量
|
function JS_SendText_Len()
|
{
|
var smsAutograph=document.getElementById('smsAutograph').innerHTML;
|
var Send_Text=document.getElementById('New_Send_Text').value;
|
document.getElementById('Send_Text_Len').innerHTML = "<%=SMS_dictionary%>内容："+Send_Text.length+"个字符 + 签名"+smsAutograph.length+"个字符<br>共计："+(Send_Text.length+smsAutograph.length)+"个字符"
|
}
|
|
</script>
|
<div class="dialogJ dialogJfix dialogJshadow" id="SMSCreate" style="width:500px; right: 300px; top: 150px;display:none;">
|
|
<div class="dialogJtitle">
|
<a href="javascript:JS_SMSCreateClose();" class="dialogJclose" title="关闭本窗口"> </a>
|
<span class="dialogJtxt" id="EditPhotoTXT">短信发货</span>
|
</div>
|
<form id="formSMS" name="formSMS" action="admin_save.gds" method="post">
|
<input name="admin_save" type="hidden" value="96">
|
<input name="Send_Remarks" type="hidden" value="<%=Send_Remarks%>">
|
<input name="searchTXT" type="hidden" value="<%=searchTXT%>">
|
<input name="page" type="hidden" value="<%=request("page")%>">
|
<div class="dialogJcontent">
|
<div class="dialogJbody" id="dialogJbody">
|
<div class="modify-album-name" style="border-bottom: 1px solid #cdcdcd;padding: 10px 21px;">
|
<span>手机号码：</span>
|
<textarea name="Send_Phone" id="New_Send_Phone" style="width:200px;height:130px;"></textarea>
|
<span>同时对多个手机进行发送,<br>
|
每个手机号码占一行<br>
|
例如:<br>
|
13195606061<br>
|
13119560607</span>
|
</div>
|
<div class="modify-album-name" style="border-bottom: 1px solid #cdcdcd;padding: 0px 21px;">
|
<span>短信内容：</span>
|
<textarea name="Send_Text" id="New_Send_Text" style="width:200px;height:200px;" onKeyDown="JS_SendText_Len()" onKeyUp="JS_SendText_Len()"></textarea>
|
<span id="Send_Text_Len"><%=SMS_dictionary%>内容：4个字符 + 签名6个字符，<br>共计：10个字符</span>
|
</div>
|
<div class="modify-album-name" style="border-bottom: 1px solid #cdcdcd;padding: 0px 21px;">
|
<span>使用签名：</span>
|
<span id="smsAutograph">【医疗快线】</span>
|
|
</div>
|
</div>
|
</div>
|
</form>
|
<div class="dialogJanswers" style="padding: 10px 20px 13px 18px;">
|
<input type="button" id="formSMS_submit" class="dialogJbtn first-child" onclick="JS_SMSCreateSave()" value="发送">
|
<input type="button" class="dialogJbtn" onclick="JS_SMSCreateClose()" value="取消">
|
</div>
|
</div>
|
<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 = 20
|
acc2=0
|
acc3=0
|
|
if searchTXT<>"" Then
|
If InStr(searchTXT,"DispatchOrdID:")=1 Then
|
DispatchOrdID=Mid(searchTXT,15)
|
searchSql=" where Send_Remarks in (select 'ServiceOrdID:'+convert(nvarchar(10),ServiceOrdIDDt) from DispatchOrd where DispatchOrdID='"&DispatchOrdID&"') or Send_Remarks='DispatchOrdID:"&DispatchOrdID&"' "
|
ElseIf InStr(searchTXT,"ServiceOrdID:")=1 Then
|
ServiceOrdID=Mid(searchTXT,14)
|
searchSql=" where Send_Remarks in (select 'DispatchOrdID:'+convert(nvarchar(10),DispatchOrdID) from DispatchOrd where ServiceOrdIDDt='"&ServiceOrdID&"') or Send_Remarks='ServiceOrdID:"&ServiceOrdID&"' "
|
Else
|
searchSql=" where (Send_Phone like '%"&searchTXT&"%' or Send_Remarks='"&searchTXT&"') "
|
End If
|
|
end If
|
sql="select * from Sms_Log "&searchSql&" order by Send_ID 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" -->
|
<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="<%=request("page")%>">
|
<table>
|
<thead>
|
<tr style="white-space: nowrap;">
|
<th class="selected"><input type="checkbox" class="checkall" /></th>
|
<th>发送ID</th>
|
<th>发送时间</th>
|
<th>手机号码</th>
|
<th>短信内容</th>
|
<th>状态</th>
|
<th class="last">操作员</th>
|
</tr>
|
</thead>
|
<tbody>
|
|
<%i=1
|
do while not rs.Eof and i<=QuantityInt
|
Send_ID = rs("Send_ID")
|
Log_Id = rs("Log_Id")
|
Send_Text = rs("Send_Text")
|
Send_Time = rs("Send_Time")
|
Send_Phone = rs("Send_Phone")
|
Send_OA = rs("Send_OA")
|
Send_errMsg = rs("Send_errMsg")
|
|
i=i+1
|
%>
|
<tr>
|
<td class="selected"><input type="checkbox" id="CarRepairID_<%=Send_ID%>" name="ShopOrdID" value="<%=Send_ID%>" onclick="JS_CarRepairEdit('0','<%=ShopOrdID%>','<%=ShopOrdTypeTXT%>','<%=FORMATDATETIME(dtOrdDate,vbShortDate)%>','<%=PostageMoney+ConsumeMoney%>','<%=SalesmanName%>','<%=seller_memo%>','<%=AcceptMoney%>','','','');"/></td>
|
<td class="category category2"><%=Log_Id%></td>
|
<td class="category category2"><%=Send_Time%></td>
|
<td class="category category2"><%=Send_Phone%></td>
|
<td class="date category2" style="text-align: initial;"><%=Send_Text%></td>
|
<td class="category category2"><%=Send_errMsg%></td>
|
<td class="category category2 last"><%=OAUser(Send_OA,"UserName")%></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 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>
|
