% ' ********************************************************************* declare les variables Dim rs ' ********************************************************************** construit l'insrtuction sql strSQL = "SELECT * FROM partenaires ORDER BY societe ASC" ' '*************************************************************************** selectionne l' enregistrement Set rs = Server.CreateObject("ADODB.Recordset") rs.Open strSQL, oConn, 1, 2 ,1 %>
|
|
|
Nous sommes heureux de vous
présenter notre brochure en ligne (cliquez
ici)
It is our pleasure to give you a direct access to our brochure
(download)
Réalisation :
ENDERNET-CONSULTING
Textes : Michel Coste
Crédit
Photo : S. COTTEREAU / D3 Studio, Gilles Peffert,
Vénus de Jim Dine au
Château Smith Haut Lafitte / CPR HTTT
Copyright © Vinimundi 2002 - 2007
