<%
conn.Open connstr
dim rsmap
dim mapsql
set rsmap = Server.CreateObject("ADODB.Recordset")
set rsmap1 = Server.CreateObject("ADODB.Recordset")
mapsql = "SELECT top 5 * FROM news where lanmu=3 order by id desc "
rsmap.open mapsql,conn,1,1
mapsql = "SELECT top 5 * FROM news where lanmu=2 order by id desc "
rsmap1.open mapsql,conn,1,1
%>
病原微生物生物安全国家重点实验室
