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="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")

if len(arg1) = 0 then
        fromdate = DateAdd("yyyy",-1,date())
    else
        fromdate = arg1
    end if
    if len(arg2) = 0 then
        todate = DateAdd("d",-1,date())
    else
        todate = arg2
    end if
    s1 = "���ղֿ����ڵ�"
    s2 = "����ֿ�"
    s3 = "�����ֿ�"
    s4 = "��FBA�ֿ�"
    s5 = "ALL"
    sqll = ""    
    sqll = " and storcode in ('LSJ','JS2','TP2','JJS','TPP')"    
    soldareatyp = 0

if request.Form("submit")="submit" then
        fromdate = request.Form("fromdate")
        todate = request.Form("todate")
        if datediff("d",fromdate,"2016-06-26") >0 then fromdate = DateAdd("d",0,"2016-06-26")
        if datediff("d",todate,DateAdd("d",-1,date())) <0 then todate = DateAdd("d",-1,date())
        prd = request.Form("prd")
        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")
        soldareatyp = request.Form("soldareatyp")
    end if
    if s1 = "���ղֿ����ڵ�" and s2 = "����ֿ�" and s3 = "�����ֿ�" and s4 = "��FBA�ֿ�" and s5 = "ALL" and sqll = ""  then
        sqlstore = "select (Select '''' +STORCODE + ''','  from BA_STORDF where COUNTRY = '����' and stortyp in ('���вֿ�','�������ֿ�') for xml path('')) as store"
        set rs=server.CreateObject("adodb.recordset")
        rs.open sqlstore,conn,1,1
        sqll = " and storcode in (" & rs(0)
        rs.close
        set rs = nothing
        sqll = left(sqll,len(sqll)-1) & ")"
    end if
    %>
    <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>��Ʒ���룺<input type="text" name="prd" value="<%=prd%>"> </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="soldareatyp" value="<%=soldareatyp%>">
                        <option value="0" <%if soldareatyp=0 then%> selected <%end if%>>�ص���ʾ</option>
                        <option value="1" <%if soldareatyp=1 then%> selected <%end if%>>������ʾ</option>
                    </select>
                </td>
                <td nowrap><input type="submit" name="submit" value="submit"></td>
            </tr>
            <tr>
                <td colspan="7">ע����ǰ�����������ʱ�䷶Χ�ǣ�2016-07-26 �� ���졣</br>
                ���۳�����<b>��Ʒռ��</b>����ͳ�ƣ�����������<b>��Ʒ����</b>����ͳ�ơ�����к��ˡ������������˻����������</br>
                ���ۼƳ�����������������Ʒ�������ÿ�ռӺͣ���һ������Ϊ��һ��ĳ���������</br>
                ��ʾ���ۼƳ���������ʱ����ʾÿ�ε�����ĳ�������������������״ͼ���ʼ������ݿ����ء�
                </td>
            </tr>
        </table>
        <script>init2()</script>
    </form>
    </div>
    <%
    if len(trim(prd)) <> 6 then response.end
    sql = "Select a.OPDT,a.zpkc,coalesce(b.soldcnt,0) as soldcnt,coalesce(c.cntin,0) as cntin,coalesce(d.cntout,0) as cntout from (select opdt,sum(��Ʒ����+ ��Ʒռ��) as zpkc from vaa_storerijiepreall  where prdcode = '" & prd & "' and opdt between '" & fromdate & "' and '" & todate & "' " & sqll & "group by opdt) a left join (select dt,sum(quantity) as soldcnt from (select cast(createtime as date) as dt,quantity from aa_inoutprd2 where prdcode10 = '" & prd & "' and quantity >0 and stortyp = '11' and rectyp = '31' and createtime >= '" & fromdate & "' and createtime < dateadd(d,1,'" & todate & "') " & sqll & ") aa group by dt) b on a.OPDT = b.dt left join (select dt,sum(quantity) as cntin from (select cast(createtime as date) as dt,quantity from aa_inoutprd2 where prdcode10 = '" & prd & "' and quantity >0 and stortyp = '10' and DBCR = 1 and createtime >= '" & fromdate & "' and createtime < dateadd(d,1,'" & todate & "') " & sqll & ") aa group by dt) c on c.dt = a.OPDT  left join (select dt,sum(quantity) as cntout from (select cast(createtime as date) as dt,quantity from aa_inoutprd2 where prdcode10 = '" & prd & "' and quantity >0 and stortyp = '10' and DBCR = -1 and RECTYP <> '31' and createtime >= '" & fromdate & "' and createtime < dateadd(d,1,'" & todate & "') " & sqll & ") aa group by dt) d on d.dt = a.OPDT order by a.OPDT"
    'response.write sql
    sqlprd = "select prdcode,prdname from bu_prdprd where prdcode = '" & prd & "'"
    prdname = ""
    set rsprd = server.CreateObject("adodb.recordset")
    rsprd.open sqlprd,conn,1,1
    prdname = rsprd(1)
    rsprd.close
    set rsprd = nothing
    prdname =  prd & "��" & prdname
    prdname = replace(prdname,"'","\'")
    dim mydata(10000,20)
    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 4
            mydata(line_max,i) = Round(rs(i),2)
        next
        line_max = line_max + 1
    rs.movenext
    loop
    rs.close
    set rs = nothing
