 |
<%
Set Cnn = Server.CreateObject("ADODB.Connection")
Set RS = CreateObject("ADODB.Recordset")
Cnn.Open "DSN=revista;UID=;PWD=;"
sSql = "SELECT * FROM Ediciones ORDER BY Volumen DESC,Numero DESC"
RS.Open sSql, Cnn
RS.MoveNext
DO WHILE NOT RS.EOF
%>
|
|
<%
RS.MoveNext
IF NOT RS.EOF THEN
%>
|
<%
RS.MoveNext
END IF %>
<%
LOOP
RS.Close
Cnn.Close
%>
VOLÚMENES 1 (1948) al 35 (2000)
VOLUMES 1 (1948) TO 35 (2000)
|

|
 |
|