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>

<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;
 }

@media all
{
  /* TOC inspired by http://jashkenas.github.com/coffee-script */
  #table-of-contents {
    font-size: 10pt;
    position: fixed;
    right: 0em;
    top: 0em;
    background: white;
    -webkit-box-shadow: 0 0 1em #777777;
    -moz-box-shadow: 0 0 1em #777777;
    -webkit-border-bottom-left-radius: 5px;
    -moz-border-radius-bottomleft: 5px;
    text-align: right;
    /* ensure doesn't flow off the screen when expanded */
    max-height: 80%;
    overflow: auto; 
    z-index:999;
    }
    #table-of-contents #text-table-of-contents {
      display: none;
      text-align: left; }
    #table-of-contents:hover #text-table-of-contents {
      display: block;
      padding: 0.5em;
      margin-top: -1.5em; }
} /* END OF @media all */

@media screen
{
  #table-of-contents {
    float: right;
    border: 1px solid #CCC;
    max-width: 50%;
    overflow: auto;
  }
}
</style>

fromdate = Request.Querystring("fromdate")
    todate = Request.Querystring("todate")
    if len(fromdate) =0 then fromdate = DateAdd("m",-1,date())
    if len(todate) = 0 then todate = DateAdd("d",-1,date())
    typ = Request.Querystring("typ")
    typ2 = Request.Querystring("typ2")
    if len(typ) = 0 then typ = "1"
    if len(typ2) = 0 then typ2 = "1"
    backtimes = -1
    if request.Form("submit")="submit" then
        fromdate = request.Form("fromdate")
        todate = request.Form("todate")
        if datediff("d",fromdate,"2016-06-26") >0 then fromdate = "2016-06-26"
        if datediff("d",todate,DateAdd("d",-1,date())) <0 then todate = DateAdd("d",-1,date())
        typ = request.Form("typ")
        typ2 = request.Form("typ2")
        backtimes = request.Form("backtime")
        backtimes = backtimes*1 - 1        
    end if
    if typ = "1" then sql2 = "sumforactprice2"
    if typ = "2" then sql2 = "sumBULK2"
    if typ = "3" then sql2 = "sumavgprice2"
sql = " select cast((select DISPVALUE from om_commparm where fldname = 'planorg' and PARMVALUE = left(b.org,2)) as nvarchar) as fgs,cast(b.org as nvarchar),coalesce(sumforactprice1,0) as sumforactprice1,coalesce(sumforactprice2,0) as sumforactprice2,coalesce(sumavgprice1,0) as sumavgprice1,coalesce(sumavgprice2,0) as sumavgprice2,coalesce(sumBULK1,0) as sumBULK1,coalesce(sumBULK2 ,0) as sumBULK2 from (select right(orgcode ,2) + '��' as org, sum(ZPKY_FORACTPRICE + ZPZY_FORACTPRICE + ZPZT_FORACTPRICE + ESKY_FORACTPRICE + ESZY_FORACTPRICE + ESZT_FORACTPRICE + DXKC_FORACTPRICE + BFKC_FORACTPRICE + ZXKC_FORACTPRICE + DHCK_FORACTPRICE + OPKY_FORACTPRICE + OPZY_FORACTPRICE + DXZT_FORACTPRICE + OPZT_FORACTPRICE) as sumforactprice1,sum(ZPKY_AVGPRICE+ZPZY_AVGPRICE+ZPZT_AVGPRICE+ESKY_AVGPRICE+ESZY_AVGPRICE+ESZT_AVGPRICE+DXKC_AVGPRICE+BFKC_AVGPRICE+ZXKC_AVGPRICE+DHCK_AVGPRICE+OPKY_AVGPRICE+OPZY_AVGPRICE+DXZT_AVGPRICE+OPZT_AVGPRICE) as sumavgprice1,sum(ZPKY_BULK+ZPZY_BULK+ZPZT_BULK+ESKY_BULK+ESZY_BULK+ESZT_BULK+DXKC_BULK+BFKC_BULK+ZXKC_BULK+DHCK_BULK+OPKY_BULK+OPZY_BULK+DXZT_BULK+OPZT_BULK) as sumBULK1 from AA_STORERIJIE a where opdt = '" & fromdate & "'  and right(orgcode,2) in (select PARMVALUE  from om_commparm where fldname = 'planorg' and dispvalue = '" & curfgs &"') group by right(orgcode ,2)) a right join (select right(orgcode ,2) + '��' as org, sum(ZPKY_FORACTPRICE + ZPZY_FORACTPRICE + ZPZT_FORACTPRICE + ESKY_FORACTPRICE + ESZY_FORACTPRICE + ESZT_FORACTPRICE + DXKC_FORACTPRICE + BFKC_FORACTPRICE + ZXKC_FORACTPRICE + DHCK_FORACTPRICE + OPKY_FORACTPRICE + OPZY_FORACTPRICE + DXZT_FORACTPRICE + OPZT_FORACTPRICE) as sumforactprice2,sum(ZPKY_AVGPRICE+ZPZY_AVGPRICE+ZPZT_AVGPRICE+ESKY_AVGPRICE+ESZY_AVGPRICE+ESZT_AVGPRICE+DXKC_AVGPRICE+BFKC_AVGPRICE+ZXKC_AVGPRICE+DHCK_AVGPRICE+OPKY_AVGPRICE+OPZY_AVGPRICE+DXZT_AVGPRICE+OPZT_AVGPRICE) as sumavgprice2,sum(ZPKY_BULK+ZPZY_BULK+ZPZT_BULK+ESKY_BULK+ESZY_BULK+ESZT_BULK+DXKC_BULK+BFKC_BULK+ZXKC_BULK+DHCK_BULK+OPKY_BULK+OPZY_BULK+DXZT_BULK+OPZT_BULK) as sumBULK2 from AA_STORERIJIE a where opdt = '" & todate & "'  and right(orgcode,2) in (select PARMVALUE  from om_commparm where fldname = 'planorg' and dispvalue = '" & curfgs &"') group by right(orgcode ,2)) b on a.org = b.org order by " & sql2 & " desc"