'���ڣ���Ʒ�ڿ���������Ʒռ�����۳�����������Ʒ�����������
    datedt = "["
    dtzpzk = "["
    dtzpsold = "["
    dtzpin = "["
    dtzpout = "["
    if datediff("d",fromdate,mydata(0,0)) <> 0 then
        for i =0 to datediff("d",fromdate,mydata(0,0))-1
        datedt = datedt & "'" & DateAdd("d",i,fromdate) & "',"
        dtzpzk = dtzpzk & "0,"
        dtzpsold = dtzpsold & "0,"
        dtzpin = dtzpin & "0,"
        dtzpout = dtzpout & "0,"
        next
    end if
    for i = 0 to line_max -1
        datedt = datedt & "'" & mydata(i,0) & "',"
        dtzpzk = dtzpzk & mydata(i,1) & ","
        dtzpsold = dtzpsold & mydata(i,2) & ","
        dtzpin = dtzpin & mydata(i,3) & ","
        dtzpout = dtzpout & mydata(i,4) & ","
    next
    datedt = left(datedt,len(datedt) -1) & "]"
    dtzpzk = left(dtzpzk,len(dtzpzk) -1) & "]"
    dtzpsold = left(dtzpsold,len(dtzpsold) -1) & "]"
    dtzpin = left(dtzpin,len(dtzpin) -1) & "]"
    dtzpout = left(dtzpout,len(dtzpout) -1) & "]"
    
    sql2 = " select dt,(select RTRIM(ORDERNO) + ','  from aa_inoutprd2 where prdcode10 = '" & prd & "' and quantity >0 and stortyp = '10' and DBCR = 1 and cast(createtime as date) = aa.dt " & sqll & " for xml path('')) as ordernos from (select cast(createtime as date) as dt  from aa_inoutprd2 where prdcode10 = '" & prd & "' and quantity >0 and stortyp = '10' and DBCR = 1 and createtime >= '" & fromdate & "' and createtime < dateadd(d,1,'" & todate & "') " & sqll & ") aa group by dt order by dt "

dtinmsgjson = "{"
    set rs=server.CreateObject("adodb.recordset")
    rs.open sql2,conn,1,1
    do while not rs.eof
        dtinmsgjson = dtinmsgjson & "'" & rs(0) & "':'" & left(rs(1),len(rs(1)) - 1)& "',"
    rs.movenext
    loop
    rs.close
    set rs = nothing
    conn.close
    set conn = nothing

dtinmsgjson = left(dtinmsgjson,len(dtinmsgjson) -1) & "}"

%>
    <div id="container" style="text-align:center; height:83%" >Loading...</div>
</div>
</body>
</html>
<script type="text/javascript">

var mydd = [<%=dtzpzk%>,<%=dtzpin%>,<%=dtzpsold%>,<%=dtzpsold%>,<%=dtzpout%>,<%=dtzpout%>];
var dataX = <%=datedt%>

mydd[5][0] += mydd[2][0];
for(var ii = 1;ii<mydd[3].length;ii++)
{
    mydd[3][ii] += mydd[3][ii-1];
    mydd[5][ii] += mydd[5][ii-1] + mydd[2][ii];
}
var dtinmsgjson = <%=dtinmsgjson%>;

