<!--#include virtual="/inc/conn.asp"-->
<!--#include virtual="/inc/chkuser.asp"-->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title><%=webname%>-自收查看</title>
<%
call lognameadmin()
call logquanxian("d1",1)

'if getistel="wap" then response.Redirect "admindd_zishou2.asp"

set rsj=server.CreateObject("adodb.recordset")



%>

<body onload=startclock()>
<script language="JavaScript">
var timerID = null;
var timerRunning = false;
function stopclock (){
if(timerRunning)
clearTimeout(timerID);
timerRunning = false;}
function startclock () {
stopclock();
showtime();}
function showtime () {
var now = new Date();
var hours = now.getHours();
var minutes = now.getMinutes();
var seconds = now.getSeconds()
//var timeValue = now.getYear()+"年"+(now.getMonth()+1)+"月"+now.getDate()+"日" +((hours >= 12) ? " 下午 " : " 上午 " )
var timeValue ='';
timeValue += (hours)
timeValue += ((minutes < 10) ? ":0" : ":") + minutes
timeValue += ((seconds < 10) ? ":0" : ":") + seconds
thetime.innerHTML = timeValue;
timerID = setTimeout("showtime()",1000);
timerRunning = true;}
</script>

<STYLE>
body,td,th {
	font-size: 11px;
}
a:link {
	text-decoration: none;
}
a:visited {
	text-decoration: none;
}
a:hover {
	text-decoration: none;
}
a:active {
	text-decoration: none;
}
</STYLE>



<%
if request.QueryString("uid")<>"" then uid=request.QueryString("uid")
aact=request.QueryString("aact")



act=request.QueryString("act")

if act="one" then 
response.Cookies("dateaa")=""
response.Cookies("datebb")=""
response.Cookies("dingdan")=""
response.Cookies("shangid")=""
response.Cookies("zhuangtai")=""
response.Cookies("youhui")=""
response.Cookies("ddip")=""
response.Cookies("aylxxuid")=""
end if

%>
<script language="JavaScript">
var timerID = null;
var timerRunning = false;
function stopclock (){
if(timerRunning)
clearTimeout(timerID);
timerRunning = false;}
function startclock () {
stopclock();
showtime();}
function showtime () {
var now = new Date();
var hours = now.getHours();
var minutes = now.getMinutes();
var seconds = now.getSeconds()
//var timeValue = now.getYear()+"年"+(now.getMonth()+1)+"月"+now.getDate()+"日" +((hours >= 12) ? " 下午 " : " 上午 " )
var timeValue ='';
timeValue += (hours)
timeValue += ((minutes < 10) ? ":0" : ":") + minutes
timeValue += ((seconds < 10) ? ":0" : ":") + seconds
thetime.innerHTML = timeValue;
timerID = setTimeout("showtime()",1000);
timerRunning = true;}
</script>

<div style="text-align:center;font-size:35px;" ><span id="thetime"></span></div>
<br>

<table width="100%" border="0">
  <tr>
    <td valign="top" width="25%" style="border-right:#F60 solid 1px;">

<table width="740" border="0" cellpadding="0" cellspacing="0">
    <tr style="background-color:#F0F0F0">
      <th height="20" align="center">订单        
        <th align="center">总价
          <th align="center">渠道        
          <th align="center">收款账号        
          <th align="center">方式   
          <th align="center">时间      
        <th align="center">在线状态</tr>
  <%
sql="select * from aydingdan where datediff(minute,aydingdansj,'"&now()&"')<=6 and (qudao='自收' or qudao='平台代收') and ddchaoshi=0 and aydingdanzt=0 order by aydingdanid desc" 
rs.open sql,conn,1,1
if not(rs.bof and rs.eof) then
do while not rs.eof%>
    <tr>
      <td height="26" align="center"><%=trim(rs("aydingdansum"))%></td>
      <td align="center" style="color: #FF0000;"><%=Formatnumber(rs("aydigndanyf"),2,true,-1,0)%></td>
      <td align="center">
        <%
		jjhjin=ccur(rs("aydigndanyf"))+ccur(rs("jjjzj"))/100
		response.Write "<span style=color:#30F>"

		if cint(rs("aydingdanzt"))=0 then%>
        
