<%@LANGUAGE="VBSCRIPT"%>
<%
Dim Recordset1__MM_ColParam
Recordset1__MM_ColParam = "1"
if (Request.QueryString("id") <> "") then Recordset1__MM_ColParam = Request.QueryString("id")
%>
<%
set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_editor_online_eee_STRING
Recordset1.Source = "SELECT * FROM portada WHERE id = " + Replace(Recordset1__MM_ColParam, "'", "''") + " ORDER BY fecha DESC"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 3
Recordset1.Open()
Recordset1_numRows = 0
%>
EN EL ESTE
