f_ywytj.asp

一个很好的在线购物系统

      </font>
     </td>                                                                                                 
                                                                                                    
     <td width="88" height="24" align="center" bgcolor="#DDD2C4">                                                                                  
  <font size="2">                                                                                                     
    服务/食宿费</font><font size="2">(元)
  </font>
     </td>                                                                                                 
                                                                                                    
     <td width="88" height="24" align="center" bgcolor="#DDD2C4">                                                                                  
      利润<font size="2">(元)
      </font>
     </td>                                                                                                 
                                                                                                    
  </tr>                                                                                                
                                                                                                
     <%    
     '以下参数为合计所有     
     htsl1=0  
     htzj1=0  
     xsfy1=0  
     ybfy1=0  
     gcfy1=0  
     fwfy1=0  
     zlr1=0  
     '以下参数为图形所用  
     bm=""  
     htsl2=""  
     htzj2=""  
     xsfy2=""  
     ybfy2=""  
     gcfy2=""  
     fwfy2=""  
     zlr2=""  
     for n=1  to rsbm.RecordCount   
       
     %>                    
         <%if  n mod 2=1 then                        
            bg="#f7f7f7"                          
       else                        
            bg="#EDEBEC"                         
       end if%>                                                                                               
                                                                                                  
  <tr bgcolor="<%=bg%>">   
    <font size="2">                                                              
                                                                                             
                                                                                                
    <td width="143" height="23" align="center" ><%=rsbm("Name")%></td>   
    <%   
   set rstj=Server.CreateObject("ADODB.RecordSet")   
   sql="select count(clientnum) as htsl,sum(TotalPrice) as htzj,sum(SaleMoney) as xsfy,sum(SendMoney)as ybfy,sum(EngineeMoney)as gcfy,sum(ServerEatMoney)as fwfy,sum(Xslr) as zlr from F_TblContract2 where SaleDelegate='"&rsbm("Stuffnum")&"'"   
   if total1<>""  and total2="" then   
      sql=sql&" and SignTime<='"&total1&"'"   
   end if    
   if total1="" and total2<>"" then   
      sql=sql&" and SignTime<='"&total2&"'"   
   
   end if    
   if total1<>"" and total2<>"" then   
      sql=sql&" and  ( SignTime between  '"&total1&"' and '"&total2&"' )"   
   
   end if   
 '  response.write sql 
   rstj.open sql,Pubconn,1   
   
    
     if isnull(rstj("htsl")) then  
        htsl=0  
     else   
        htsl=rstj("htsl")  
     end if   
     if isnull(rstj("htzj")) then  
        htzj=0  
     else   
        htzj=rstj("htzj")  
     end if  
     if isnull(rstj("xsfy")) then  
        xsfy=0  
     else   
        xsfy=rstj("xsfy")  
     end if  
     if isnull(rstj("ybfy")) then  
        ybfy=0  
     else   
        ybfy=rstj("ybfy")  
     end if  
     if isnull(rstj("gcfy")) then  
        gcfy=0  
     else   
        gcfy=rstj("gcfy")  
     end if  
      if isnull(rstj("fwfy")) then  
        fwfy=0  
     else   
        fwfy=rstj("fwfy")  
     end if  
  
     if isnull(rstj("zlr")) then  
        zlr=0  
     else   
        zlr=rstj("zlr")  
     end if  
       
   
   %>   
    
                                                               
                                                                                              
                                                                                              
             
                
               
      <td width="94" height="23" align="center" ><%=htsl%></td>                                                                                              
                                                                                   
      <td width="64" height="23" align="center" ><%=htzj%></td>                                                                                              
                                                                      
      <td width="94" height="23" align="center" ><%=xsfy%></td>                                                                                              
                                                                                   
      <td width="64" height="23" align="center" ><%=ybfy%></td>                                                                                              
                                                                                   
      <td width="88" height="23" align="center" ><%=gcfy%></td>                                                                                              
                                                                                   
      <td width="88" height="23" align="center" ><%=fwfy%></td>                                                                                              
      <td width="88" height="23" align="center" ><%=zlr%></td>                                                                                 
                                                                                              
             
                
               
                
  </tr>   
      <%   
       '以下为合计的数据  
      htsl1=htsl1+htsl  
      htzj1=htzj1+htzj  
      xsfy1=xsfy1+xsfy  
      ybfy1=ybfy1+ybfy  
      gcfy1=gcfy1+gcfy  
      fwfy1=fwfy1+fwfy  
      zlr1=zlr1+zlr  
     '以下为图形的数据  
      bm=bm+rsbm("name")+","     
      htsl2=htsl2+cstr(htsl)+","  
      htzj2=htzj2+cstr(htzj)+","  
      xsfy2=xsfy2+cstr(xsfy)+","  
      ybfy2=ybfy2+cstr(ybfy)+","  
      gcfy2=gcfy2+cstr(gcfy)+","  
      fwfy2=fwfy2+cstr(fwfy)+","  
      zlr2=zlr2+cstr(zlr)+","  
 
     rsbm.movenext   
     if rsbm.eof then exit for   
     next   
     %>                                                                                          
    <td width="143" height="23" align="center" ><font size="2">总计</font> </td>    
                                               
    <td width="94" height="23" align="center" ><%=htsl1%></td>                                                                                              
                                                                                   
      <td width="64" height="23" align="center" ><%=htzj1%></td>                                                                                              
                                                                      
      <td width="94" height="23" align="center" ><%=xsfy1%></td>                                                                                              
                                                                                   
      <td width="64" height="23" align="center" ><%=ybfy1%></td>                                                                                              
                                                                                   
      <td width="88" height="23" align="center" ><%=gcfy1%></td>                                                                                              
                                                                                   
      <td width="88" height="23" align="center" ><%=fwfy1%></td>                                                                                              
      <td width="88" height="23" align="center" ><%=zlr1%></td>                                                                                           
 </table>                                                                                                 
                                                                                                     
 </form>    
   
    
                                                                                                                   