<a onClick="javascript:return confirm('您确定要将<%=jjhjin%>订单转成功吗？');" style="color:#30F" href="adminmydingdanok.asp?id=<%=trim(rs("aydingdansum"))%>&did=<%=rs("aydingdanid")%>&ddku=aydingdan" target=_blank>加<%= Formatnumber(jjhjin,2,true,-1,0)%></a>
        
<a onClick="javascript:return confirm('您确定<%=jjhjin%>该订单改变状态吗？');" style="color:#F00" href="adminmydingdanok.asp?act=zishoushibai&id=<%=trim(rs("aydingdansum"))%>&did=<%=rs("aydingdanid")%>&ddku=aydingdan" target=_blank>错</a>
        
<a onClick="javascript:return confirm('您确定<%=jjhjin%>该订单关闭吗？');" style="color:#F00" href="adminmydingdanok.asp?act=zishouoff&id=<%=trim(rs("aydingdansum"))%>&did=<%=rs("aydingdanid")%>&ddku=aydingdan" target=_blank>关</a>
        
        <%
		end if
		response.Write "</span>"
		%>
        </td>
      <td align="center">
        <%
		if cint(rs("ayddzffangshi"))=2 then 
		response.Write "<img src=/images/jz.gif width=16 border=0 align=absmiddle><span style=color:#09F>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=4 then 
		response.Write "<img src=/images/jw.gif width=16 border=0 align=absmiddle><span style=color:#090>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=5 then 
		response.Write "<img src=/images/q.gif width=16 border=0 align=absmiddle><span style=color:#6C9>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=10 then 
		response.Write "<img src=/images/jz.gif width=16 border=0 align=absmiddle><span style=color:#F3C>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=13 then 
		response.Write "<img src=/images/jw.gif width=16 border=0 align=absmiddle><span style=color:#F3C>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=14 then 
		response.Write "<img src=/images/q.gif width=16 border=0 align=absmiddle><span style=color:#F3C>"&trim(rs("zishoufs"))&"</span>"
		else
		response.Write trim(rs("ayddpid"))
		end if
		%></td>
      <td align="center"><%=rs("ayddcontact")%></td>
      <td align="center">
	<%=TimeValue(rs("aydingdansj"))%>
        </td>
      <td align="center">
        <%
        set rst=server.CreateObject("adodb.recordset")
        sqlt="select top 1 * from ddlasttime where ddhao='"&trim(rs("aydingdansum"))&"' order by ddlid desc" 
        rst.open sqlt,conn,1,3
        if not(rst.bof and rst.eof) then
        ddtime=rst("ddtime") 
		ddtime2=rst("ddtime2")
			if ddtime<>ddtime2 then
			rst("ddtime2")=ddtime
			rst.update
			response.Write "<span style=color:#390>"&TimeValue(ddtime)&"-在线</span>"
			else
			response.Write "<span style=color:#666>"&TimeValue(ddtime)&"-离线</span>"
			end if
			'response.Write "<br>"&ddtime&"<br>"&ddtime2
        end if
        rst.close
        %>
      </td>
      </tr>
  <%
rs.movenext
loop
end if
rs.close%>
    </table>

    </td>
    
    
    
    
    <td valign="top"  width="25%" style="border-right:#F60 solid 1px;">
      
      
  <table width="740" border="0" cellpadding="0" cellspacing="0">
    <tr style="background-color:#F0F0F0">
      <th height="20" align="center">订单        
        <th align="center">总价
          <th align="center">渠道        
          <th align="center">收款账号        
          <th align="center">方式   
          <th align="center">时间      
        <th align="center">在线状态</tr>
  <%
sql="select * from aydingdan01 where datediff(minute,aydingdansj,'"&now()&"')<=6 and (qudao='自收' or qudao='平台代收') and ddchaoshi=0 and aydingdanzt=0 order by aydingdanid desc" 
rs.open sql,conn,1,1
if not(rs.bof and rs.eof) then
do while not rs.eof%>
    <tr>
      <td height="26" align="center"><%=trim(rs("aydingdansum"))%></td>
      <td align="center" style="color: #FF0000;"><%=Formatnumber(rs("aydigndanyf"),2,true,-1,0)%></td>
      <td align="center">
        <%
		jjhjin=ccur(rs("aydigndanyf"))+ccur(rs("jjjzj"))/100
		response.Write "<span style=color:#30F>"

		if cint(rs("aydingdanzt"))=0 then%>
        
