📄 d_graphichanye.asp

📁 一个很好的在线购物系统
💻 ASP
📖 第 1 页 / 共 2 页
字号:
12 下一页
<!--#include file="../include/Pubconn.asp"-->
<HTML>
<HEAD>
<META name=VI60_defaultClientScript content=JavaScript>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<TITLE></TITLE><link href="../cread.css" rel="stylesheet" type="text/css">
<script ID=clientEventHandlersJS language="javascript">
	
	function bb()
	{
		history.back(-1);
	}
	
	function cc()
	{	
		var i;
		//document.form1.DMSChart1.height=80000;
		if (document.form1.count.value>0)
		{document.form1.DMSChart1.TitleText="数量";
		document.form1.DMSChart1.chartType =3;
		document.form1.DMSChart1.ColumnCount=1;
		document.form1.DMSChart1.RowCount=document.form1.count.value
		document.form1.DMSChart1.column = 1;
		for(i=0;i<document.form1.count.value;i++)
        {
			document.form1.DMSChart1.column = 1;
			document.form1.DMSChart1.row = i+1;
			if(document.form1.count.value>1)
			{document.form1.DMSChart1.Data =document.form1.array2(i).value ;
			document.form1.DMSChart1.RowLabel=document.form1.array1(i).value;}
			else
			{
			document.form1.DMSChart1.Data =document.form1.array2.value;
			document.form1.DMSChart1.RowLabel=document.form1.array1.value;
			}
        }
        }
	}
	
	function dd()
	{	
		if (document.form1.count.value>0)
		{document.form1.DMSChart1.ShowLegend=true;
		document.form1.DMSChart1.chartType =1;
		document.form1.DMSChart1.ColumnCount=1;
		document.form1.DMSChart1.RowCount=document.form1.count.value;
		document.form1.DMSChart1.column = 1;
		document.form1.DMSChart1.ColumnLabel="数量"
		
		for(i=0;i<document.form1.count.value;i++)
        {
			document.form1.DMSChart1.column = 1;
			document.form1.DMSChart1.row = i+1;
			if(document.form1.count.value>1)
			{document.form1.DMSChart1.Data =document.form1.array2(i).value ;
			document.form1.DMSChart1.RowLabel=document.form1.array1(i).value;}
			else
			{
			document.form1.DMSChart1.Data = document.form1.array2.value ;
			document.form1.DMSChart1.RowLabel=document.form1.array1.value;
			}
        }
        }
	}
	
	function ee()
	{	
		var i;
		//document.form1.DMSChart1.height=80000;
		if (document.form1.count.value>0)
		{document.form1.DMSChart1.TitleText="";
		document.form1.DMSChart1.ShowLegend=true;
		document.form1.DMSChart1.chartType =14;
		document.form1.DMSChart1.RowCount=1;
		document.form1.DMSChart1.ColumnCount=document.form1.count.value;
		document.form1.DMSChart1.row = 1;
		document.form1.DMSChart1.RowLabel="数量"
		for(i=0;i<document.form1.count.value;i++)
        {
			document.form1.DMSChart1.row = 1;
			document.form1.DMSChart1.column = i+1;
			if(document.form1.count.value>1)
			{document.form1.DMSChart1.Data =document.form1.array2(i).value ;
			document.form1.DMSChart1.ColumnLabel=document.form1.array1(i).value;}
			else
			{
			document.form1.DMSChart1.Data =document.form1.array2.value ;
			document.form1.DMSChart1.ColumnLabel=document.form1.array1.value;
			}
        }
        }
	}
</script>

<link href="../cread.css" rel="stylesheet" type="text/css">

</HEAD>
<BODY  bgcolor="#FFFFFF" onload="ee()">
<form name="form1" action="test.asp" method="post">      
<%'**************************************************取出D_ClientHanYeMainFrm.asp传过来的参数******************************%>
   <%if request("area")=0 then%>    
      <%type1=request("type")%>                  <%'''''''客户类型%>
      
      <table border="0" width="100%">
                <tr>
                 <td width="100%" valign="middle"><img border="0" src="it_22.gif" width="34" height="15">  <b><%=type1%><font size="2">行业分析图</font></b><hr width="40%" align="left" size="1"></td> 
                </tr> 
       </table> 

           <%set rs=server.createobject("adodb.recordset")
        rs.cursorlocation=3
        if rs.state=1 then rs.close 
        rs.open "select distinct occupation from D_clientinfo where (tag='kh' or tag='khindex') and type='"& type1 &"' and Occupation<>'' and delflag='0'",pubconn,1,3 
        if rs.recordcount<=0 then%>
         <br><br><br><center><font size="2">提示:没有记录!</font></center><br><br>
         <center><input type="button" value="返回" name="back" onclick="bb()" class=hand style="background-color: #D1D1D1; border-style: solid; border-width: 1">     
         <input type="hidden" name="count" value="空记录">               
          <input type="hidden" name="array2"  value=0 >                   
        
         <%response.end                                                                                                                                  
       else                                                                                                                            
         rs.movefirst                                                                                                 
        aa=rs.recordcount                                                                                                                                                                                                
      end if%>                                         
       <%line=0                                                                                                                            
   ' dim array1()
12 下一页
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -