Message d'erreur ADODB.Field error '80020009'

**tonyC** · 23/07/2005, 08h32

Bonjour,

Ce message s'affiche intempestivement alors même que tout semble jouer dans le code:

ADODB.Field error '80020009'
Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.
/services/telechargement/admin/memberpagetony.asp, line 0

Le code semble correct. Je ne vois pas l'erreur

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
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
 
<html>
<head>
<title>Téléchargement</title>
 
</head>
 
<body>
<table border="0" align="left" cellpadding="0" cellspacing="0" width="583" height="63">
     <tr><td></td><td>
 <%
  loginstatus = session("login")
 if loginstatus = "yes" then
 
password = Request.form("password")
 
Conn_String = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("../db/membertony.mdb")
 
	Set Conn=Server.CreateObject("ADODB.Connection")
	Conn.Open Conn_String
	sql = "SELECT * From member where password like '"&password&"' "
	set rs = Conn.Execute (sql)
 
%>
<center>
<br>
<b><font face="Verdana" size="2"><br>
Détail de l'utilisateur<br>
</font></b><br>
<table border=0 width=400 class="TxtNormal" cellspacing="0" cellpadding="4">
 
<tr><td width="141" bgcolor="#51759A"><b>
	<font face="Verdana" size="2" color="#FFFFFF">Nom d'utilisateur</font></b></td>
	<td bgcolor="#CCCC99"><%=rs("email")%></td></tr>
<tr><td width="141" bgcolor="#51759A"><b>
	<font face="Verdana" size="2" color="#FFFFFF">Mot de passe</font></b></td>
	<td bgcolor="#CCCC99"><%=rs("password")%></td></tr>
 
</table>
 
<% rs.close
	Conn.Close
	set Conn = nothing
	else
	Response.Redirect "index2.asp"
	end if
	%>
	</td>
</tr>
</table>
 
 
</body>
 
</html>

Merci pour tout conseil et avis.
Bonne journée.
:D
TonyC

**ahage4x4** · 23/07/2005, 13h14

Bonjour,
Le message d'erreur est clair, ton recordset est vide, cad le resultat de ta requete.
Après je ne vois pas que tu te deplace pas dans le recordset.

Il faut donc RS.MoveFirst au moins pour recuperer RS("Password") etc.. puis apres tu dessine le tableau pour chque ligne du recordset du coup tu aura le code suivant:

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
<%.......
sql = "SELECT * From member where password like '"&password&"' " 
   set rs = Conn.Execute (sql) 
If not (RS.BOF and RS.EOF) then 'Si le recordset pas vide, 
 
RS.MoveFirst   ' passe au 1er enregistrement
 
do while not RS.EOF   %>
 
'TRAITEMENT HTML ICI
 
<%LOOP
 
rs.close 
   Conn.Close 
   set Conn = nothing 
   else 
   Response.Redirect "index2.asp" 
End if  'Correspond au if recordset pas vide
%>

Voila en gros n'hesite pas s'il y a quelquechose que tu ne comprends pas

**tonyC** · 23/07/2005, 16h00

Merci pour les explications, je comprends mieux la logique sous-jacente, mais j'ai maintenant compris pourquoi le recordset est vide: c'est qu'il y avait entre la page où se trouve le formulaire et la page de recherche une page de vérification, qui elle, ne contenait pas de formulaire... Désolé de n'avoir pas vu le bug plus tôt, et merci encore! :D

Message d'erreur ADODB.Field error '80020009'

ASP

Discussions similaires

Partager

Partager