k_stockghdw1.asp

一个很好的在线购物系统

      <%next%>                                     
      </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_stockedit.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_stockghdw1.asp?page=1&jhdh=<%=jhdh%>&year1=<%=year1%>&month1=<%=month1%>&date1=<%=date1%>">首页</a>&nbsp;<%if page>1 then %>                                                                                                                           
   <a href="K_stockghdw1.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_stockghdw1.asp?page=<%=(page+1)%>&jhdh=<%=jhdh%>&year1=<%=year1%>&month1=<%=month1%>&date1=<%=date1%>">下页</a>&nbsp;                                                                                                                          
   <% else %>                                                                                                                         
   下页&nbsp;                                                                                                                          
  <%end if%><a href="K_stockghdw1.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>