k_stockghdw.asp

一个很好的在线购物系统

      </select>&nbsp;&nbsp;&nbsp;     
          
      <input type="submit" value="查询"  class="hand" style="background-color: #D1D1D1; border-style: solid; border-width: 1">                       
                       
    </td>                                                                                              
 </tr>         
                
                                                                                                           
</table>                   
</form>                                                                                  
                                                                                          
 <%                           
 if RSkh.eof then%>                           
<center><p>                    
<font size="2">没有符合条件的记录！                     
</font>                     
</center>                            
                            
 <%else                                                                                              
   if request.querystring("page")<>"" then                                                                                             
   page=cint(request.querystring("page"))                                                                                            
else                                                                                            
   page=1                                                                                            
end if                                                                                            
                                                                                            
RSkh.pagesize=6                                                                                           
if page>=RSkh.pagecount then                                                                                            
   page=RSkh.pagecount                                                                                            
else                                                                                            
   if page<1 then                                                                                            
      page=1                                                                                            
   end if                                                                                            
end if                                                                                            
RSkh.absolutepage=page                                                                                            
                                                                                             
%>                              
                                                                                          
 <form name="myform" method="post" action="K_stock.asp" target="main">                                                                                                          
<table border="1" cellspacing="0" width="100%" height="30" width="100%" width="100%">                                                                                              
                      
                                                                                             
  <tr>                                                                                                          
                                                                                              
     <td width="37" height="24" align="center" width="122" bgcolor="#DDD2C4">&nbsp;                                                                                            
     </td>                                                                                                             
    <td width="144" height="24" align="center" width="131" bgcolor="#DDD2C4">                                                                                           
     <font size="2">供应商名称                
     </font>                
     </td>                                                                                                         
    <td width="161" height="24" align="center" width="84" bgcolor="#DDD2C4">                                                                                        
     <font size="2">供应商类型
     </font>
     </td>                                                                                                         
     <td width="157" height="24" align="center" width="84" bgcolor="#DDD2C4">                                                                                        
     <font size="2">供应商级别
     </font>
     </td>                                                                                                               
                                                                                                            
    <td width="73" height="24" align="center" width="120" bgcolor="#DDD2C4">                                                                                        
     <font size="2">区域     
     </font>     
     </td>                                                                                                        
                                                                                                          
    <td width="73" height="24" align="center" width="120" bgcolor="#DDD2C4">                                                                                       
     <font size="2">采购员          
     </font>          
     </td>                                                                                                        
                                                                                                          
  </tr>                                                                                                     
                                                                                                     
     <% for n=1  to RSkh.pagesize%>                         
                                                                                                  
      <%if  n mod 2=1 then                         
            bg="#f7f7f7"                           
       else                         
            bg="#EDEBEC"                          
       end if%>                                                                                                         
  <tr bgcolor="<%=bg%>">                                                                   
                                                                                               
                                                                                                     
    <td width="37" height="23" align="center" width="122">           
           
     <p align="left">          
     <font size="2"></font>            
     <input type="radio" value="<%=RSkh("ProNum")%>" name="ghdwxh">         
         
     </p>          
          
       </td>                                                                                       
      <td width="144" height="23" align="center" width="131"><font size="2"><%=RSkh("ProName")%>                
       </font>                
    </td>            
     <td width="161" height="23" align="center" width="84"><font size="2">&nbsp;    
              
       </font>                
    </td>                                                                                                    
      <td width="157" height="23" align="center" width="84"><font size="2">&nbsp;               
       </font>                
    </td>                                                                                                  
                                                                                     
      <td width="73" height="23" align="center" width="120">&nbsp; </td>                                                                                                  
                     
                                                                                                  
      <td width="73" height="23" align="center" width="120"><font size="2">&nbsp;</td>                                                                                                  
                     
                                                                                                  
  </tr>                                                                                      
  <%                                                                                      
     RSkh.movenext                                                                                      
     if RSkh.eof then exit for                                                                                      
  next                                                                                      
  %>          
                                                                                                                                                                            
 </table>          
  <input type="hidden" name="jhdh" value="<%=jhdh%>"> 
  <input type="hidden" name="year1" value="<%=year1%>"> 
  <input type="hidden" name="month1" value="<%=month1%>">  
  <input type="hidden" name="date1" value="<%=date1%>">                
                                                                                                         
                                                                                                    
<p align="center">          
                                                                                                   
<font size="2">                                                                                                   
   共<%=RSkh.pagecount%>页&nbsp; 第<%=page%>页&nbsp;&nbsp;&nbsp;&nbsp; <a href="K_stockghdw.asp?page=1&jhdh=<%=jhdh%>&year1=<%=year1%>&month1=<%=month1%>&date1=<%=date1%>">首页</a>&nbsp;<%if page>1 then %>                                                                                                                          
   <a href="K_stockghdw.asp?page=<%=(page-1)%>&jhdh=<%=jhdh%>&year1=<%=year1%>&month1=<%=month1%>&date1=<%=date1%>">上页</a>&nbsp;                                                                                                                         
   <% else%>                                                                                                                         
   上页&nbsp;                                                                                                                         
  <%  end if%>                                                                                                                         
    <%if page<RSkh.pagecount then %>                                                                                                                        
   <a href="K_stockghdw.asp?page=<%=(page+1)%>&jhdh=<%=jhdh%>&year1=<%=year1%>&month1=<%=month1%>&date1=<%=date1%>">下页</a>&nbsp;                                                                                                                         
   <% else %>                                                                                                                        
   下页&nbsp;                                                                                                                         
  <%end if%><a href="K_stockghdw.asp?page=<%=RSkh.pagecount%>&jhdh=<%=jhdh%>&year1=<%=year1%>&month1=<%=month1%>&date1=<%=date1%>">尾页</a>&nbsp;&nbsp;</font>                              
 <%%>                                
                              
                                                                                                                      
      <select  name="page1" style="width:80" size="1">                                         
                                                
                                
       <% for o=1 to RSkh.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;               
 <p align="left">    <input type="button" value="确定" name="bb" onclick="winsub()" class="hand" style="background-color: #D1D1D1; border-style: solid; border-width: 1">                    
 </form>                                                                                                                            
<%              
    RSkh.close               
    set RSkh=nothing               
end if %>                        
                        
</body>