<p align="center"> 
  <%if htzj1<>0 then%>  
       <a href="F_bmhtzjtx.asp?bm=<%=bm%>&htzj=<%=htzj2%>&xs=（按业务员）合同总价统计图形&dw=元">合同总价图形</a>&nbsp;&nbsp;  
  <%end if %>   
 <%if xsfy1<>0 then%>   
      <a href="F_bmhtzjtx.asp?bm=<%=bm%>&htzj=<%=xsfy2%>&xs=（按业务员）销售费用统计图形&dw=元">销售费用图形</a>&nbsp;&nbsp;  
 <%end if %>   
 <%if xsfy1<>0 then%>  
      <a href="F_bmhtzjtx.asp?bm=<%=bm%>&htzj=<%=ybfy2%>&xs=（按业务员）运保费用统计图形&dw=元">运保费用图形</a>&nbsp;&nbsp;   
 <%end if %>   
 <%if xsfy1<>0 then%>  
      <a href="F_bmhtzjtx.asp?bm=<%=bm%>&htzj=<%=gcfy2%>&xs=（按业务员）工程费用统计图形&dw=元">工程费用图形</a>&nbsp;&nbsp;    
 <%end if %>  
 <%if xsfy1<>0 then%>  
  <a href="F_bmhtzjtx.asp?bm=<%=bm%>&htzj=<%=fwfy2%>&xs=（按业务员）服务/食宿费用统计图形&dw=元">服务/食宿费用图形</a>&nbsp;&nbsp; 
  <%end if %>  
 <%if xsfy1<>0 then%>  
      <a href="F_bmhtzjtx.asp?bm=<%=bm%>&htzj=<%=zlr2%>&&xs=（按业务员）利润统计图形&dw=元">利润图形</a>&nbsp;&nbsp;  
 <%end if %> 
                                                                                                                  
<% end if %>    
  
 <p>                
&nbsp;&nbsp;<a href="../Order/tjcx/cxjm.htm">返回</a>
     
                  
               
     </font>   
                  
               
</body>