Webshell Akmal archtte id

System: Microsoft Windows NT 10.0.20348.0

Server: Microsoft-IIS/10.0

User: buyyou

Directory: C:\MyData\WWW\asc365\

Name	Size	Type	Actions
ASC365_CANADA	-	Directory	Rename Delete
ASC365_Store01	-	Directory	Rename Delete
aspnet_client	-	Directory	Rename Delete
CompanyImage	-	Directory	Rename Delete
TJGS_USA	-	Directory	Rename Delete
zhijian	-	Directory	Rename Delete
Memo.inc	0 bytes	.inc	Edit Rename Delete
web.config	213 bytes	.config	Edit Rename Delete

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%Response.Charset="gb2312"%>

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="robots" content="noindex,nofollow">
<script type="text/javascript" src="js/echarts.min.js" charset="utf-8"></script>
<script type="text/javascript" src="http://code.jquery.com/jquery-1.12.2.js"></script>       
<script type="text/javascript" src="js/ck.js?v=<%=Timestamp%>" charset="utf-8"></script>

<title>ASC���ʹ�˾</title>
<style>
table{
 border: solid 1px #000000;
 }
table tr td{
 border-Bottom: dotted 1px #000000;
 border-top: dotted 1px #000000;
 border-right: dotted 1px #000000;
 border-left-width:1px;
 border-left-color:#000000;
 }
 .box{
 border-left-width:3px;
 border-left-color:#FF0000;
 border-Bottom: dotted 1px #000000;
 border-top: dotted 1px #000000;
 border-right: dotted 1px #000000;
 }
</style>
</head>
<body style="text-align:center; margin:0 auto;">
<%
    flgRead = Request.Querystring("arg")
    if flgRead <> "Asc365NewSys" then response.end
    arg1 = Request.Querystring("fromdate")
    arg2 = Request.Querystring("todate")
    arg3 = Request.Querystring("zubie")
    arg4 = Request.Querystring("typ")

MAX_DAYS=30
    kdays = 5
    if len(arg1) = 0 then
        fromdate = DateAdd("m",-1,date())
    else
        fromdate = arg1
    end if
    if len(arg2) = 0 then
        todate = DateAdd("d",-1,date())
    else
        todate = arg2
    end if
    '��ȡ���Ͳֿ�
    dim zu(100,2)
    zuname = "" '������ͼ������ʾ
    zu(0,0) = ""
    zu(0,1) = "All"
    id_zu = 1

set rszu = server.CreateObject("adodb.recordset")
    'sqlzu = "select zu,zuname from (select zu,zu+ '��' as zuname  from (select distinct(right(orgcode,2)) as zu from AA_STORERIJIE where opdt = dateadd(d,-2, cast(getdate() as date))) a union select TREECODE as zu,TREENAME from om_orgtree where  PRECODE='0003')ss order by len(zu) desc ,charindex(zuname,'����ͨ|����'),zu"
    sqlzu = "select zu,zuname from (select zu,(case when ISNUMERIC(zu) =1 then zu+ '��' else zu end) as zuname  from (select distinct(right(orgcode,2)) as zu from AA_STORERIJIE where opdt = dateadd(d,-2, cast(getdate() as date))union select distinct(dispvalue) as zu  from OM_COMMPARM where FLDNAME = 'planorg')a)ss  order by charindex(zu,'����|����ͨ|�������|��ѷ��˾|ͨ�ع�˾|') desc,zu"
    rszu.open sqlzu,conn,1,1
    do while not rszu.eof
        zu(id_zu,0) = rszu(0)
        zu(id_zu,1) = rszu(1)
        id_zu = id_zu + 1
        rszu.movenext
    loop
    rszu.close
    set rszu = nothing
    zubie = ""
    if len(arg3) =0 then
        zubie = ""
    else
        zubie = arg3
    end if
    typ = "1"
    if len(arg4) = 0 then
        typ = "1"
    else
        typ = arg4
    end if
    backtimes = -1
    s1 = "ALL"
    s2 = "ALL"
    s3 = "ALL"
    s4 = "ALL"
    s5 = "ALL"
    sqll = ""    
    if request.Form("submit")="submit" then
        fromdate = request.Form("fromdate")
        todate = request.Form("todate")
        if datediff("d",fromdate,"2016-06-26") >-1*MAX_DAYS then fromdate = DateAdd("d",MAX_DAYS,"2016-06-26")
        if datediff("d",todate,DateAdd("d",-1,date())) <0 then todate = DateAdd("d",-1,date())
        zubie = request.Form("zubie")
        typ = request.Form("typ")
        backtimes = request.Form("backtime")
        backtimes = backtimes*1 - 1
        sqll = request.Form("sqll")
        if Instr(sqll,"''") <= 0 then sqll = replace(sqll,"'","''")
        s1 = request.Form("store1")
        s2 = request.Form("store2")
        s3 = request.Form("store3")
        s4 = request.Form("store4")
        s5 = request.Form("store5")
        kdays = request.Form("kdays")
        if kdays*1 > MAX_DAYS*1 then kdays = MAX_DAYS
        if kdays*1 <1 then kdays = 1
    end if
    fromdate2 = DateAdd("d",-1*MAX_DAYS-1,fromdate)
    sql = "exec s70602885 '" & fromdate2 & "','" & todate & "','" & zubie &"','" & sqll &"','" & typ & "'"
    echartsName = ""
    if typ = "1" then echartsName = "'��ֵ������ʵ�ʳɱ���$'"
    if typ = "2" then echartsName = "'�����m3��'"
    if typ = "3" then echartsName = "'�ɹ�������'"
    if typ = "4" then echartsName = "'��Ʒ����'"    
    fuhao = ""
    if typ = "1" then fuhao = "'$'"
    if typ = "2" then fuhao = "'m3'"
    if typ = "3" then fuhao = "'��'"
    if typ = "4" then fuhao = "'��'"

