%
if session("S_login")="" then
Response.Redirect "../default.asp"
end if
%>
--
<%
dim db,trs
Set db=new Connections
set trs=server.CreateObject("ADODB.recordset")
strsql="select * from NEWS where ID="& request("ID")
set trs=db.Query (strsql,1)
if not trs.eof or not trs.bof then
txt_news=trs("NEWS")
id=trs("id")
end if
%>
<%
set db=nothing
%>