% set conn=server.Createobject("ADODB.Connection") conn.Open Application("strConn") Set rs=Server.CreateObject("ADODB.RecordSet") sql="select top 1 * from news where isok='是' and isfocus='是'" rs.open sql,conn,1,1 Set rs1=Server.CreateObject("ADODB.RecordSet") sql1="select top 6 * from news where isok='是' and isfocus=''" rs1.open sql1,conn,1,1 %>
|
||||||||||||||||||||||||||||||||||||||||||||||||||
|
||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
| |