show_client.asp

Activity——活动管理模块 Analyse——分析模块 Client——客户管理系统模块 Email——E-mail管理模块 Fee——费用管理模块 Report——报表模块 Sel

<!--#include file="../conn.asp"-->
<!--#include file="../IsUser.asp"-->
<!--#include file="../Pub_Fun.asp"-->

<%
if trim(request("type_kind"))="area" then
''判断是否进行查询操作
  if request("opstatus")="query" then
    ''判断是否是进行数据范围的选择
     if  request("start_time")<>"" and request("end_time")<>"" then
        condition=" where ClientCreateDate between '"&request("start_time")&"' and '"&request("end_time")&"'"
     end if
	'根据传递过来的统计对象变量赋值到变量kind
	if trim(request("S_City"))<>"" then
	    kind=trim(request("S_City"))
	else
	    kind="1"
	end if 
''如果没有查询操作，则设置默认的查询语句和统计对象
  else
		 condition="where 1=1"
		 kind="1"
  end if
    '将查询与加密
condition=encrypt(condition)
   '打开图表显示窗口
%>
 <script language="JavaScript">
childwin=open("chart_client_area.asp?condition=<%=condition%>&kind=<%=kind%>","客户分析","location=no,menubar=0,status=no,scrollbars,titlebar=no,resizable=1,toolbar=no,width=1000,height=520,top=20,left=20");
</script>
<%
else
''判断是否进行查询操作
if request("opstatus")="query" then
    ''判断是否是进行数据范围的选择
   if  request("start_time")<>"" and request("end_time")<>"" then
        condition=" where SellDate between '"&request("start_time")&"' and '"&request("end_time")&"'"
   else
         condition=" where 1=1"
   end if
	'根据传递过来的统计对象变量赋值到变量kind
  if trim(request("S_object"))<>"" then
     kind=trim(request("S_object"))
  else
    kind="1"
  end if
''如果没有查询操作，则设置默认的查询语句和统计对象
else
   condition="where 1=1"
    kind="1"
end if
    '将查询与加密 
condition=encrypt(condition)
   '打开图表显示窗口 
%>
 <script language="JavaScript">
childwin=open("chart_client_value.asp?condition=<%=condition%>&kind=<%=kind%>","客户分析","location=no,menubar=0,status=no,scrollbars,titlebar=no,resizable=1,toolbar=no,width=1000,height=520,top=20,left=20");
</script>
<%
end if
%>