%
id=request.QueryString("id")
if id="" or not isnumeric(id) then
Response.Write ""
Response.End()
end if
set rs=server.createobject("adodb.recordset")
exec="select * from News where id="& id
rs.open exec,conn,1,1
if rs.eof then
response.Write "
无此新闻!"
response.End()
end if
set daohang=server.createobject("adodb.recordset")
exec="select * from news_fl where id="&rs("ssfl")&""
daohang.open exec,conn,1,1
%>