<%
id=request.QueryString("id")
set rs=server.createobject("adodb.recordset") 
sql="select * from dy where id="&id
rs.open sql,conn,1,1
id=rs("id")
title=rs("title")
content=UBBCode(rs("content"))
gjza=rs("gjz1")
msa=rs("ms")
zdfy=rs("zdfy")
zmone=rs("zmone")
if rs.eof and rs.bof then
Response.Write("<script language=javascript> alert('信息内容已被删除!');window.location.replace('index.asp');</script>")
end if
%>