<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
Dim rs_MP3
Dim rs_MP3_numRows
Set rs_MP3 = Server.CreateObject("ADODB.Recordset")
set rs_MP3 =conn.execute("SELECT * FROM Samples WHERE Samples = 'MP3' ORDER BY Autore")
rs_MP3_numRows = 0
%>
<%
Dim rs_VIDEO
Dim rs_VIDEO_numRows
Set rs_VIDEO = Server.CreateObject("ADODB.Recordset")
set rs_VIDEO = conn.execute("SELECT * FROM Samples WHERE Samples = 'VIDEO'")
rs_VIDEO_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index
Repeat1__numRows = -1
Repeat1__index = 0
rs_MP3_numRows = rs_MP3_numRows + Repeat1__numRows
%>
<%
Dim Repeat2__numRows
Dim Repeat2__index
Repeat2__numRows = -1
Repeat2__index = 0
rs_VIDEO_numRows = rs_VIDEO_numRows + Repeat2__numRows
%>
Documento senza titolo
| .. |
|
.. |
|
|
.. |
|
<%
rs_MP3.Close()
Set rs_MP3 = Nothing
%>
<%
rs_VIDEO.Close()
Set rs_VIDEO = Nothing
%>
