Jag får felet:
Error Type:
ADODB.Field (0x80020009)
Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.
/lidingocommunity2/vann.asp
När jag ska trycker på länken avsluta relation... då ska den uppdatera personen till nekad...
men det konstiga är att det funkar bra vissas gånger... :S
hela koden kommer här:
<%
SQL = "Select * From kompis Where id2 = " & Request.Querystring("id")& " and vanner = 'ja' or id1 = " & Request.Querystring("id")& " and vanner = 'ja' Order By namn DESC"
set RecSet = Connect.execute(sql)
If RecSet.Eof Then
Response.Write "Inga kompisar =( "
Else
Do Until RecSet.EOF
%>
<table width=95% border=0 cellspacing=0 cellpadding=0>
<tr>
<td>
<%If CLng(RecSet("id2")) = CLng(Request.QueryString("id")) Then
Response.Write "<a href='person.asp?medlem="& RecSet("namn2") &"'>"& RecSet("namn2")& "</a></td>"
if session("id") = Request.QueryString("id") then %>
<td align="right"><a href="gastbok/gastbok.asp?tillid=<%=RecSet("id1")%>"><img src="design/bilder/bok1.gif" alt="Gästbok" width="14" height="12" border="0"></a>_<a href="dagbok/dagbok.asp?agarid=<%=RecSet("id1")%>"><img src="design/bilder/bok2.gif" alt="Dagbok" width="14" height="12" border="0"></a>_<a href="mejl/mejl_svara.asp?medlem=<%=RecSet("Namn2") %>"><img src="design/bilder/skicka-mail.gif" alt="Skicka mejl" width="18" height="12" border="0"></a>_<a href="vann.asp?id=<%=RecSet("id1")%>"><img src="design/bilder/kompisar.gif" alt="Vänner" width="17" height="13" border="0"></a>
__<a href="vann.asp?do=neka&id=<%=RecSet("id")%>&id1=<%=RecSet("id1")%>">Avsluta relation</a> </td>
<%End if
end if
if CLng(RecSet("id1")) = CLng(Request.QueryString("id")) Then
Response.Write "<a href='person.asp?medlem="& RecSet("namn") &"'>"& RecSet("namn")& "</a></td>"
if session("id") = Request.QueryString("id") then %>
<td align="right"><a href="gastbok/gastbok.asp?tillid=<%=RecSet("id2")%>"><img src="design/bilder/bok1.gif" alt="Gästbok" width="14" height="12" border="0"></a>_<a href="dagbok/dagbok.asp?agarid=<%=RecSet("id2")%>"><img src="design/bilder/bok2.gif" alt="Dagbok" width="14" height="12" border="0"></a>_<a href="mejl/mejl_svara.asp?medlem=<%=RecSet("Namn") %>"><img src="design/bilder/skicka-mail.gif" alt="Skicka mejl" width="18" height="12" border="0"></a>_<a href="vann.asp?id=<%=RecSet("id2")%>"><img src="design/bilder/kompisar.gif" alt="Vänner" width="17" height="13" border="0"></a>
__<a href="vann.asp?do=neka2&id=<%=RecSet("id")%>&id1=<%=RecSet("id2")%>">Avsluta relation </a></td>
<%End if
end if%>
</tr>
</table>
<% RecSet.MoveNext
Loop
End If
if Request.Querystring("do") = "neka" then
Connect.Execute "UPDATE kompis SET id1 = '"& Request.QueryString("id1") &"' where id = '"&Request.QueryString("id")&"'"
Connect.Execute "UPDATE kompis SET id2 = '"& session("id") &"' where id = '"&Request.QueryString("id")&"'"
Connect.Execute "UPDATE kompis SET vanner = 'nekad' where id = '"&Request.QueryString("id")&"'"
Connect.Close : Set Connect = Nothing
Response.Redirect "vann.asp?id="&Session("id")&""
end if
if Request.Querystring("do") = "neka2" then
Connect.Execute "UPDATE kompis SET id1 = '"& Request.QueryString("id1") &"' where id = '"&Request.QueryString("id")&"'"
Connect.Execute "UPDATE kompis SET id2 = '"& session("id") &"' where id = '"&Request.QueryString("id")&"'"
Connect.Execute "UPDATE kompis SET vanner = 'nekad' where id = '"&Request.QueryString("id")&"'"
Connect.Close : Set Connect = Nothing
Response.Redirect "vann.asp?id="&Session("id")&""
end if
Det är som det står: antingen befinner du dig i slutet av databasen (EOF) eller i början (BOF) eller så finns inte posten i databasen. Koden är för grötig för att man ska hitta nåt, men jag ska försöka.
På vilken rad hamnar problemet? Markera den raden i så fall.
Och sedan kan du inte lägga upp en localhost-länk eftersom den körs lokalt på din dator och inte publikt över hela nätet. :l
jo jag vet... men det konstiga är att jag har kollat igenom alla tänka bara saker... för posten finns i databasen... hoppas någon kan hjälpa mig trots all den röriga kod!!
det står inte vilken rad det är... det är hela koden som blir så... länken ska inte gå någonstans... det är bara för att visa vilka strängar jag skickar iväg till frågan...
id har värdet 6... men id1 borde inte ha någon betydelse... för det den ska göra vid do= neka är att uppdatera vanner till neka där id = x och i detta fallet 6...
jo den finns i databasen... och det är inte tal eller vanlig sträng... men det felmeddelandet uppstår inte föräns idet blir högre än 4:a... och det är det jag tycker är konstigt...
okey... det är mest denna kod som det är något fel i... fast jag inte hittar något fel i den =/
if Request.Querystring("do") = "neka" then
Connect.Execute "UPDATE kompis SET id1 = '"& Request.QueryString("id1") &"' where id = '"&Request.QueryString("id")&"'"
Connect.Execute "UPDATE kompis SET id2 = '"& session("id") &"' where id = '"&Request.QueryString("id")&"'"
Connect.Execute "UPDATE kompis SET vanner = 'nekad' where id = '"&Request.QueryString("id")&"'"
Connect.Close : Set Connect = Nothing
Response.Redirect "vann.asp?id="&Session("id")&""
end if
om man bara koncentrerar sig på den så kanske man kan hitta något fel?
det funkade inte heller... men när jag gick igenom med den koden så komm jag på en sak själv =) så jag ändrade till en till sträng... så nu funkar det perfekt =) tack!!