<a onClick="javascript:return confirm('您确定要将<%=jjhjin%>订单转成功吗？');" style="color:#30F" href="adminmydingdanok.asp?act=zishouok&id=<%=trim(rs("aydingdansum"))%>&did=<%=rs("aydingdanid")%>&ddku=aydingdan" target=_blank>加<%= Formatnumber(jjhjin,2,true,-1,0)%></a>
        
<a onClick="javascript:return confirm('您确定<%=jjhjin%>该订单改变状态吗？');" style="color:#F00" href="adminmydingdanok.asp?act=zishoushibai&id=<%=trim(rs("aydingdansum"))%>&did=<%=rs("aydingdanid")%>&ddku=aydingdan01" target=_blank>错</a>
        
<a onClick="javascript:return confirm('您确定<%=jjhjin%>该订单关闭吗？');" style="color:#F00" href="adminmydingdanok.asp?act=zishouoff&id=<%=trim(rs("aydingdansum"))%>&did=<%=rs("aydingdanid")%>&ddku=aydingdan01" target=_blank>关</a>
        
        <%
		end if
		response.Write "</span>"
		%>
        </td>
      <td align="center">
        <%
		if cint(rs("ayddzffangshi"))=2 then 
		response.Write "<img src=/images/jz.gif width=16 border=0 align=absmiddle><span style=color:#09F>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=4 then 
		response.Write "<img src=/images/jw.gif width=16 border=0 align=absmiddle><span style=color:#090>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=5 then 
		response.Write "<img src=/images/q.gif width=16 border=0 align=absmiddle><span style=color:#6C9>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=10 then 
		response.Write "<img src=/images/jz.gif width=16 border=0 align=absmiddle><span style=color:#F3C>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=13 then 
		response.Write "<img src=/images/jw.gif width=16 border=0 align=absmiddle><span style=color:#F3C>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=14 then 
		response.Write "<img src=/images/q.gif width=16 border=0 align=absmiddle><span style=color:#F3C>"&trim(rs("zishoufs"))&"</span>"
		else
		response.Write trim(rs("ayddpid"))
		end if
		%></td>
      <td align="center"><%=rs("ayddcontact")%></td>
      <td align="center">
		<%=TimeValue(rs("aydingdansj"))%>
        </td>
      <td align="center">
        <%
        set rst=server.CreateObject("adodb.recordset")
        sqlt="select top 1 * from ddlasttime where ddhao='"&trim(rs("aydingdansum"))&"' order by ddlid desc" 
        rst.open sqlt,conn,1,3
        if not(rst.bof and rst.eof) then
        ddtime=rst("ddtime")
		ddtime2=rst("ddtime2")
			if ddtime<>ddtime2 then
			rst("ddtime2")=ddtime
			rst.update
			response.Write "<span style=color:#390>"&TimeValue(ddtime)&"-在线</span>"
			else
			response.Write "<span style=color:#666>"&TimeValue(ddtime)&"-离线</span>"
			end if
			'response.Write "<br>"&ddtime&"<br>"&ddtime2
        end if
        rst.close
        %>
      </td>
      </tr>
  <%
rs.movenext
loop
end if
rs.close%>
    </table>    
    </td>
  </tr>
</table>
<br>
<table width="100%" border="0">
  <tr>
    <td valign="top"  width="25%" style="border-right:#F60 solid 1px;">
    
<table width="740" border="0" cellpadding="0" cellspacing="0">
    <tr style="background-color:#F0F0F0">
      <th height="20" align="center">订单        
        <th align="center">总价
          <th align="center">渠道        
          <th align="center">收款账号        
          <th align="center">方式   
          <th align="center">时间      
        <th align="center">在线状态</tr>
  <%
sql="select * from aydingdan02 where datediff(minute,aydingdansj,'"&now()&"')<=6 and (qudao='自收' or qudao='平台代收') and ddchaoshi=0 and aydingdanzt=0 order by aydingdanid desc" 
rs.open sql,conn,1,1
if not(rs.bof and rs.eof) then
do while not rs.eof%>
    <tr>
      <td height="26" align="center"><%=trim(rs("aydingdansum"))%></td>
      <td align="center" style="color: #FF0000;"><%=Formatnumber(rs("aydigndanyf"),2,true,-1,0)%></td>
      <td align="center">
        <%
		jjhjin=ccur(rs("aydigndanyf"))+ccur(rs("jjjzj"))/100
		response.Write "<span style=color:#30F>"

		if cint(rs("aydingdanzt"))=0 then%>
        