dim mydata(10000,22)
    dim line_max
    line_max = 0
    set rs=server.CreateObject("adodb.recordset")
    rs.open sql,conn,1,1
    do while not rs.eof
        mydata(line_max,0) = rs(0)
        for i = 1 to 21
            mydata(line_max,i) = Round(rs(i),2)
        next
        line_max = line_max + 1
    rs.movenext
    loop
    rs.close
    set rs = nothing
'����,�ܿ��,����;�ܿ��,��;�ܿ��,��Ʒ��,����Ʒ��,��Ʒ����,��Ʒռ��,��Ʒ��;,���ֿ���,����ռ��,������;,OpenBox����,OpenBoxռ��,OpenBox��;,���޿⣬������;,���Ͽ�,���޿�,���˲��
    datedt = "["
    dtzong = "["
    dtfeizaitu = "["
    dtzaitu = "["
    dtzhengpinku = "["
    dtfeizhengpin = "["
    dtzpky = "["
    dtzpzy = "["
    dtzpzt = "["
    dtesky = "["
    dteszy = "["
    dteszt = "["
    dtobky = "["
    dtopzy = "["
    dtopzt = "["
    dtdxkc = "["
    dtdxzt = "["
    dttbfkc = "["
    dtzxkc = "["
    dtdhck = "["
    dtbfcj = "["
    dtqhds = "["
    if datediff("d",fromdate2,mydata(0,0)) <> 0 then
        for i =0 to datediff("d",fromdate2,mydata(0,0))-1
        datedt = datedt & "'" & DateAdd("d",i,fromdate2) & "',"
        dtzong = dtzong & "0,"
        dtfeizaitu = dtfeizaitu & "0,"
        dtzaitu = dtzaitu & "0,"
        dtzhengpinku = dtzhengpinku & "0,"
        dtfeizhengpin = dtfeizhengpin & "0,"
        dtzpky = dtzpky & "0,"
        dtzpzy = dtzpzy & "0,"
        dtzpzt = dtzpzt & "0,"
        dtesky = dtesky & "0,"
        dteszy = dteszy &  "0,"
        dteszt = dteszt &  "0,"
        dtobky = dtobky &  "0,"
        dtopzy = dtopzy &  "0,"
        dtopzt = dtopzt &  "0,"
        dtdxkc = dtdxkc &  "0,"
        dtdxzt = dtdxzt &  "0,"
        dttbfkc = dttbfkc & "0,"
        dtzxkc = dtzxkc &  "0,"
        dtdhck = dtdhck &  "0,"
        dtbfcj = dtbfcj &  "0,"
        dtqhds = dtqhds &  "0,"
        next
    end if

