Poser une question

Eof et Bof

Bonjour c'est encore moi

J'ai pu résoudre en partie le pb d'affichage de mes données dans les cases à cocher mais un autre est apparu
voilà le code, le problème c'est le message

ADODB.Field erreur '800a0bcd'

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

/iisadmin/website/essai/Inscription/inscaf.asp, ligne 173 ===> qui est la ligne du WHile, au départ acc.eof est à faux
je vais bien chercher les données que j'affiche, arrivé à la fin des données concernant PWD il passe à vrai en toute
logique il devrait sortir la condition n'étant plus rempli, mais il met ce message et ne m'affiche pas le bas de page


<%
Dim Bur, i, x
i=1
While ((NOT acc.eof) AND ((Cstr(acc.Fields.Item("PWD").value))=Request.Form("PWD")))%>

tant que non fin de fichier et non debut de ficheir faire et dès qu'une condition n'est plus respectée on doit
sortir de la boucle.

<tr>
<% Bur=(acc.Fields.Item("MATIERE").value)
x = i Mod 2
If Bur <> "" Then
if x = 0 then%>
<td> </td>
<td><%=(acc.Fields.Item("MATIERE").Value)%></td>
<td> </td>
<td>
<input type="checkbox" name="NIVEAU" value="" checked>
</td><%
end if
end if
Bur=""
i=i+1
acc.MoveNext()
%>acc.eof = <%=acc.eof%><br><%
%></tr><%
Wend
%>


Merci

Réponses

Re: Eof et Bof   Oznog 13/8/2004    Re: Eof et Bof   iaorana 13/8/2004