f_swhtdetail.asp

一个很好的在线购物系统

                                                                                                 
 <center>                                                     
                                              
                                                          
<div align="center">              
 <center>                       
                                                                                    
                                                                                                
<table border="1" cellspacing="0" width="100%" height="30" width="100%" width="100%">                                                                                        
  <form action="F_swhtdel.asp" method="post">                                                                                            
  <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>                                                                                                     
                                                                                                       
    <td width="104" height="24" align="center" width="146" bgcolor="#DDD2C4">                                                                                    
     操作     
     </td>                                                                                                    
                                                                                                      
  </tr>                                                                                                  
                                                                                                  
   <% 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("ClientNum")&"'"           
       RSkh.open sql,Pubconn,1           
                  
       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%>"></td>   
     <input type="hidden" name="htID<%=n%>" value="<%=htcx("ID")%>">                                                                                    
      <td width="53" height="23" align="center" width="131"><font size="2"><%=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"><%=htcx("signtime")%>             
       </font>             
    </td>                                                                                               
      <td width="61" height="23" align="center" width="120"><font size="2"></font><%=rskh("ClientName")%></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           
           
      %></td>                                                                                                
                   
                                                                                                    
                                                                                    
                                                                                  
                                                                                               
                                                                                               
      <td width="104" height="23" align="center" width="146"><font size="2"></font>   
           
<font size="2">                                                                                    
     <a href="F_swhtedit.asp?ID=<%=htcx("ID")%>">操作   
       </font>   
           
     </td>                                                                                                
                   
                                                                                                    
                                                                                    
                                                                                  
                                                                                               
                                                                                               
  </tr>                                                                                   
  <%                                                                                   
     htcx.movenext                                                                                   
     if htcx.eof then exit for                                                                                   
  next                                                                                   
  %>                                                                                                  
 </table>                                                                                                  
                                                                                 
 </center>           
</div>           
                                                                                 
<p align="center">                                                                                
<font size="2">                                                                                                 
   共<%=htcx.pagecount%>页&nbsp; 第<%=page%>页&nbsp;&nbsp;&nbsp;&nbsp; <a href="f_swhtdetail.asp?page=1">首页</a>&nbsp;<%if page>1 then %>                                                                                                                     
   <a href="f_swhtdetail.asp?page=<%=(page-1)%>">上页</a>&nbsp;                                                                                                                    
   <% else%>                                                                                                                    
   上页&nbsp;                                                                                                                    
  <%  end if%>                                                                                                                    
    <%if page<htcx.pagecount then %>                                                                                                                   
   <a href="f_swhtdetail.asp?page=<%=(page+1)%>">下页</a>&nbsp;                                                                                                                    
   <% else %>                                                                                                                   
   下页&nbsp;                                                                                                                    
  <%end if%><a href="f_swhtdetail.asp?page=<%=htcx.pagecount%>">尾页</a>&nbsp;&nbsp;</font>                         
 <%%>                          
                        
                                                                                                                
      <select  name="page1" style="width:80" size="1">                                   
                                          
                          
       <% for count=1 to htcx.pagecount%>                                                           
         <option value="<%=count%>">第<%=count%>页</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>   
 <input type="button" value="新增"  onclick="location.href='F_contractnew.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>