<%
Dim cnnrecettes
Dim rstrecettes
Dim rstresto
resto = Request.Form("resto")
if resto = "" then
resto = Request.QueryString("resto")
end if
Set rstrecettes = cnnrecettes.Execute("SELECT t_resto_num, t_receipe, t_rec_num, t_clearance, t_img_path FROM tbl_receipe_sante WHERE t_resto_num LIKE " + resto + " ORDER BY t_receipe;")
Set rstresto = cnnrecettes.Execute("SELECT t_rec_num, t_resto, parent_enabled FROM tbl_resto_sante WHERE t_rec_num = " + resto + ";")
%>
Modifier la catégorie
- recette &resto_id=<%= request.QueryString("resto_idAncien") %>" class="recq"><%=request.QueryString("receipe_id")%>.
catégorie <%= rstresto("t_resto") %>.
<%
If rstresto("parent_enabled") = 1 Then
Set rstrestosub = cnnrecettes.Execute("SELECT t_rec_num, t_resto FROM tbl_resto_sante WHERE parent_cat = " + resto + " ORDER BY t_resto;")
%>
<%
else
%>
">Enregistrer
sous cette section
<%
End If
%>