%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<% Set conn = Server.CreateObject("ADODB.Connection") conn.ConnectionString = "DSN=fotosantjoan.com.data" conn.Open set rs = Server.CreateObject("ADODB.Recordset") sentencia = "SELECT * FROM presenta WHERE id=2" rs.open sentencia,conn,3,3 %>