<% id_categorie = 25 ' = "collectionneurs" dans la base nb_max_par_colonne = 7 set template = New PA_template template.open("collectionneurs_tpl.htm") set obj_categorie = new categorie_produit_cls obj_categorie.id = id_categorie obj_categorie.charge() set obj_produit = new produit_cls obj_produit.charge_tout(id_categorie) if obj_produit.end_recordset then template.eraseBloc "tableau_liste" else n_colonne = 1 Do While not obj_produit.end_recordset if obj_produit.url_vignette <> "" then if n_colonne > nb_max_par_colonne then n_colonne = 1 end if if n_colonne = 1 then template.loopBloc "tableau_liste.tableau_ligne",false end if template.loopBloc "tableau_liste.tableau_ligne.tableau_colonne",false template.parse_item "tableau_liste.tableau_ligne.tableau_colonne.url_produit","/FR/produit/" & obj_categorie.id & "-" & genere_url_moteur(obj_categorie.nom_categorie) & "/" & obj_produit.id & "-" & genere_url_moteur(obj_produit.ref_produit) & ".htm" template.parse_item "tableau_liste.tableau_ligne.tableau_colonne.image_produit",obj_produit.url_vignette template.parse_item "tableau_liste.tableau_ligne.tableau_colonne.ref_produit",obj_produit.ref_produit n_colonne = n_colonne + 1 end if obj_produit.rs_suivant() Loop end if template.Write() %>