<% Dim rstSimple ' ADO recordset Dim id Dim affichecode Dim Affichenom affichecode=request.querystring("b") Set rstSimple = cnnSimple.Execute("SELECT * FROM prenoms where idprenom ='"& affichecode &"'") %>

PRENOM : <%response.write rstSimple.fields("prenom")%> PRENOM : <%response.write rstSimple.fields("prenom")%> EXPLICATION : <% response.write rstSimple.fields("explication") %> ORIGINE : <% response.write rstSimple.fields("Origine") %>   VOIR LES AUTRES PRENOMS FEMININS