dim mydata(100,14)
    dim line_max
    line_max = 1
    mydata(0,0) = curfgs
    if curfgs = "ͨ�ع�˾" then  mydata(0,1) = "ͨ�ع�˾"
    if curfgs = "��ѷ��˾" then  mydata(0,1) = "��ѷ��˾"
    if curfgs = "�������" then  mydata(0,1) = "�������"
    if curfgs = "����"     then  mydata(0,1) = "����"
    if curfgs = "����ͨ"     then  mydata(0,1) = "����ͨ"

set rs=server.CreateObject("adodb.recordset")
    rs.open sql,conn,1,1
    do while not rs.eof
        mydata(line_max,0) = rs(0)
        mydata(line_max,1) = rs(1)
        mydata(line_max,2) = Round(rs(2),2)
        mydata(line_max,3) = Round(rs(3),2)
        mydata(line_max,4) = mydata(line_max,3) - mydata(line_max,2)
        if mydata(line_max,4) = 0 then
            mydata(line_max,5) = 0
        else
            if mydata(line_max,2) = 0 then
                mydata(line_max,5) = 1
            else
                mydata(line_max,5) = Round(mydata(line_max,4)/mydata(line_max,2),6)
            end if
        end if

mydata(line_max,6) = Round(rs(4),2)
        mydata(line_max,7) = Round(rs(5),2)
        mydata(line_max,8) = mydata(line_max,7) - mydata(line_max,6)
        if mydata(line_max,8) = 0 then
            mydata(line_max,9) = 0
        else
            if mydata(line_max,6) = 0 then
                mydata(line_max,9) = 1
            else
                mydata(line_max,9) = Round(mydata(line_max,8)/mydata(line_max,6),6)
            end if
        end if

