2011-07-05
.fen1{ width:700px; height:20px; float:left; display:inline; text-align:center; margin-
left:4px; margin-top:7px;}
.fen1 a.aab{  border:#CCCCCC solid 1px;  text-align:center; padding:2px 5px; }
.fen1 a:hover.aab{  border:#DC9861 solid 1px; color:#000000;}
.fen1 a.aac{  border:#DC9861 solid 1px; color:#993300;text-align:center; padding:2px 5px;}
.fen1 a,.fen1 span{  border:#CCCCCC solid 1px;  text-align:center; padding:2px 5px; 
width:100px; color:#666666;}
<%a=request("a")
b=request("b")%>
   <% 
page=clng(request("page"))   
Set rs=Server.CreateObject("ADODB.RecordSet") 
if b <> "" then
sql="select * from product where a='"&a&"' and b='"&b&"'  order by id desc"
elseif a<>"" then
sql="select * from product where a='"&a&"' and b='"&b&"'  order by id desc" 
else
sql="select * from product where a=9   order by id desc" 
end if
rs.Open sql,conn,1,1
if rs.eof and rs.bof then
  response.Write("暫時(shí)沒(méi)有記錄")
else 
%>
 
 
 <% 
rs.PageSize=10
eee=10
fff=INT(eee/2)
if page=0 then page=1 
pages=rs.pagecount
if page > pages then page=pages
rs.AbsolutePage=page  
for j=1 to rs.PageSize 
%>
height="192px">
>
http://www.moshibaike.com枯地可耕地枯地非機(jī)動(dòng)車枯地可耕地廳顆進(jìn)可耕地枯地可耕地動(dòng)車枯地

<%