<a onClick="javascript:return confirm('您确定要将<%=jjhjin%>订单转成功吗？');" style="color:#30F" href="adminmydingdanok.asp?id=<%=trim(rs("aydingdansum"))%>&did=<%=rs("aydingdanid")%>&ddku=aydingdan" target=_blank>加<%= Formatnumber(jjhjin,2,true,-1,0)%></a>
        
<a onClick="javascript:return confirm('您确定<%=jjhjin%>该订单改变状态吗？');" style="color:#F00" href="adminmydingdanok.asp?act=zishoushibai&id=<%=trim(rs("aydingdansum"))%>&did=<%=rs("aydingdanid")%>&ddku=aydingdan02" target=_blank>错</a>
        
<a onClick="javascript:return confirm('您确定<%=jjhjin%>该订单关闭吗？');" style="color:#F00" href="adminmydingdanok.asp?act=zishouoff&id=<%=trim(rs("aydingdansum"))%>&did=<%=rs("aydingdanid")%>&ddku=aydingdan02" target=_blank>关</a>
        
        <%
		end if
		response.Write "</span>"
		%>
        </td>
      <td align="center">
        <%
		if cint(rs("ayddzffangshi"))=2 then 
		response.Write "<img src=/images/jz.gif width=16 border=0 align=absmiddle><span style=color:#09F>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=4 then 
		response.Write "<img src=/images/jw.gif width=16 border=0 align=absmiddle><span style=color:#090>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=5 then 
		response.Write "<img src=/images/q.gif width=16 border=0 align=absmiddle><span style=color:#6C9>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=10 then 
		response.Write "<img src=/images/jz.gif width=16 border=0 align=absmiddle><span style=color:#F3C>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=13 then 
		response.Write "<img src=/images/jw.gif width=16 border=0 align=absmiddle><span style=color:#F3C>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=14 then 
		response.Write "<img src=/images/q.gif width=16 border=0 align=absmiddle><span style=color:#F3C>"&trim(rs("zishoufs"))&"</span>"
		else
		response.Write trim(rs("ayddpid"))
		end if
		%></td>
      <td align="center"><%=rs("ayddcontact")%></td>
      <td align="center">
<%=TimeValue(rs("aydingdansj"))%>
        </td>
      <td align="center">
        <%
        set rst=server.CreateObject("adodb.recordset")
        sqlt="select top 1 * from ddlasttime where ddhao='"&trim(rs("aydingdansum"))&"' order by ddlid desc" 
        rst.open sqlt,conn,1,3
        if not(rst.bof and rst.eof) then
        ddtime=rst("ddtime")
		ddtime2=rst("ddtime2")
			if ddtime<>ddtime2 then
			rst("ddtime2")=ddtime
			rst.update
			response.Write "<span style=color:#390>"&TimeValue(ddtime)&"-在线</span>"
			else
			response.Write "<span style=color:#666>"&TimeValue(ddtime)&"-离线</span>"
			end if
			'response.Write "<br>"&ddtime&"<br>"&ddtime2
        end if
        rst.close
        %>
      </td>
      </tr>
  <%
rs.movenext
loop
end if
rs.close%>
    </table>
    
    </td>
    
    
    
    
    <td valign="top"  width="25%" style="border-right:#F60 solid 1px;">

<table width="740" border="0" cellpadding="0" cellspacing="0">
    <tr style="background-color:#F0F0F0">
      <th height="20" align="center">订单        
        <th align="center">总价
          <th align="center">渠道        
          <th align="center">收款账号        
          <th align="center">方式   
          <th align="center">时间      
        <th align="center">在线状态</tr>
  <%