mydata(line_max,10) = Round(rs(6),2)
        mydata(line_max,11) = Round(rs(7),2)
        mydata(line_max,12) = mydata(line_max,11) - mydata(line_max,10)
        if mydata(line_max,12) = 0 then
            mydata(line_max,13) = 0
        else
            if mydata(line_max,10) = 0 then
                mydata(line_max,13) = 1
            else
                mydata(line_max,13) = Round(mydata(line_max,12)/mydata(line_max,10),6)
            end if
        end if
        '������ܣ����Ա�ֵ�����Ժ����¼��㣩
        for i = 2 to 12
            mydata(0,i) = mydata(0,i) + mydata(line_max,i)
        next
        line_max = line_max + 1
    rs.movenext
    loop
    rs.close
    set rs = nothing
    '���㹫˾��ֵ
    for i = 0 to 0
        if mydata(i,4) = 0 then
            mydata(i,5) = 0
        else
            if mydata(i,2) = 0 then
                mydata(i,5) = 1
            else
                mydata(i,5) = Round(mydata(i,4)/mydata(i,2),6)
            end if
        end if
        if mydata(i,8) = 0 then
            mydata(i,9) = 0
        else
            if mydata(i,6) = 0 then
                mydata(i,9) = 1
            else
                mydata(i,9) = Round(mydata(i,8)/mydata(i,6),6)
            end if
        end if
        if mydata(i,12) = 0 then
            mydata(i,13) = 0
        else
            if mydata(i,10) = 0 then
                mydata(i,13) = 1
            else
                mydata(i,13) = Round(mydata(i,12)/mydata(i,10),6)
            end if
        end if
    next
    '�Թ�˾����
    if typ = "1" and typ2 = "2" then '������ɱ���������
        for i = 1 to line_max-2
            for j = i+1 to line_max-1
                if mydata(i,4) < mydata(j,4) then
                    for k = 0 to 14
                        mydata(line_max,k) = mydata(i,k)
                        mydata(i,k) = mydata(j,k)
                        mydata(j,k) = mydata(line_max,k)
                    next
                end if
            next
        next
    end if

if typ = "3" and typ2 = "2" then 
        for i = 1 to line_max-2
            for j = i+1 to line_max-1
                if mydata(i,8) < mydata(j,8) then
                    for k = 0 to 14
                        mydata(line_max,k) = mydata(i,k)
                        mydata(i,k) = mydata(j,k)
                        mydata(j,k) = mydata(line_max,k)
                    next
                end if
            next
        next
    end if

if typ = "2" and typ2 = "2" then 
        for i = 1 to line_max-2
            for j = i+1 to line_max-1
                if mydata(i,12) < mydata(j,12) then
                    for k = 0 to 14
                        mydata(line_max,k) = mydata(i,k)
                        mydata(i,k) = mydata(j,k)
                        mydata(j,k) = mydata(line_max,k)
                    next
                end if
            next
        next
    end if

dtactprice = "["
    dttiji = "["
    dtavgprice = "["
    cangkustring = "["
    for i = 1 to line_max -1
        dtactprice = dtactprice & "{value:" & mydata(i,3) & ",name:'" & mydata(i,1) & "'},"
        dtavgprice = dtavgprice & "{value:" & mydata(i,7) & ",name:'" & mydata(i,1) & "'},"
        dttiji = dttiji & "{value:" & mydata(i,11) & ",name:'" & mydata(i,1) & "'},"
        cangkustring = cangkustring & "'" & mydata(i,1) & "',"
    next
    dtactprice = left(dtactprice,len(dtactprice) -1) & "]"
    dttiji = left(dttiji,len(dttiji) -1) & "]"
    dtavgprice = left(dtavgprice,len(dtavgprice) -1) & "]"
    cangkustring = left(cangkustring,len(cangkustring) - 1) & "]"
    conn.close
    set conn = nothing

sfromdate = "'" & fromdate & "'"
    stodate = "'" & todate & "'"
'formatnumber(rs(i),2,-1,-1)
    %>

