<%
SQL = "SELECT top 1 News.Title,News.id,News.Content,News.DateTime,NewsClass.Class as NewsClass FROM NewsClass INNER JOIN News ON NewsClass.NumberID = News.Class WHERE (((News.Class)='006')) and News.ontop=true ORDER BY News.ID DESC"
'response.write sql1
set rs2 =server.CreateObject("adodb.recordset")
rs2.open SQL,conn,1,1
if rs2.eof and rs2.bof then
response.write "
?Y?TD??¢£?"
else
nn=0
dim g
g=0
while not rs2.eof
g=g+1
%>
<%=rs2("Content")%>
<%
rs2.movenext
wend
rs2.close
set rs2=nothing
end if
%>