Bonjour,
Je ne comprends pas pourquoi ma variable thisArray(i) passe dans le Response.Write, mais pas dans la requête...

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
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
 
 <%
 
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open DSN_BASE
 
thisArray = Array("0 Généralités","1 Philosophie","2 Sciences religieuses","3 Sciences sociales, droit","5 Sciences exactes","6 Sciences appliquées","7 Beaux-arts, divertissements","8 Langues et littératures","9 Archéologie, géographie, histoire") 
 
For i = 0 To UBound(thisArray)
 
'thisArray(i) pose problème dans la requête!!!
 
SQL = "SELECT * FROM T_numerisation where type2 like 'livre' and cdu like '"&thisArray(i)&"' and utilisation like 'externe' and url is not null order by intitule, partie"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open SQL, conn
 
'il passe très bien ici!!!!!
response.Write("<h2>") &(thisArray(i)) &("</h2><br>")
 
rs.MoveFirst
do while Not rs.eof
response.Write(rs("intitule")) &("<br>")
 
rs.MoveNext
loop
 
Next
 
rs.close
set rs=nothing
conn.close
set conn=nothing 
 
%>
J'ai essayé plusieurs variantes mais aucune ne prend.
Merci d'avance de vos réponses, et bonne journée.