% dim rs1,sql1 set rs1=server.CreateObject("ADODB.RecordSet") sql1="select top 8 * from da where lm='gsxw' order by id desc" rs1.open sql1,conn,1,1 dim rs2,sql2 set rs2=server.CreateObject("ADODB.RecordSet") sql2="select top 8 * from da where lm='syxw' order by id desc" rs2.open sql2,conn,1,1 dim rs3,sql3 set rs3=server.CreateObject("ADODB.RecordSet") sql3="select top 7 * from da where lm='ssyw' order by id desc" rs3.open sql3,conn,1,1 dim rs4,sql4 set rs4=server.CreateObject("ADODB.RecordSet") sql4="select top 5 * from da where lm='tzgg' order by id desc" rs4.open sql4,conn,1,1 %>
| ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||