<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
Dim rsLan
Dim rsLan_numRows
Set rsLan = Server.CreateObject("ADODB.Recordset")
rsLan.ActiveConnection = MM_connOtoque_STRING
rsLan.Source = "SELECT * FROM Lancamentos ORDER BY id_lancamentos DESC"
rsLan.CursorType = 0
rsLan.CursorLocation = 2
rsLan.LockType = 1
rsLan.Open()
rsLan_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index
Repeat1__numRows = 10
Repeat1__index = 0
rsLan_numRows = rsLan_numRows + Repeat1__numRows
%>
Site Oficial - O Toque - Música Popular Brasileira do Mundo
<%
rsLan.Close()
Set rsLan = Nothing
%>