<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>
                    </select>
                    <select name="typ2">
                        <option value="1" <%if typ2 = "1" then%>selected="selected"<%end if%>>ֵ</option>
                        <option value="2" <%if typ2 = "2" then%>selected="selected"<%end if%>>����ֵ</option>
                    </select>
                    <input type="text" style="display:none" name="backtime" id="backtime" value="<%=backtimes%>"/>
                </td>
                <td nowrap><input type="submit" name="submit" value="submit"></td>
            </tr>
        </table>
    </form>
    </div>
    <table width="1300" border="1" style="border-collapse: collapse" align="center">
    <tr>
    <td>�ֹ�˾</td>
    <td>���</td>
    <td>�ڳ�����ʵ�ʳɱ�</td>
    <td>��ĩ����ʵ�ʳɱ�</td>
    <td>����ֵ</td>
    <td>��������</td>
    <td>�ڳ��ɹ��ɱ�</td>
    <td>��ĩ�ɹ��ɱ�</td>
    <td>����ֵ</td>
    <td>��������</td>
    <td>�ڳ����</td>
    <td>��ĩ���</td>
    <td>����ֵ</td>
    <td>��������</td>
    </tr>
    <% for i = 0 to 0 %>
        <tr <%if i=0 then%> bgcolor="#FF9933"<%else%> bgcolor="#9999FF" <%end if%> align="right">
            <td align="left" colspan="2"><a target="_self" href="echarts_FORACTPRICE.asp?arg=Asc365NewSys&fromdate=<%=fromdate%>&todate=<%=todate%>&zubie=<%=mydata(i,1)%>&typ=<%=typ%>"><%=mydata(i,0)%></a></td>
            <td class="box"><a target="_self" href="echarts_FORACTPRICE_zuhuizongprd.asp?arg=Asc365NewSys&org=&fgs=<%=mydata(i,0)%>&todate=<%=fromdate%>&typ=<%=typ%>"><%=formatnumber(mydata(i,2),2,-1,0,-1)%></a></td>
            <td><a target="_self" href="echarts_FORACTPRICE_zuhuizongprd.asp?arg=Asc365NewSys&org=&fgs=<%=mydata(i,0)%>&todate=<%=todate%>&typ=<%=typ%>"><%=formatnumber(mydata(i,3),2,-1,0,-1)%></a></td>
            <td><%=formatnumber(mydata(i,4),2,-1,0,-1)%></td>
            <td><%=formatnumber(mydata(i,5)*100,2,-1,0,-1)&"%"%></td>
            <td class="box"><%=formatnumber(mydata(i,6),2,-1,0,-1)%></td>
            <td><%=formatnumber(mydata(i,7),2,-1,0,-1)%></td>
            <td><%=formatnumber(mydata(i,8),2,-1,0,-1)%></td>
            <td><%=formatnumber(mydata(i,9)*100,2,-1,0,-1)&"%"%></td>
            <td class="box"><%=formatnumber(mydata(i,10),2,-1,0,-1)%></td>
            <td><%=formatnumber(mydata(i,11),2,-1,0,-1)%></td>
            <td><%=formatnumber(mydata(i,12),2,-1,0,-1)%></td>
            <td><%=formatnumber(mydata(i,13)*100,2,-1,0,-1)&"%"%></td>
        </tr>
    <%next%>
    <% for i = 1 to line_max-1 %>
        <tr  align="right">
            <td align="left"><%=mydata(i,0)%></td>
            <td align="left"><a target="_self" href="echarts_FORACTPRICE.asp?arg=Asc365NewSys&fromdate=<%=fromdate%>&todate=<%=todate%>&zubie=<%=left(mydata(i,1),2)%>&typ=<%=typ%>"><%=mydata(i,1)%></a></td>
            <td class="box"><a target="_self" href="echarts_FORACTPRICE_zuhuizongprd.asp?arg=Asc365NewSys&org=<%=left(mydata(i,1),2)%>&fgs=<%=mydata(i,0)%>&todate=<%=fromdate%>&typ=<%=typ%>"><%=formatnumber(mydata(i,2),2,-1,0,-1)%></a></td>
            <td><a target="_self" href="echarts_FORACTPRICE_zuhuizongprd.asp?arg=Asc365NewSys&org=<%=left(mydata(i,1),2)%>&fgs=<%=mydata(i,0)%>&todate=<%=todate%>&typ=<%=typ%>"><%=formatnumber(mydata(i,3),2,-1,0,-1)%></a></td>
            <td><%=formatnumber(mydata(i,4),2,-1,0,-1)%></td>
            <td><%=formatnumber(mydata(i,5)*100,2,-1,0,-1)&"%"%></td>
            <td class="box"><%=formatnumber(mydata(i,6),2,-1,0,-1)%></td>
            <td><%=formatnumber(mydata(i,7),2,-1,0,-1)%></td>
            <td><%=formatnumber(mydata(i,8),2,-1,0,-1)%></td>
            <td><%=formatnumber(mydata(i,9)*100,2,-1,0,-1)&"%"%></td>
            <td class="box"><%=formatnumber(mydata(i,10),2,-1,0,-1)%></td>
            <td><%=formatnumber(mydata(i,11),2,-1,0,-1)%></td>
            <td><%=formatnumber(mydata(i,12),2,-1,0,-1)%></td>
            <td><%=formatnumber(mydata(i,13)*100,2,-1,0,-1)&"%"%></td>
        </tr>
    <%next%>
    </table>
    <h3 id="pie1"></h3>
    <div id="cangkupie" style="text-align:center; height:100%" >Loading...</div>
    <h3 id="pie2"></h3>
    <div id="tijipie" style="text-align:center; height:100%" >Loading...</div>
    <h3 id="pie3"></h3>
    <div id="avgpricepie" style="text-align:center; height:100%" >Loading...</div>

