f_contractbrow1.asp

一个很好的在线购物系统

htcx.absolutepage=page                                                                                             
                                                                                              
%>                               
                                                                                            
                                                                                                        
                
                                                                                           
                                                                                                       
<table border="1" cellspacing="0" width="100%" height="30" width="100%" width="100%">                                                                                               
  <form action="F_contractdel1.asp"  method="post" name="form1">                                                                                                   
  <tr>                                                                                                               
                                                                                               
     <td width="69" height="24" align="center" width="122" bgcolor="#DDD2C4">                                                                                             
      　                     
     </td>                                                                                                              
    <td width="53" height="24" align="center" width="131" bgcolor="#DDD2C4">                                                                                            
     <font size="2">合同号             
     </font>             
     </td>                                                                                                            
    <td width="105" height="24" align="center" width="84" bgcolor="#DDD2C4">                                                                                           
     <font size="2">销售代表             
     </font>             
     </td>                                                                                                            
     <td width="83" height="24" align="center" width="98" bgcolor="#DDD2C4">                                                                                           
     <font size="2">客户名称             
     </font>             
     </td>                                                                                                            
                                                                                                               
    <td width="61" height="24" align="center" width="120" bgcolor="#DDD2C4">                                                                                           
     <font size="2">联系人</font>            
     </td>                                                                                                           
    <td width="104" height="24" align="center" width="146" bgcolor="#DDD2C4">                                                                                          
     <font size="2">合同状态            
     </font>            
     </td>                                                                                                           
                                                                                                             
  </font>       
                                                                                                             
    <td width="104" height="24" align="center" width="146" bgcolor="#DDD2C4">                                                                                          
     <font size="2">                                                                                          
     操作       
     </font>       
     </td>                                                                                                          
                                                                                                            
  </tr>                                                                                                        
                                                                                                        
<font size="2">                                                                                                        
                                                                                                        
   <% for n=1  to htcx.pagesize%>                            
        <%if  n mod 2=1 then                                  
            bg="#f7f7f7"                                    
       else                                  
            bg="#EDEBEC"                                   
       end if%>                                                                                                      
                                                                                                          
  <tr bgcolor="<%=bg%>">                                                                      
       <%                 
       '找出对应的客户名称与业务员名字                 
       set RSkh=server.createobject("adodb.recordset")                 
       sql="select *  from D_ClientInfo where ClientNum='"&htcx("Needer")&"'"                 
       RSkh.open sql,Pubconn,1       
       if not rskh.eof then      
          khmc=rskh("ClientName")      
       else      
          khmc=""      
       end if                 
                        
       set RSywy=server.createobject("adodb.recordset")                 
       sql="select *  from A_StuffInfo where StuffNum='"&htcx("SaleDelegate")&"'"                 
       RSywy.open sql,Pubconn,1                 
                 
       %>                                                                                              
                                                                                                        
    <td width="69" height="23" align="center" width="122"><font size="2"></font>              
     <input type="checkbox" name="xz"  value="<%=n%>" <%if (htcx("YesorNo")<>"1" and  htcx("YesorNo")<>"2") or (ucase(htcx("Authors"))<>ucase(username)) then%> disabled <%end  if %>></td>         
     <input type="hidden" name="htID<%=n%>" value="<%=htcx("ID")%>">                                                                                          
      <td width="53" height="23" align="center" width="131"><font size="2"><a href="F_contractshbrow1.asp?ID=<%=htcx("ID")%>&flag=liu"><%=htcx("Contractnum")%> </font></td>                    
                                                                                                        
      <td width="105" height="23" align="center" width="84"><font size="2"><%=RSywy("Name")%>                   
       </font>                   
    </td>                                                                                                     
      <td width="83" height="23" align="center" width="98"><font size="2"><%=khmc%>                   
       </font>                   
    </td>                                                                                                     
      <td width="61" height="23" align="center" width="120"><font size="2"></font><% if htcx("linkman")="" then    
         response.write "&nbsp;"    
      else    
         response.write htcx("linkman")    
      end if     
      %></td>                                                                                                     
      <td width="104" height="23" align="center" width="146"><%           
      if htcx("YesorNo")="1" then           
         response.write ("未评审")           
      end if            
      if  htcx("YesorNo")="2"   then            
          response.write ("评审未通过")           
      end if           
      if  htcx("YesorNo")="3"  then           
          response.write ("正在评审")           
      end if                 
     if  htcx("YesorNo")="3"  then           
          response.write ("已评审")           
      end if            
      %></td>                                                                                                      
                         
                                                                                                          
                                                                                          
                                                                                        
                                                                                                     
                                                                                                     
      <td width="104" height="23" align="center" width="146"><font size="2"></font>         
                 
<font size="2">                                                                                          
     <%if htcx("YesorNo")="1" and htcx("yesorno")="2" then%><a href="F_contractedit1.asp?ID=<%=htcx("ID")%>&xsdb=<%=htcx("SaleDelegate")%>"><%end if %>操作         
       </font>         
                 
       </a>       
                 
     </td>                                                                                                      
                         
                                                                                                          
                                                                                          
                                                                                        
                                                                                                     
                                                                                                     
  </tr>                                                                                         
  <%                                                                                         
     htcx.movenext                                                                                         
     if htcx.eof then exit for                                                                                         
  next                                                                                         
  %>                                                                                                        
 </table>                                                                                                        
                                                                                       
</div>                 
                                                                                       
<p align="center">                                                                                      
<font size="2">                                                                                                       
   共<%=htcx.pagecount%>页&nbsp; 第<%=page%>页&nbsp;&nbsp;&nbsp;&nbsp; <a href="F_contractbrow1.asp?page=1&hth=<%=hth%>&xsdb=<%=xsdb%>">首页</a>&nbsp;<%if page>1 then %>                                                                                                                            
   <a href="F_contractbrow1.asp?page=<%=(page-1)%>&hth=<%=hth%>&xsdb=<%=xsdb%>">上页</a>&nbsp;                                                                                                                           
   <% else%>                                                                                                                           
   上页&nbsp;                                                                                                                           
  <%  end if%>                                                                                                                           
    <%if page<htcx.pagecount then %>                                                                                                                          
   <a href="F_contractbrow1.asp?page=<%=(page+1)%>&hth=<%=hth%>&xsdb=<%=xsdb%>">下页</a>&nbsp;                                                                                                                           
   <% else %>                                                                                                                          
   下页&nbsp;                                                                                                                           
  <%end if%><a href="F_contractbrow1.asp?page=<%=htcx.pagecount%>&hth=<%=hth%>&xsdb=<%=xsdb%>">尾页</a>&nbsp;&nbsp;</font>                                
 <%%>                                 
                               
                                                                                                                       
      <select  name="page1" style="width:80" size="1">                                          
                                                 
                                 
       <% for pcount=1 to htcx.pagecount%>                                                                  
         <option value="<%=pcount%>">第<%=pcount%>页</option>                                 
       <%next%>                                                       
                                                               
      </select><input type="button" value="GO" onclick="Gopage()"  class="hand" style="background-color: #D1D1D1; border-style: solid; border-width: 1">                
   &nbsp; <a href="F_htjm.htm">返回</a>        
          
<p align="center">          
 <input type="button" value="新增"  onclick="location.href='F_contract1.asp'"  class="hand" style="background-color: #D1D1D1; border-style: solid; border-width: 1">                
              
 <input type="submit" value="删除"   class="hand" style="background-color: #D1D1D1; border-style: solid; border-width: 1">                
              
                                      
 </form>          
                                                                                                     
<%        
htcx.close        
set htcx=nothing        
 end if %>                         
                      
                         
</body>