3

 医学百科

    <% '''''信息公告*5开始 set rs=server.CreateObject("adodb.recordset") sql="select top 6 id,title,writetime from news where newstype=40 order by writetime desc, sort desc,id desc" rs.open sql,conn,3,2 while not rs.eof if(len(rs("title"))>26) then response.Write("
  • "&year(rs("writetime"))&"-"&month(rs("writetime"))&"-"&day(rs("writetime"))&" "&left(rs("title"),24)&"...
  • ") else response.Write("
  • "&year(rs("writetime"))&"-"&month(rs("writetime"))&"-"&day(rs("writetime"))&" "&left(rs("title"),26)&"
  • ") end if rs.movenext wend '''信息公告结束 %>