la Marocaine

<% Dim rstSimple ' ADO recordset Dim chemin Dim repertoire dim fichier Dim affichecode Dim Affichenom affichecode=request.querystring("m") Set rstSimple = cnnSimple.Execute("SELECT * FROM cuisine where idcat ="& affichecode &"") %>
CUISINE MAROCAINE
<%Do While Not rstSimple.EOF%> "> <%= rstSimple.fields("titre").Value %> <% rstSimple.MoveNext Loop rstSimple.Close Set rstSimple = Nothing cnnSimple.Close Set cnnSimple = Nothing %>

LA CUISINE EN VIDEO
		choumicha 1 : Cuisine Marocaine choumicha 2 : Friandises au lait choumicha 3 : Cuisine Marocaine choumicha 4 : Boulettes aux poulets choumicha 5 : baguettes aux tomates sechées