<% Dim rstSimple ' ADO recordset Dim chemin Dim repertoire dim fichier Dim affichecode Dim Affichenom affichecode=request.querystring("id") Set rstSimple = cnnSimple.Execute("SELECT * FROM whois where id ="& affichecode &"") Set rs1= cnnSimple.Execute("SELECT photo FROM whois where id ="& affichecode &"") %>

PORTRAIT DE FEMME MAROCAINE
>

PRENOM: <% response.write rstSimple.fields("prenom") %>
NOM : <% response.write rstSimple.fields("nom") %>
PAYS : <% response.write rstSimple.fields("pays") %>
CATEGORIE : <% response.write rstSimple.fields("categorie") %>


PRESENTATION

<% response.write rstSimple.fields("presentation") %>