<%
' Ouverture de la connexion avec la base de données
Set Con = Server.CreateObject( "ADODB.Connection" )
Con.Open "PATRICIA"
%>
<%
sqlString = "SELECT distinct nom FROM repertoire"
sqlString = sqlString & " ORDER BY nom"
SET RSN = Con.Execute( sqlString )
%>
Esthétique
Patricia
