<% Dim rsNews2 'Database recordset holding the news items Dim rsCommentsCount2 'Database recordset holding the number of comments for a News Item Dim intNewsItems2 'Loop counter for displaying the news items 'Create recorset object Set rsNews2 = Server.CreateObject("ADODB.Recordset") 'Initalise the strSQL variable with an SQL statement to query the database by selecting all tables ordered by the decending date strSQL2 = "SELECT News_title, News_item FROM tblNews WHERE News_ID=" & Request("NoticiaID") rsNews2.Open strSQL2, adoCon2 xTitulo2 = rsNews2("News_title") xNoticia2 = rsNews2("News_item") rsNews2.Close set rsNews2 = nothing %>
Voltar atrás