bonjour,
j'ai besoin d'utilisé la méthode find dans mon code mais celle-ci me retourne une erreur:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 Microsoft OLE DB Provider for ODBC Drivers (0x80040E29) L'ensemble de lignes ne prend pas en charge le défilement arrière.
voici un extrait de mon code:
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 <% Dim formation Set formation = Server.CreateObject("ADODB.Recordset") sql = "SELECT * FROM formation " formation.Open sql, Conn %> <% Dim Valeur Set Valeur = Server.CreateObject("ADODB.Recordset") sql = "SELECT * FROM valeur where mois=" & month(derdate) & " and num_geo=" & niv & " order by annee desc" Valeur.Open sql, Conn %> <% while not formation.eof valeur.movefirst valeur.find ("code_formation='" & formation("Code_Formation") & "'") formation.movenext wend%>
Partager