sql="select * from aydingdan03 where datediff(minute,aydingdansj,'"&now()&"')<=6 and (qudao='自收' or qudao='平台代收') and ddchaoshi=0 and aydingdanzt=0 order by aydingdanid desc" 
rs.open sql,conn,1,1
if not(rs.bof and rs.eof) then
do while not rs.eof%>
    <tr>
      <td height="26" align="center"><%=trim(rs("aydingdansum"))%></td>
      <td align="center" style="color: #FF0000;"><%=Formatnumber(rs("aydigndanyf"),2,true,-1,0)%></td>
      <td align="center">
        <%
		jjhjin=ccur(rs("aydigndanyf"))+ccur(rs("jjjzj"))/100
		response.Write "<span style=color:#30F>"

		if cint(rs("aydingdanzt"))=0 then%>
        
<a onClick="javascript:return confirm('您确定要将<%=jjhjin%>订单转成功吗？');" style="color:#30F" href="adminmydingdanok.asp?id=<%=trim(rs("aydingdansum"))%>&did=<%=rs("aydingdanid")%>&ddku=aydingdan" target=_blank>加<%= Formatnumber(jjhjin,2,true,-1,0)%></a>
        
<a onClick="javascript:return confirm('您确定<%=jjhjin%>该订单改变状态吗？');" style="color:#F00" href="adminmydingdanok.asp?act=zishoushibai&id=<%=trim(rs("aydingdansum"))%>&did=<%=rs("aydingdanid")%>&ddku=aydingdan03" target=_blank>错</a>
        
<a onClick="javascript:return confirm('您确定<%=jjhjin%>该订单关闭吗？');" style="color:#F00" href="adminmydingdanok.asp?act=zishouoff&id=<%=trim(rs("aydingdansum"))%>&did=<%=rs("aydingdanid")%>&ddku=aydingdan03" target=_blank>关</a>
        
        <%
		end if
		response.Write "</span>"
		%>
        </td>
      <td align="center">
        <%
		if cint(rs("ayddzffangshi"))=2 then 
		response.Write "<img src=/images/jz.gif width=16 border=0 align=absmiddle><span style=color:#09F>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=4 then 
		response.Write "<img src=/images/jw.gif width=16 border=0 align=absmiddle><span style=color:#090>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=5 then 
		response.Write "<img src=/images/q.gif width=16 border=0 align=absmiddle><span style=color:#6C9>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=10 then 
		response.Write "<img src=/images/jz.gif width=16 border=0 align=absmiddle><span style=color:#F3C>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=13 then 
		response.Write "<img src=/images/jw.gif width=16 border=0 align=absmiddle><span style=color:#F3C>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=14 then 
		response.Write "<img src=/images/q.gif width=16 border=0 align=absmiddle><span style=color:#F3C>"&trim(rs("zishoufs"))&"</span>"
		else
		response.Write trim(rs("ayddpid"))
		end if
		%></td>
      <td align="center"><%=rs("ayddcontact")%></td>
      <td align="center">
<%=TimeValue(rs("aydingdansj"))%>
        </td>
      <td align="center">
        <%
        set rst=server.CreateObject("adodb.recordset")
        sqlt="select top 1 * from ddlasttime where ddhao='"&trim(rs("aydingdansum"))&"' order by ddlid desc" 
        rst.open sqlt,conn,1,3
        if not(rst.bof and rst.eof) then
        ddtime=rst("ddtime")
		ddtime2=rst("ddtime2")
			if ddtime<>ddtime2 then
			rst("ddtime2")=ddtime
			rst.update
			response.Write "<span style=color:#390>"&TimeValue(ddtime)&"-在线</span>"
			else
			response.Write "<span style=color:#666>"&TimeValue(ddtime)&"-离线</span>"
			end if
			'response.Write "<br>"&ddtime&"<br>"&ddtime2
        end if
        rst.close
        %>
      </td>
      </tr>
  <%
rs.movenext
loop
end if
rs.close%>
    </table>
    
    </td>
  </tr>
</table>




<br>
<table width="100%" border="0">
  <tr>
    <td valign="top"  width="25%" style="border-right:#F60 solid 1px;">
    
<table width="740" border="0" cellpadding="0" cellspacing="0">
    <tr style="background-color:#F0F0F0">
      <th height="20" align="center">订单        
        <th align="center">总价
          <th align="center">渠道        
          <th align="center">收款账号        
          <th align="center">方式   
          <th align="center">时间      
        <th align="center">在线状态</tr>
  <%
