<%
set objconn=Server.CreateObject("ADODB.Connection")
set objrs1=Server.CreateObject("ADODB.Recordset")
strsql="select top 8 * from news1 order by id desc "
objconn.open strconn
objrs1.open strsql,objconn,1,1
'set objconn=Server.CreateObject("ADODB.Connection")
set objrs=Server.CreateObject("ADODB.Recordset")
strsql="select top 8 * from news order by id desc "
'[ objconn.open strconn
objrs.open strsql,objconn,3,3
%>
<% set news=Server.CreateObject("ADODB.Recordset")
SqlStr="Select TOP 8 * from news where type =1 and flag=1 order by time desc "
news.open SqlStr,objconn2,3,1 %>
<% set newhw=Server.CreateObject("ADODB.Recordset")
SqlSt="Select TOP 8 * from news where type =4 and flag=1 order by time desc "
newhw.open SqlSt,objconn2,3,1 %>
<%
set objrs3=Server.CreateObject("ADODB.Recordset")
strsql3="select top 8 * from anli order by id desc "
objrs3.open strsql3,objconn,0,1
%>