<%
Set rsKind = Server.CreateObject("ADODB.Recordset")
sqlk = "Select top 7 * from ziyuan_content where classid in (Select classid From Ziyuan_Classname Where classcname='景点介绍') order by id desc"
rsKind.open sqlk,conn,1,1%>
<%WHILE not rsKind.eof%>
<%
rsKind.Movenext
Wend
rsKind.close
Set rsKind = nothing
%>