<% idnews=request("idnews") sql="select * from news where idnews=" & idnews sql1="select Link, LinkDesc from Link where IDNews=" & idnews GetConnection conn,rs rs.open sql,conn newslead=rs("NewsNote") newstext=rs("FullText") newstitle=rs("NewsTitle") newstitle=ReplaceComApos( newstitle ) newstopic=rs("NewsTopic") newstopic=ReplaceComApos( newstopic ) newsauthor=rs("Author") newsauthor=ReplaceComApos( newsauthor ) newslead=ReplaceComApos( newslead ) newsdate=rs("VisDate") newsDateOriginal=rs("NewsDate") newsorigin=rs("NewsOrigin") newstext=ReplaceComApos( newstext ) main=rs("main") NewsPublic=main=rs("NewsPublic") DateOriginal=year(rs("NewsDate")) rs.close 'Call Mail (idnews,newstopic,newstitle) LastChar = Len(newstext) rs.open sql1,conn if not rs.eof then links=rs.getrows() LinkCount=ubound(links,2) +1 end if CloseConnection conn, rs if not NewsPublic then if not session("logged") then response.redirect "login.asp?redir=interna.asp?" & Request.QueryString end if end if %> Print news - IPS Inter Press Service
IPS Home Page
<%GMTTime=DateAdd("h", 7,now())%> <%=FormatDateTime(GMTTime, 1)%>   <%=FormatDateTime(GMTTime, 4)%> GMT

<%=ReplaceComApos(newstopic)%>:
<%=ReplaceComApos(newstitle)%>


<%=newsauthor%>


<%=newslead%>

<%=NewsOrigin%>, <%=NewsDate%> (IPS) -
<%=CarrRet(newstext)%> <%=" (FIN/"& DateOriginal &")"%>