<%=headerPage%>
<% newsID = trim(request.querystring("newsID")) if newsID = "" OR isNumeric(newsID) = false then response.redirect "default.asp" end if Set Con = Server.CreateObject ("ADODB.Connection") Con.Open strCon sql = "Select * from news where newsID = "& newsID set Rec = Con.execute(sql) response.write "" & Rec("headline") & "
" & vbcrlf response.write ""& vbcrlf response.write "Publish Date : " & Rec("newsDate") & "   Source : "& rec("source") &"

"& vbcrlf response.write ""& vbcrlf response.write Rec("newsBody") & "
" if NOT Rec("newsUrl") = "" then response.write "" & rec("newsUrl") & "" end if response.write "
" Rec.Close Con.Close set Rec = nothing set Con = nothing %>
<%=footerPage%>