</div>
</body>
</html>
<script type="text/javascript">
function SortByName(a,b)
{
    return a.name.localeCompare(b.name);//?true:false;
}
// ����溣��ʵ�ʳɱ��ı�״ͼ
var dom1 = document.getElementById("cangkupie");
var myChart1 = echarts.init(dom1);
option1 = null;
option1 = {
    title: {
        text: '������ﺣ��ʵ�ʳɱ�ռ�����',
        subtext: '���ڣ�'  + <%=stodate%>, 
        subtextStyle:{color:'#f00'},
        left:'center'
    },
    tooltip: {
        trigger: 'item',
       // formatter: "{a} <br/>{b} : {c}$ ({d}%)"
    },
    legend: {
        data:<%=cangkustring%>.sort(),
        left:'center',
        top:'5%'
        
        //type: 'scroll',
        //orient: 'vertical',
        //right: 10,
        //top: 20,
        //bottom: 20,
        //data:<%=cangkustring%>.sort()
    },
    toolbox: {
        feature: {
            dataView : {show: true, readOnly: false,title: '�鿴����'},
            saveAsImage: {
                title: '����ΪͼƬ'
            }
        }
    },
    series: [
        {
            //title:{
            //    text:<%=stodate%> + "" + '����ʵ�ʺ���ɱ�����'
            //},
            name:<%=stodate%> + "" + '����ʵ�ʺ���ɱ�����',
            type:'pie',
            radius : [0, '72%'],
            center : ['50%', '55%'],
            label: {
                normal: {
                    show: true,
                    formatter: "{b}: {c}$ ({d}%)"
                }
            },
            data: <%=dtactprice%>.sort(SortByName)
        }
    ]
};
;
if (option1 && typeof option1 === "object") {
    myChart1.setOption(option1, true);
}
// ���������ı�״ͼ
var dom2 = document.getElementById("tijipie");
var myChart2 = echarts.init(dom2);
option2 = null;
option2 = {
    title: {
        text: '����������ռ�����',
        subtext: '���ڣ�'  + <%=stodate%>, 
        subtextStyle:{color:'#f00'},
        left:'center'
    },
    tooltip: {
        trigger: 'item',
       // formatter: "{a} <br/>{b} : {c}$ ({d}%)"
    },
    legend: {
        data:<%=cangkustring%>.sort(),
        left:'center',
        top:'5%'
    },
    toolbox: {
        feature: {
            dataView : {show: true, readOnly: false,title: '�鿴����'},
            saveAsImage: {
                title: '����ΪͼƬ'
            }
        }
    },
    series: [
        {
            //title:{
            //    text:<%=stodate%> + "" + '�����������'
            //},
            name:<%=stodate%> + "" + '�����������',
            type:'pie',
            radius : [0, '72%'],
            center : ['50%', '55%'],
            label: {
                normal: {
                    show: true,
                    formatter: "{b}: {c}m3 ({d}%)"
                }
            },
            data: <%=dttiji%>.sort(SortByName)
        }
    ]
};
;
if (option2 && typeof option2 === "object") {
    myChart2.setOption(option2, true);
}
// �����ɹ��ɱ��ı�״ͼ
var dom3 = document.getElementById("avgpricepie");
var myChart3 = echarts.init(dom3);
option3 = null;
option3 = {
    title: {
        text: '�������ɹ��ɱ�ռ�����',
        subtext: '���ڣ�'  + <%=stodate%>, 
        subtextStyle:{color:'#f00'},
        left:'center'
    },
    tooltip: {
        trigger: 'item',
       // formatter: "{a} <br/>{b} : {c}$ ({d}%)"
    },
    legend: {
        data:<%=cangkustring%>.sort(),
        left:'center',
        top:'5%'
    },
    toolbox: {
        feature: {
            dataView : {show: true, readOnly: false,title: '�鿴����'},
            saveAsImage: {
                title: '����ΪͼƬ'
            }
        }
    },
    series: [
        {
            //title:{
            //    text:<%=stodate%> + "" + '����ɹ��������'
            //},
            name:<%=stodate%>+ "" + '����ɹ��������',
            type:'pie',
            radius : [0, '72%'],
            center : ['50%', '55%'],
            label: {
                normal: {
                    show: true,
                    formatter: "{b}: {c}�� ({d}%)"
                }
            },
            data: <%=dtavgprice%>.sort(SortByName)
        }
    ]
};
;
if (option3 && typeof option3 === "object") {
    myChart3.setOption(option3, true);
}
</script>