k_xsck.asp

一个很好的在线购物系统

                                                                                                                                            
   <% for n=1  to rst.pagesize%>                                                                
        <%if  n mod 2=1 then                                                                      
            bg="#f7f7f7"                                                                        
       else                                                                      
            bg="#EDEBEC"                                                                       
       end if%>                                                                                                                                          
                                                                                                                                              
  <tr bgcolor="<%=bg%>">                                                                                                          
                                                                                                                   
                                                                                                                                            
                                                                                                                                
      <td width="55" height="23" align="center" width="131"><font size="2"><%=rst("ordernum")%></A></font></td>                                                        
                                                                                                                                            
      <td width="74" height="23" align="center" width="98"><font size="2"><%=rst("xsrq")%>                                                       
       </font>                                                       
    </td>                                                                                                                                         
      <td width="118" height="23" align="center" width="146"><%=Sname(rst("spxh"))%></td>                                                                                                                                          
                                                                                                                              
      <td width="52" height="23" align="center" width="146"><%=rst("spsl")%></td>                                                                                                                                         
                                                                                                                                 
      <td width="89" height="23" align="center" width="146"><%=rst("ckxh")%>                                             
        <%'获取当前系统日期                                     
		curyear=year(date())       
		Tmonth=month(date())       
		Tdate=day(date())        
		if Tmonth<10 then       
		   curmonth="0"&Tmonth       
		else       
		   curmonth=Tmonth       
		end if        
		if Tdate<10 then       
		   curdate="0"&Tdate       
		else       
		   curdate=Tdate       
		end if       
		m_date=curyear&"-"&curmonth&"-"&curdate     %>                                                                                                                                             
      <td width="99" height="23" align="center" width="146"><input type="text" name="ckrq<%=n%>" size="10" value="<%=m_date%>"  readonly style="background-color: #edefef"></td>                                                                                                                                       
                                                                                                                                
      <td width="58" height="23" align="center" width="146"><input type="text" name="cksl<%=n%>" size="4"  maxlength="4"></td>                                                                                                                                       
                                                                                                                               
      <td width="66" height="23" align="center" width="146"><input type="text"  name="jbr<%=n%>" value="<%=session("username")%>" size="6"  readonly style="background-color: #edefef"> </td>                                                                                                                                       
                                                                                                                            
      <td width="28" height="23" align="center" width="146"><input type="checkbox" value="<%=n%>"  name="xz">                           
        <input type="hidden" value="<%=rst("ID")%>"  name="xsid<%=n%>">             
        <input type="hidden" value="<%=rst("spsl")%>"  name="xssl<%=n%>">                         
</td>                                                                                                                                       
                                                                                                                                 
  </tr>                                                                                                                          
  <%                                                                                                                          
     rst.movenext                                                                                                                          
     if rst.eof then exit for                                                                                                                          
  next                                                                                                                          
  %>                                                                                                                                         
 </table>                                                                                                                                         
                                                                                                                        
<p align="center">                                                                                                                       
<font size="2">                                                                                                                                        
   共<%=rst.pagecount%>页&nbsp; 第<%=page%>页&nbsp;&nbsp;&nbsp;&nbsp; <a href="k_xsck.asp?page=1">首页</a>&nbsp;<%if page>1 then %>                                                                                                                                                                  
   <a href="k_xsck.asp?page=<%=(page-1)%>">上页</a>&nbsp;                                                                                                                                                                 
   <% else%>                                                                                                                                                                 
   上页&nbsp;                                                                                                                                                                 
  <%  end if%>                                                                                                                                                                 
    <%if page<rst.pagecount then %>                                                                                                                                                                
   <a href="k_xsck.asp?page=<%=(page+1)%>">下页</a>&nbsp;                                                                                                                                                                 
   <% else %>                                                                                                                                                                
   下页&nbsp;                                                                                                                                                                 
  <%end if%><a href="k_xsck.asp?page=<%=rst.pagecount%>">尾页</a>&nbsp;&nbsp;</font>                                                                      
 <%%>                                                                       
                                                                     
                                                                                                                                                             
      <select  name="page1" style="width:80" size="1">                                                                                
                                                                                       
                                                                       
       <% for count=1 to rst.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">                                              
  <p align="center">               
  <input type="submit" value="保存" name="bc"  class="hand" style="background-color: #D1D1D1; border-style: solid; border-width: 1">                    
 &nbsp;&nbsp;&nbsp;&nbsp;<a href="k_xsckbrow.asp">返回</a>                                   
 </form>                                        
                                             
                                                                                                                                           
<%                                              
rst.close                                              
set rst=nothing                                              
 end if                                   
  %>                                                               
                                                            
                                                               
 </font>                                          
                                                            
                                                               
</body>