% ' ********************************************************************* 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 %>
To contact us,

710 chemin de Valsère
13510 Eguilles, France
tel : + 33 (0) 677 962 710
email : contact@vinimundi.com
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
![]() ![]() ![]() ![]() ![]() ![]() |
|
|
|
|
Home | Tours | The team | Tasting guide |Guest book | Contact us |
