% nivel = 1 session("idi_error") = "es" IdSeccion = 5 Acceso = 1 Idtipo = 0 IdReceta = ValidaId(Request("IdReceta")) set cnn = AbrirConexionMDB() CodigoEncabezado "Matadero de Pamplona", true, nivel EncabezadoMenu IdSeccion, Acceso, IdTipo if cint(IdReceta) = 0 then if Request("q") <> "" then strWhere = "SELECT * FROM Recetas WHERE Activo=1 AND (TituloES LIKE '%" & acentos(Request("q")) & "%' OR IngredientesES LIKE '%" & acentos(Request("q")) & "%' OR ElaboracionES LIKE '%" & acentos(Request("q")) & "%') ORDER BY Prioridad, Fecha DESC" else strWhere = "SELECT * FROM Recetas WHERE Activo=1 ORDER BY Prioridad, Fecha DESC" end if set rs=server.createObject("adodb.recordset") rs.Open strWhere, cnn, 1, 1%>
No hay recetas disponibles.
<%end if end if else 'ficha receta strWhere = "SELECT * FROM Recetas WHERE IdReceta=" & IdReceta set rs=server.createObject("adodb.recordset") rs.Open strWhere, cnn, 1, 1%>