Bonjour,
je voudrais savoir si quelqu'un pourrait me dire pourquoi rien ne s'affiche dans ma liste déroulante
merci
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19 <%dim cn 'connection à la base set cn=server.CreateObject("adodb.connection") set rs=server.CreateObject("adodb.recordset") cn.Open connstring2 rs.open "select libelle_priorite " &_ "from priorite " &_ "where id_langue = ('fra')", cn Response.Write ("<select name=prio>") response.write("<option></option>") do while not rs.eof Response.Write ("<option value='" & rs("libelle_priorite") & "'></option>") rs.movenext loop Response.Write("</select>") %>
Partager