<%
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 &"")
%>