<%if rs("subnews_id")<>"" then
subnews_id=rs("subnews_id")
set rs1=server.createobject("adodb.recordset")
rs1.open "select * from sh_subnews where subnews_id='"&subnews_id&"' order by subnews_id",conn,1,1
subnews=rs1("subnews")
rs1.close:set rs1=nothing
end if
%>