sql="select * from aydingdan04 where datediff(minute,aydingdansj,'"&now()&"')<=6 and (qudao='自收' or qudao='平台代收') and ddchaoshi=0 and aydingdanzt=0 order by aydingdanid desc" 
rs.open sql,conn,1,1
if not(rs.bof and rs.eof) then
do while not rs.eof%>
    <tr>
      <td height="26" align="center"><%=trim(rs("aydingdansum"))%></td>
      <td align="center" style="color: #FF0000;"><%=Formatnumber(rs("aydigndanyf"),2,true,-1,0)%></td>
      <td align="center">
        <%
		jjhjin=ccur(rs("aydigndanyf"))+ccur(rs("jjjzj"))/100
		response.Write "<span style=color:#30F>"

		if cint(rs("aydingdanzt"))=0 then%>
        
<a onClick="javascript:return confirm('您确定要将<%=jjhjin%>订单转成功吗？');" style="color:#30F" href="adminmydingdanok.asp?id=<%=trim(rs("aydingdansum"))%>&did=<%=rs("aydingdanid")%>&ddku=aydingdan" target=_blank>加<%= Formatnumber(jjhjin,2,true,-1,0)%></a>
        
<a onClick="javascript:return confirm('您确定<%=jjhjin%>该订单改变状态吗？');" style="color:#F00" href="adminmydingdanok.asp?act=zishoushibai&id=<%=trim(rs("aydingdansum"))%>&did=<%=rs("aydingdanid")%>&ddku=aydingdan04" target=_blank>错</a>
        
<a onClick="javascript:return confirm('您确定<%=jjhjin%>该订单关闭吗？');" style="color:#F00" href="adminmydingdanok.asp?act=zishouoff&id=<%=trim(rs("aydingdansum"))%>&did=<%=rs("aydingdanid")%>&ddku=aydingdan04" target=_blank>关</a>
        
        <%
		end if
		response.Write "</span>"
		%>
        </td>
      <td align="center">
        <%
		if cint(rs("ayddzffangshi"))=2 then 
		response.Write "<img src=/images/jz.gif width=16 border=0 align=absmiddle><span style=color:#09F>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=4 then 
		response.Write "<img src=/images/jw.gif width=16 border=0 align=absmiddle><span style=color:#090>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=5 then 
		response.Write "<img src=/images/q.gif width=16 border=0 align=absmiddle><span style=color:#6C9>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=10 then 
		response.Write "<img src=/images/jz.gif width=16 border=0 align=absmiddle><span style=color:#F3C>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=13 then 
		response.Write "<img src=/images/jw.gif width=16 border=0 align=absmiddle><span style=color:#F3C>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=14 then 
		response.Write "<img src=/images/q.gif width=16 border=0 align=absmiddle><span style=color:#F3C>"&trim(rs("zishoufs"))&"</span>"
		else
		response.Write trim(rs("ayddpid"))
		end if
		%></td>
      <td align="center"><%=rs("ayddcontact")%></td>
      <td align="center">
<%=TimeValue(rs("aydingdansj"))%>
        </td>
      <td align="center">
        <%
        set rst=server.CreateObject("adodb.recordset")
        sqlt="select top 1 * from ddlasttime where ddhao='"&trim(rs("aydingdansum"))&"' order by ddlid desc" 
        rst.open sqlt,conn,1,3
        if not(rst.bof and rst.eof) then
        ddtime=rst("ddtime")
		ddtime2=rst("ddtime2")
			if ddtime<>ddtime2 then
			rst("ddtime2")=ddtime
			rst.update
			response.Write "<span style=color:#390>"&TimeValue(ddtime)&"-在线</span>"
			else
			response.Write "<span style=color:#666>"&TimeValue(ddtime)&"-离线</span>"
			end if
			'response.Write "<br>"&ddtime&"<br>"&ddtime2
        end if
        rst.close
        %>
      </td>
      </tr>
  <%
rs.movenext
loop
end if
rs.close%>
    </table>
    
    </td>
    
    
    
    
    <td valign="top"  width="25%" style="border-right:#F60 solid 1px;">
    
<table width="740" border="0" cellpadding="0" cellspacing="0">
    <tr style="background-color:#F0F0F0">
      <th height="20" align="center">订单        
        <th align="center">总价
          <th align="center">渠道        
          <th align="center">收款账号        
          <th align="center">方式   
          <th align="center">时间      
        <th align="center">在线状态</tr>
  <%
