<%dim daos1
set rsdao=server.createobject("adodb.recordset")
sqldao="select top 3 * from [FOX_leis]"        
rsdao.open sqldao,conn,1,1
if rsdao.eof then
response.write "»¹Ã»ÓÐ...£¡"
else
%>
<table border=0 cellspacing=0 cellpadding=0 style="border-collapse: collapse" width="100%">
<%do while not rsdao.eof%>
<tr> 
<td align="left">
<%if not rsdao.eof then%>
<font class="z1">| </font><a class="scap" href="allshop.asp?lexing=<%=rsdao("id")%>" target="_blank"><%=left(rsdao("leixing"),4)%></a>
<%rsdao.movenext 
end if
%></td>
<td align="left">
<%if not rsdao.eof then%>
<font class="z1">| </font><a class="scap" href="allshop.asp?lexing=<%=rsdao("id")%>" target="_blank"><%=left(rsdao("leixing"),4)%></a>
<%rsdao.movenext 
end if
%></td>
<td align="left">
<%if not rsdao.eof then%>
<font class="z1">| </font><a class="scap" href="allshop.asp?lexing=<%=rsdao("id")%>" target="_blank"><%=left(rsdao("leixing"),4)%></a>
<%rsdao.movenext 
end if
%></td></tr>
<%daos1=daos1+1
if daos1>=1 then exit do
loop
end if
rsdao.close
set rsdao=nothing
%>
</table></body></html>