g_exectj.asp

一个很好的在线购物系统

      </p>                   
                   
    </td>                                                                                          
 </tr>                                                                                         
</table>                                                                                  
                                                                                      
 <%                       
 if Erst.eof then%>             
 <p>                       
<center>没有符合条件的记录！         
 <%if request("tag")="2" then%>         
          <a href="G_tjcx.asp">返回          
      <% else%>         
 </a>        
         <a href="G_Mainexec.asp">返回</a></center>                      
        
 <% end if %>                                
                       
 <%else          
'有数据时，开始分页   
person="" 
closebfb="" 
for p=1 to Erst.RecordCount 
    person=person+Erst("stuffName")+"," 
    closebfb=closebfb+cstr(round(Erst("total1")/Erst("total")*100,2))+"," 
    Erst.Movenext 
next  
'response.write closebfb                                                                                   
if request.querystring("page")<>"" then                                                                                      
   page=cint(request.querystring("page"))                                                                                     
else                                                                                     
   page=1                                                                                     
end if                                                                                     
                                                                                     
Erst.pagesize=10                                                                                   
if page>=Erst.pagecount then                                                                                     
   page=Erst.pagecount                                                                                     
else                                                                                     
   if page<1 then                                                                                     
      page=1                                                                                     
   end if                                                                                     
end if                                                                                     
Erst.absolutepage=page                                                                                     
                                                                                      
%>                       
                                                                                    
                                                                                                
<table border="1" cellspacing="0" width="100%" height="30"  align="center">                                                                                        
                                                                                              
  <tr>                                                                                                        
                                                                                        
     <td width="117" height="24" align="center" bgcolor="#DDD2C4">                                                                                      
      <font size="2">业务员               
      </font>               
     </td>                                                                                                       
    <td width="149" height="24" align="center" bgcolor="#DDD2C4">                                                                                     
     <font size="2">计划跟进客户数量</font>             
     </td>                                                                                                    
     <td width="128" height="24" align="center" bgcolor="#DDD2C4">                                                                                   
      <font size="2">实际跟进客户数量            
      </font>            
     </td>                                                                                                   
                                                                                                      
    <td width="262" height="24" align="center" bgcolor="#DDD2C4">                                                                                  
     <font size="2">完成计划百分比(%)        
     </font>        
     </td>                                                                                                  
                                                                                                     
  </tr>                                                                                                 
                                                                                                 
     <% for n=1  to Erst.pagesize%>                     
         <%if  n mod 2=1 then                          
            bg="#f7f7f7"                            
       else                          
            bg="#EDEBEC"                           
       end if%>                                                                                                    
                                                                                                   
  <tr bgcolor="<%=bg%>">                                                               
                                                                                              
                                                                                                 
    <td width="117" height="23" align="center" ><font size="2"></font><%=Erst("StuffName")%></td>                                                                                    
      <td width="149" height="23" align="center" ><font size="2"><%=Erst("total")%></font></td>         
                                                                                 
      <td width="128" height="23" align="center" ><font size="2"><%=Erst("total1")%></font></td>             
                
              
                                                                                                
      <td width="262" height="23" align="center" ><font size="2"><%=round(Erst("total1")/Erst("total")*100,2)%></font></td>         
           
                                                                                               
                                                                                    
                                                                                  
                                                                                               
                                                                                               
  </tr>                                                                                   
  <%                                                                                   
     Erst.movenext                                                                                   
     if Erst.eof then exit for                                                                                   
  next                                                                                   
  %>                                                                                                  
 </table>             
 <input type="hidden" name="tag" value="<%=tag%>">                                                                                             
                                                                                 
<p align="left">                                                                                
<font size="2">                                                                                                 
   &nbsp;&nbsp; 共<%=Erst.pagecount%>页&nbsp; 第<%=page%>页&nbsp;&nbsp;&nbsp;&nbsp; <a href="G_exectj.asp?page=1&weekid=<%=wid%>&departID=<%=sid%>&tag=<%=tag%>">首页</a>&nbsp;         
   <%if page>1 then %>                                                                                                                    
   <a href="G_exectj.asp?page=<%=(page-1)%>&weekid=<%=wid%>&departID=<%=sid%>&tag=<%=tag%>">上页</a>&nbsp;                                                                                                                   
   <% else%>                                                                                                                   
   上页&nbsp;                                                                                                                   
  <%  end if%>                                                                                                                   
    <%if page<Erst.pagecount then %>                                                                                                                  
   <a href="G_exectj.asp?page=<%=(page+1)%>&weekid=<%=wid%>&departID=<%=sid%>&tag=<%=tag%>">下页</a>&nbsp;                                                                                                                   
   <% else %>                                                                                                                  
   下页&nbsp;                                                                                                                   
  <%end if%>         
  <a href="G_exectj.asp?page=<%=Erst.pagecount%>&weekid=<%=wid%>&departID=<%=sid%>&tag=<%=tag%>">尾页</a>&nbsp;&nbsp;</font>                        
                        
                       
                                                                                                               
      <select  name="page1" style="width:80" size="1">                                  
       <% for o=1 to Erst.pagecount%>                                                          
          <option value="<%=o%>">第<%=o%>页</option>                                
       <%next%>                                                      
                                                              
      </select>          
      <input type="button" value="GO" onclick="Gopage()" class="hand" style="background-color: #D1D1D1; border-style: solid; border-width: 1" >     
      &nbsp;&nbsp; &nbsp;<a  href="../contract/f_bmhtzjtx.asp?bm=<%=person%>&htzj=<%=closebfb%>&xs=跟进计划执行统计图形&dw=百分比">图形</a>&nbsp; <a href="javascript:window.print()">打印</a>                                                                                         
                                                                                
<p align="left">                                                                               
&nbsp; <%if request("tag")="2" then%>         
          <a href="G_tjcx.asp">返回</a>         
      <% else%>         
            <a href="G_mainexec.asp">返回              
      <% end if %>         
                                                                                                                     
 </form>                                                                                                                       
<%         
Erst.close          
set Erst=nothing         
end if %>                   
                   
</a>                  
                   
</body>