sql="select * from aydingdan05 where datediff(minute,aydingdansj,'"&now()&"')<=6 and (qudao='自收' or qudao='平台代收') and ddchaoshi=0 and aydingdanzt=0 order by aydingdanid desc" 
rs.open sql,conn,1,1
if not(rs.bof and rs.eof) then
do while not rs.eof%>
    <tr>
      <td height="26" align="center"><%=trim(rs("aydingdansum"))%></td>
      <td align="center" style="color: #FF0000;"><%=Formatnumber(rs("aydigndanyf"),2,true,-1,0)%></td>
      <td align="center">
        <%
		jjhjin=ccur(rs("aydigndanyf"))+ccur(rs("jjjzj"))/100
		response.Write "<span style=color:#30F>"

		if cint(rs("aydingdanzt"))=0 then%>
        
<a onClick="javascript:return confirm('您确定要将<%=jjhjin%>订单转成功吗？');" style="color:#30F" href="adminmydingdanok.asp?id=<%=trim(rs("aydingdansum"))%>&did=<%=rs("aydingdanid")%>&ddku=aydingdan" target=_blank>加<%= Formatnumber(jjhjin,2,true,-1,0)%></a>
        
<a onClick="javascript:return confirm('您确定<%=jjhjin%>该订单改变状态吗？');" style="color:#F00" href="adminmydingdanok.asp?act=zishoushibai&id=<%=trim(rs("aydingdansum"))%>&did=<%=rs("aydingdanid")%>&ddku=aydingdan05" target=_blank>错</a>
        
<a onClick="javascript:return confirm('您确定<%=jjhjin%>该订单关闭吗？');" style="color:#F00" href="adminmydingdanok.asp?act=zishouoff&id=<%=trim(rs("aydingdansum"))%>&did=<%=rs("aydingdanid")%>&ddku=aydingdan05" target=_blank>关</a>
        
        <%
		end if
		response.Write "</span>"
		%>
        </td>
      <td align="center">
        <%
		if cint(rs("ayddzffangshi"))=2 then 
		response.Write "<img src=/images/jz.gif width=16 border=0 align=absmiddle><span style=color:#09F>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=4 then 
		response.Write "<img src=/images/jw.gif width=16 border=0 align=absmiddle><span style=color:#090>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=5 then 
		response.Write "<img src=/images/q.gif width=16 border=0 align=absmiddle><span style=color:#6C9>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=10 then 
		response.Write "<img src=/images/jz.gif width=16 border=0 align=absmiddle><span style=color:#F3C>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=13 then 
		response.Write "<img src=/images/jw.gif width=16 border=0 align=absmiddle><span style=color:#F3C>"&trim(rs("zishoufs"))&"</span>"
		elseif cint(rs("ayddzffangshi"))=14 then 
		response.Write "<img src=/images/q.gif width=16 border=0 align=absmiddle><span style=color:#F3C>"&trim(rs("zishoufs"))&"</span>"
		else
		response.Write trim(rs("ayddpid"))
		end if
		%></td>
      <td align="center"><%=rs("ayddcontact")%></td>
      <td align="center">
<%=TimeValue(rs("aydingdansj"))%>
        </td>
      <td align="center">
        <%
        set rst=server.CreateObject("adodb.recordset")
        sqlt="select top 1 * from ddlasttime where ddhao='"&trim(rs("aydingdansum"))&"' order by ddlid desc" 
        rst.open sqlt,conn,1,3
        if not(rst.bof and rst.eof) then
        ddtime=rst("ddtime")
		ddtime2=rst("ddtime2")
			if ddtime<>ddtime2 then
			rst("ddtime2")=ddtime
			rst.update
			response.Write "<span style=color:#390>"&TimeValue(ddtime)&"-在线</span>"
			else
			response.Write "<span style=color:#666>"&TimeValue(ddtime)&"-离线</span>"
			end if
			'response.Write "<br>"&ddtime&"<br>"&ddtime2
        end if
        rst.close
        %>
      </td>
      </tr>
  <%
rs.movenext
loop
end if
rs.close%>
    </table>
    
    </td>
  </tr>
</table>