<%DSN_BASE = "DBQ=" & Server.Mappath("fpmusix.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};Driverld=25"%> Sélection par style <%Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open DSN_BASE Set Rs = Server.CreateObject("ADODB.Recordset")%> <%Rs.Open "SELECT style FROM style" , Conn%> <%Rs.MoveFirst%>
Style recherché
<%Rs.Close Set Rs = Nothing Conn.Close Set Conn = Nothing%>