for i = 0 to line_max -1
        'if i >= MAX_DAYS then datedt = datedt & "'" & mydata(i,0) & "',"
        'if i > MAX_DAYS then 
        datedt = datedt & "'" & mydata(i,0) & "',"
        dtzong = dtzong & mydata(i,1) & ","
        dtfeizaitu = dtfeizaitu & mydata(i,2) & ","
        dtzaitu = dtzaitu & mydata(i,3) & ","
        dtzhengpinku = dtzhengpinku & mydata(i,4) & ","
        dtfeizhengpin = dtfeizhengpin & mydata(i,5) & ","
        dtzpky = dtzpky & mydata(i,6) & ","
        dtzpzy = dtzpzy & mydata(i,7) & ","
        dtzpzt = dtzpzt & mydata(i,8) & ","
        dtesky = dtesky & mydata(i,9) & ","
        dteszy = dteszy & mydata(i,10) & ","
        dteszt = dteszt & mydata(i,11) & ","
        dtobky = dtobky & mydata(i,12) & ","
        dtopzy = dtopzy & mydata(i,13) & ","
        dtopzt = dtopzt & mydata(i,14) & ","
        dtdxkc = dtdxkc & mydata(i,15) & ","
        dtdxzt = dtdxzt & mydata(i,16) & ","
        dttbfkc = dttbfkc & mydata(i,17) & ","
        dtzxkc = dtzxkc & mydata(i,18) & ","
        dtdhck = dtdhck & mydata(i,19) & ","
        dtbfcj = dtbfcj & mydata(i,20) & ","
        dtqhds = dtqhds & mydata(i,21) & ","
    next
    datedt = left(datedt,len(datedt) -1) & "]"
    dtzong = left(dtzong,len(dtzong) -1) & "]"
    dtfeizaitu = left(dtfeizaitu,len(dtfeizaitu) -1) & "]"
    dtzaitu = left(dtzaitu,len(dtzaitu) -1) & "]"
    dtzhengpinku = left(dtzhengpinku,len(dtzhengpinku) -1) & "]"
    dtfeizhengpin = left(dtfeizhengpin,len(dtfeizhengpin) -1) & "]"
    dtzpky = left(dtzpky,len(dtzpky) -1) & "]"
    dtzpzy = left(dtzpzy,len(dtzpzy) -1) & "]"
    dtzpzt = left(dtzpzt,len(dtzpzt) -1) & "]"
    dtesky = left(dtesky,len(dtesky) -1) & "]"
    dteszy = left(dteszy,len(dteszy) -1) & "]"
    dteszt = left(dteszt,len(dteszt) -1) & "]"
    dtobky = left(dtobky,len(dtobky) -1) & "]"
    dtopzy = left(dtopzy,len(dtopzy) -1) & "]"
    dtopzt = left(dtopzt,len(dtopzt) -1) & "]"
    dtdxkc = left(dtdxkc,len(dtdxkc) -1) & "]"
    dtdxzt = left(dtdxzt,len(dtdxzt) -1) & "]"
    dttbfkc = left(dttbfkc,len(dttbfkc) -1) & "]"
    dtzxkc = left(dtzxkc,len(dtzxkc) -1) & "]"
    dtdhck = left(dtdhck,len(dtdhck) -1) & "]"
    dtbfcj = left(dtbfcj,len(dtbfcj) -1) & "]"
    dtqhds = left(dtqhds,len(dtqhds) -1) & "]"

conn.close
    set conn = nothing

for i = 0 to id_zu - 1
        if zu(i,0) = zubie then
            zuname = zu(i,1)
            exit for
        end if
    next
    if len(arg1) > 0 then
    %>
    <div id="btnrtn" align="left">
       <input type="button" value="����" onclick="javascript:window.history.go(<%=backtimes%>);"> 
    </div>
    <%
    end if
    if zuname = "All" then zuname = "ȫ��˾"
    zuname = "'" & zuname & "'"
    %>
    <div style="margin:0 auto; text-align:center">
    <form method="post" action="" align="center" name="prdmsg">

