ADODB.Field error '80020009

[olivier Micheli]

Hello,

I need help

When I execute the following asp, I have the error message:

-------------------------------
ADODB.Field error '80020009'

BOF ou EOF est égal à True ou l'enregistrement actuel a été supprimé.
L'opération demandée nécessite un enregistrement actuel.
--------------------------------

/activites/futur.asp, line 0
REM Requête SQL
MySql = "SELECT Date, Lieu, Type, Resume FROM Activite WHERE Date>=now()
ORDER BY Date;"

REM Mettre la requête dans le caddie
SET RS = MyConn.Execute (MySql)


REM Si le caddie est vide alors...
IF RS.EOF THEN
%>
<p>aucune activités prévue pour la période</p>
<%
REM dans l'autre cas
ELSE
%>
<%
REM Lire en boucle jusqu à la fin du caddie
WHILE NOT RS.EOF
%> <%
REM avancer d'un cran
RS.MoveNext


%>


<br>
<p><strong>Date:</strong> <%=RS("Date")%></p>
<p><strong>Lieu:</strong> <%=RS("Lieu")%></p>
<p><strong>Type:</strong> <%=RS("Type")%></p>
<p><strong>R&eacute;sum&eacute;:</strong> <%=RS("Resume")%></p>


<% REM While END
WEND
%>



<%

END IF

REM fin de la condition "y a qqch ou pas"

REM fermer le caddie
RS.Close

REM fermer la connexion
MyConn.Close
SET MyConn = NOTHING