<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
Dim rsMemories
Dim rsMemories_numRows
Set rsMemories = Server.CreateObject("ADODB.Recordset")
rsMemories.ActiveConnection = MM_euetibConn_STRING
rsMemories.Source = "SELECT * FROM MEMORIES ORDER BY NOM_ARXIU DESC"
rsMemories.CursorType = 0
rsMemories.CursorLocation = 2
rsMemories.LockType = 1
rsMemories.Open()
rsMemories_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index
Repeat1__numRows = -1
Repeat1__index = 0
rsMemories_numRows = rsMemories_numRows + Repeat1__numRows
%>
Web EUETIB [Memòries Acadèmiques]
| |
| |
MEMÒRIES ACADÈMIQUES |
 |
<%
rsMemories.Close()
Set rsMemories = Nothing
%>