<table width="800" border="1" style="border-collapse: collapse" align="center">
            <tr>
                <td nowrap>�ӣ�<input type="text" name="fromdate" value="<%=fromdate%>"></td>
                <td nowrap>����<input type="text" name="todate" value="<%=todate%>"></td>
                <td nowrap>���
                    <select name="zubie">
                        <%for i = 0 to id_zu-1%>
                            <option value="<%=zu(i,0)%>" <%if zu(i,0) = zubie then%>selected="selected" <%end if%>><%=zu(i,1)%></option>
                        <%next%>
                    </select>
                </td>
                <td nowrap>�ֿ⣺
                    <select name="store1" onChange="chgck1()">
                            <option value="ALL" <%if s1="ALL" then %> selected <%end if%>>ALL</option>
                            <option value="���ղֿ������˾" <%if s1="���ղֿ������˾" then %> selected <%end if%>>���ղֿ������˾</option>
                            <option value="���ղֿ����ڵ�" <%if s1="���ղֿ����ڵ�" then %> selected <%end if%>>���ղֿ����ڵ�</option>
                            <option value="FBA�ֿⰴ���������" <%if s1="FBA�ֿⰴ���������" then %> selected <%end if%>>FBA�ֿⰴ���������</option>
                            <option value="FBA�ֿⰴ�������˾" <%if s1="FBA�ֿⰴ�������˾" then %> selected <%end if%>>FBA�ֿⰴ�������˾</option>
                            <option value="WFS�ֿⰴ�������˾" <%if s1="WFS�ֿⰴ�������˾" then %> selected <%end if%>>WFS�ֿⰴ�������˾</option>                            
                    </select>
                    <select name="store2" value="<%=s2%>" onChange="chgck2()"><option value="<%=s2%>"><%=s2%></option></select>
                    <select name="store3" value="<%=s3%>" onChange="chgck3()"><option value="<%=s3%>"><%=s3%></option></select>
                    <select name="store4" value="<%=s4%>" onChange="chgck4()"><option value="<%=s4%>"><%=s4%></option></select>
                    <select name="store5" value="<%=s5%>" onChange="chgck5()"><option value="<%=s5%>"><%=s5%></option></select>
                    <input type="text" style="display:none" name="sqll" value="<%=sqll%>"/>
                </td>
                <td nowrap>��ѯ���ݣ�
                    <select name="typ">
                        <option value="1" <%if typ = "1" then%>selected="selected"<%end if%>>����ʵ�ʳɱ�</option>
                        <option value="2" <%if typ = "2" then%>selected="selected"<%end if%>>�����m3��</option>
                        <option value="3" <%if typ = "3" then%>selected="selected"<%end if%>>�ɹ�������</option>
                        <option value="4" <%if typ = "4" then%>selected="selected"<%end if%>>����</option>                        
                    </select>
                    <input type="text" style="display:none" name="backtime" value="<%=backtimes%>"/>
                </td>
                <td nowrap>
                ������������<input type="text" name="kdays" value="<%=kdays%>"  style="width:25px"/>
                </td>
                <td nowrap><input type="submit" name="submit" value="submit"></td>
            </tr>
            <tr>
                <td colspan="7">ע����ǰ�����������ʱ�䷶Χ�ǣ�2016-07-26 �� ���졣�����������������<%=MAX_DAYS%>�������޿��桱������������;�����ݡ���2023-06-13 Brain��</td>
            </tr>
        </table>
        <script>init2()</script>
    </form>
    </div>
    <div id="container" style="text-align:center; height:93%" >Loading...</div>
</div>
</body>
</html>
<script type="text/javascript">

var mydd = [<%=dtzong%>,<%=dtfeizaitu%>,<%=dtzaitu%>,<%=dtzhengpinku%>,<%=dtfeizhengpin%>,<%=dtzpky%>,<%=dtzpzy%>,<%=dtzpzt%>,<%=dtesky%>,<%=dteszy%>,<%=dteszt%>,<%=dtobky%>,<%=dtopzy%>,<%=dtopzt%>,<%=dtdxkc%>,<%=dtdxzt%>,<%=dttbfkc%>,<%=dtzxkc%>,<%=dtdhck%>,<%=dtbfcj%>,<%=dtqhds%>,<%=dtzong%>,<%=dtfeizaitu%>,<%=dtzaitu%>,<%=dtzhengpinku%>,<%=dtfeizhengpin%>,<%=dtzpky%>,<%=dtzpzy%>,<%=dtzpzt%>,<%=dtesky%>,<%=dteszy%>,<%=dteszt%>,<%=dtobky%>,<%=dtopzy%>,<%=dtopzt%>,<%=dtdxkc%>,<%=dtdxzt%>,<%=dttbfkc%>,<%=dtzxkc%>,<%=dtdhck%>,<%=dtbfcj%>,<%=dtqhds%>];
var dataX = <%=datedt%>
dataX.splice(0,<%=MAX_DAYS+1%>);
for(var ii = 0;ii<=20;ii++)
{
    for(var ss = mydd[ii].length -1; ss >= <%=MAX_DAYS%>;ss--)
    {
        mydd[ii][ss] -= mydd[ii][ss-1];
        mydd[ii][ss] = mydd[ii][ss].toFixed(2);
    }
    mydd[ii].splice(0,<%=MAX_DAYS+1%>);
}

for(var ii = 21;ii<= 41;ii++)
{
    for(var ss = mydd[ii].length -1; ss >= 1;ss--)
    {
        mydd[ii][ss] -= mydd[ii][ss-1];
    }
    for(var jj = mydd[ii].length-1; jj >= <%=MAX_DAYS%>; jj--)
    {
        for(var k = 1; k < <%=kdays%>;k++)
        {
            mydd[ii][jj] += mydd[ii][jj-k];
        }
        mydd[ii][jj] = mydd[ii][jj]/<%=kdays%>;
        mydd[ii][jj] = mydd[ii][jj].toFixed(2);
    }
    mydd[ii].splice(0,<%=MAX_DAYS+1%>);
}

</script>