<% id = Request.QueryString("id") cat = Request.QueryString("cat") %>
Volver <% strSQL = "select * from propuestas_ventas where id="&id AbrirBD() objRS.Open strSQL, objConn, 1 If Not objRS.EOF Then %> <%=Ucase(cat)%> <%=Ucase(objRS("txt_torneo"))%> <%=objRS("txt_subtitulo")%> REGLAMENTO

<% If Len(objRS("reglamento"))>0 Then Response.Write Replace(objRS("reglamento"),chr(13),"
") End If %>

<% Else %>

Error: No se encontraron los datos de la propuesta

<% End If CerrarBD() %>