var dataArea0 = [];
var dataArea = [];
var dataAreaShow = [];
var dataAreatmp = [];
var areacolor = "rgba(255, 0, 0, 0.3)";
var areacolorhide = "rgba(255, 0, 0, 0.0)";
var arealabelcolor = "rgba(0, 0, 0, 1)";
var arealabelcolorhide = "rgba(0, 0, 0, 0)";
var areahlcolor = "rgba(214, 245, 9, 1)";
var areahlcolorhide = "rgba(214, 245, 9, 0)";

}]) ;
	}
    if(x2 == dataX[dataX.length-1])
        return;
	x2 = "";
	for(var i = 1;i < dataX.length; i++)
	{
		if(datain[i] >0)
		{
			title = dataX[i]+ "\n" + dtinmsgjson[dataX[i]] + "\n" + "��Ʒ���������" +datain[i] + '\n����';
			x1 = dataX[i];
            y2 = y;
			y = y*1 + datain[i];
			for(j= i;j< dataX.length; j++)
			{
				if(dataoutall[j]>=y)
				{
					x2 = dataX[j];
					break;
				}
			}
			if(x2 == "")
			{
				x2 = dataX[dataX.length-1];
	            var d21 = new Date(Date.parse(x1.replace(/-/g,  "/")));
	            var d22 = new Date(Date.parse(x2.replace(/-/g,  "/")));
	            title += (d22.getTime() -d21.getTime())/3600000/24;
	            title += '��\nδ������ɡ�';
			}
			else
			{  
	            var d31 = new Date(Date.parse(x1.replace(/-/g,  "/")));
	            var d32 = new Date(Date.parse(x2.replace(/-/g,  "/")));
	            title += (d32.getTime() -d31.getTime())/3600000/24;
	            title += '��\n�����ꡣ';
			}
    		dataArea.push( [{
    		    name: title,
    		    xAxis: x1,
    		    yAxis:y,
    		    itemStyle: { color: areacolor },
    		    label:{color:arealabelcolorhide},
                emphasis:{
                    itemStyle: {color:areahlcolor},
                    label:{ fontWeight:'bold',color:arealabelcolor}
                }
    		}, {
    		    xAxis: x2,
    		    yAxis: y2*<%=soldareatyp%>
    
    		}]) ; 
	    if(x2 == dataX[dataX.length-1])
		break;
			x2 = "";
		}
	} 
}
makemarkAreadata();
dataAreaShow = dataArea;
dataAreatmp = dataArea;

]
};
;
myChart.on('click', function (params) {
    //console.log(params);
    if(params.componentType== "series" && params.componentSubType == "bar" && "�������" == params.seriesName )
    {
        for(var i = 0; i<dataAreatmp.length;i ++ )
        {
	        if(dataAreatmp[i][0].xAxis == params.name)
	        {
	            if( dataAreatmp[i][0].itemStyle.color != areacolorhide)
	            {
		            dataAreatmp[i][0].itemStyle.color=areacolorhide;
		            ////dataAreatmp[i][0].label.color = arealabelcolorhide;
		            //dataAreatmp[i][0].emphasis.label.color = arealabelcolorhide;
		            //dataAreatmp[i][0].emphasis.itemStyle.color = areahlcolorhide;
	            }
	            else
	            {
		            dataAreatmp[i][0].itemStyle.color=areacolor;
		            ////dataAreatmp[i][0].label.color = arealabelcolor;
		            //dataAreatmp[i][0].emphasis.label.color = arealabelcolor;
		            //dataAreatmp[i][0].emphasis.itemStyle.color = areahlcolor;
	            }
	            break;
	        }
        }
        dataAreaShow = [];
        for(var i = 0; i < dataArea.length; i++)
        {
            if(dataAreatmp[i][0].itemStyle.color == areacolor)
            {
                dataAreaShow.push(dataArea[i]);
            }
        }
        myChart.setOption({series: [{ name:'�ۼƳ�������',markArea: {data: dataAreaShow}}]});
    }
    if(params.componentType== "series" && params.componentSubType == "line" && "��Ʒ�ڿ���" == params.seriesName &&  params.name == dataX[0] )
    {
	        if(dataAreatmp[0][0].xAxis == params.name)
	        {
	            if( dataAreatmp[0][0].itemStyle.color != areacolorhide)
	            {
		            dataAreatmp[0][0].itemStyle.color=areacolorhide;
		            ////dataAreatmp[0][0].label.color = arealabelcolorhide;
		            //dataAreatmp[0][0].emphasis.label.color = arealabelcolorhide;
		            //dataAreatmp[0][0].emphasis.itemStyle.color = areahlcolorhide;
	            }
	            else
	            {
		            dataAreatmp[0][0].itemStyle.color=areacolor;
		            ////dataAreatmp[0][0].label.color = arealabelcolor;
		            //dataAreatmp[0][0].emphasis.label.color = arealabelcolor;
		            //dataAreatmp[0][0].emphasis.itemStyle.color = areahlcolor;
	            }
	        }
        dataAreaShow = [];
        for(var i = 0; i < dataArea.length; i++)
        {
            if(dataAreatmp[i][0].itemStyle.color == areacolor)
            {
                dataAreaShow.push(dataArea[i]);
            }
        }
        myChart.setOption({series: [{ name:'�ۼƳ�������',markArea: {data: dataAreaShow}}]});
    }    
});

if (option && typeof option === "object") {
    myChart.setOption(option, true);
}

</script>