%
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 rs("leibie")<>8 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")
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>