Let's say I haf 3 project that I wan to list, each project should have 1 value assign to it, but if i remove 1 of the value for 1 of the project, and i tried to list all 3 projects, I get this error:
Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.
This is my code:
- <%
-
call OpenDB()
-
-
set rs = Server.CreateObject("ADODB.recordset")
-
sql="SELECT * FROM project ORDER BY id"
-
rs.Open sql, dbConn
-
-
Set li = Server.CreateObject("ADODB.Recordset")
-
licheck= "SELECT * FROM usergroup WHERE gpname='"& Request.Cookies("UsernameCookie") &"'"
-
li.Open licheck, dbConn
-
-
Set lili = Server.CreateObject("ADODB.Recordset")
-
licheckproj= "SELECT * FROM project WHERE id="&li("projectid")&""
-
lili.Open licheckproj, dbConn
-
-
If Request.Cookies("UsernameCookie")="" then
-
Response.Write("<center>Please Login to check the current project that you are registered with!</center><br>")
-
-
do while not rs.EOF
-
-
Response.Write("<div class=""post"">")
-
Response.Write("<h2 class=""title""><span>"&rs("pjname")&"</span></h2>")
-
Response.Write("<div class=""story"">")
-
Response.Write("<table width=""80%""><td>"&rs("pjdesc")&"</td></table>")
-
Response.Write("<div class=""meta"">")
-
Response.Write("</div>")
-
Response.Write("</div>")
-
Response.Write("</div>")
-
-
rs.MoveNext
-
loop
-
rs.close
-
set rs = nothing
-
-
elseif not Request.Cookies("UsernameCookie")="" and Request.Cookies("priv") = "1" then
-
Response.Write("<font color=red size=""2""><b>Welcome<font color=black size=""3""> "&li("gpname")&"</font>, you are currently registered under <font color=black size=""3"">"&lili("pjname")&"</font> <br>For more information about your project, click <a href=""index.asp?p=loginprojstatus"">here</a>.<br>To make changes to your group, click <a href=""index.asp?p=changeproject"">here</a>. </b></font></br>")
-
-
set rss = Server.CreateObject("ADODB.recordset")
-
students="SELECT COUNT(gpname) AS countproject FROM usergroup Where classid = "&li("classid")&" GROUP BY projectid"
-
rss.Open students, dbConn
-
-
set rsss = Server.CreateObject("ADODB.recordset")
-
studentss = "SELECT * from class WHERE "&li("classid")&" = id"
-
rsss.Open studentss,dbConn
-
-
do while not rs.EOF
-
-
Response.Write("<div class=""post"">")
-
Response.Write("<h2 class=""title""><span>"&rs("pjname")&"</span></h2>")
-
Response.Write("<div class=""story"">")
-
Response.Write("<table width=""80%""><td>"&rs("pjdesc")&"</td></table>")
-
Response.Write("<div class=""meta"">")
-
Response.Write("</div>")
-
Response.Write("</div>")
-
if not (rss.EOF or rss.BOF) then
-
Response.Write("<br><table width=""80%""><td>Number of Registered Groups from "&rsss("classes")&" : "&rss("countproject")&"</td> </table>")
-
Response.Write("</div>")
-
else
-
Response.Write("<br><table width=""80%""><td>Number of Registered Groups from "&rsss("classes")&" : 0</td> </table>")
-
Response.Write("</div>")
-
end if
-
rss.MoveNext
-
rs.MoveNext
-
loop
-
rss.close
-
set rss = nothing
-
rs.close
-
set rs = nothing
-
-
-
else
-
-
Response.Write("<font color=red size=""2""><b>Welcome "&li("gpname")&", <br>You are currently administrator</font></b></br>")
-
-
do while not rs.EOF
-
-
Response.Write("<div class=""post"">")
-
Response.Write("<h2 class=""title""><span>"&rs("pjname")&"</span></h2>")
-
Response.Write("<div class=""story"">")
-
Response.Write("<table width=""80%""><td>"&rs("pjdesc")&"</td></table>")
-
Response.Write("<div class=""meta"">")
-
Response.Write("</div>")
-
Response.Write("</div>")
-
Response.Write("</div>")
-
-
rs.MoveNext
-
loop
-
rs.close
-
set rs = nothing
-
-
end if
-
-
%>
