<% qyid=cint(request("qyid")) set rs=server.createobject("adodb.recordset") rs.open "select * from wenzhang where id="&qyid,conn,1,1 if rs.recordcount=0 or not (rs("leibie")=9 or rs("leibie")=99) then response.write "文章不存在!" rs.close set rs=nothing conn.close set conn=nothing response.end else title=rs("title") pic=rs("pic") shijian=rs("date") content=rs("content") att=rs("affix") fbks=rs("fbks") end if rs.close set rs=nothing conn.close set conn=nothing %> 北京市体检中心
动态信息
通知公告

<%=title%>

www.bjtjzx.com 时间:<%=formatdatetime(shijian,vblongdate)%><%if fbks<>"" then response.Write("  发布科室:"&fbks) end if%>

 
<%if pic<>"" then response.write ""%> <%=content%> <%if att<>"" then response.write "


附 件:" path=split(att,";") for i=0 to ubound(path) %> <%=path(i)%> ; <% next end if %>