%
id=32
sqlstr="select content from Ameav_About where id="&id
set rs=server.CreateObject("adodb.recordset")
rs.open sqlstr,conn,1,1
if not rs.eof then
content2=rs("content")
end if
id=26
sqlstr="select content from Ameav_About where id="&id
set rs=server.CreateObject("adodb.recordset")
rs.open sqlstr,conn,1,1
if not rs.eof then
content3=rs("content")
end if
id="0"
sqlstr="select top 1 id from Ameav_News where sortid=10 order by addtime desc"
set rs=server.CreateObject("adodb.recordset")
rs.open sqlstr,conn,1,1
if not rs.eof then
id=rs("id")
end if
sqlstr="select * from Ameav_News where id="&id
set nrs=server.CreateObject("adodb.recordset")
nrs.open sqlstr,conn,1,1
if not nrs.eof then
newsname=nrs("newsname")
content=nrs("content")
addtime=nrs("addtime")
bigpic=nrs("bigpic")
end if
sqlstr="select top 3 * from Ameav_News where id<>"&id&" and sortid=10 order by addtime desc"
set trs=server.CreateObject("adodb.recordset")
trs.open sqlstr,conn,1,1
rownum=3
%>