<%@LANGUAGE="VBSCRIPT"%> <% SESSION.LCID = 1046 %> <% Dim rs_notici Dim rs_notici_numRows Set rs_notici = Server.CreateObject("ADODB.Recordset") rs_notici.ActiveConnection = MM_conexao_STRING rs_notici.Source = "SELECT * FROM noticias ORDER BY data DESC" rs_notici.CursorType = 0 rs_notici.CursorLocation = 2 rs_notici.LockType = 1 rs_notici.Open() rs_notici_numRows = 0 %>

[pular intro]

Banda VP2 - copyright 2009 - Todos os direitos reservados

<% rs_notici.Close() Set rs_notici = Nothing %>