webForumDet fria alternativet

fattar inte varför

ASP

16 svar · 317 visningar · startad av dendålige

Medlem sedan jan. 2003188 inlägg
Frågan#1

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

länken är följande:
http://localhost/lidingocommunity2/vann.asp?do=neka&id=6&id1=2
och id=6 är idet för den raden som ska uppdateras... och id1 =2 är personens id... och id2 är ens eget id...

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

%>

Medlem sedan sep. 20026 425 inlägg
#2

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

Medlem sedan jan. 2003188 inlägg
#3

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!!

Medlem sedan jan. 2003188 inlägg
#4

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...

Medlem sedan sep. 20026 425 inlägg
#5

Det är för kompelxt och luddigt. Jag kan inte sätta mig in. Vad har id och id1 för värden?

Medlem sedan jan. 2003188 inlägg
#6

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...

Medlem sedan sep. 20026 425 inlägg
#7

I så fall kanske inte posten med id-numret 6 finns i databasen?
Eller har du satt id i databasen som Tal eller vanlig sträng?

Medlem sedan jan. 2003188 inlägg
#8

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...

Medlem sedan sep. 20026 425 inlägg
#9

Jo, det låter ju skumt. Något skumt. Har tyvärr ingen aning om saken..

Medlem sedan jan. 2003188 inlägg
#10

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?

Medlem sedan sep. 20026 425 inlägg
#11

Jag hittar inget fel ändå. :(

Medlem sedan dec. 20003 887 inlägg
#12

Det kan vara den första sql-satsen som strular till det...

<%
qsID = Request.QueryString("id")
SQL = "Select * From kompis Where [b](id2 = " & qsID & " and vanner = 'ja') or (id1 = " & qsID & " and vanner = 'ja')[/b] 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(qsID) Then 
%>
      <a href="person.asp?medlem=<%=RecSet("namn2")%>"><%=RecSet("namn2")%></a>
    </td>
<%
      If session("id") = qsID 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(qsID) Then
%>
      <a href="person.asp?medlem=<%=RecSet("namn") %>"><%RecSet("namn")%>"</a>
    </td> 
<%
    If session("id") = qsID 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 = '" & qsID & "'" 
  Connect.Execute "UPDATE kompis SET id2 = '" & session("id") & "' where id = '" & qsID & "'" 
  Connect.Execute "UPDATE kompis SET vanner = 'nekad' where id = '" & qsID & "'" 

  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 = '" & qsID & "'" 
  Connect.Execute "UPDATE kompis SET id2 = '" & session("id") & "' where id = '" & qsID & "'" 
  Connect.Execute "UPDATE kompis SET vanner = 'nekad' where id = '" & qsID & "'" 

  Connect.Close : Set Connect = Nothing 
  Response.Redirect "vann.asp?id="&Session("id")&"" 
end if 

%>
Medlem sedan apr. 200117 inlägg
#13

Om du inte använder 'Close' utan endast sätter Connect till 'Nothing' så borde du slippa felmeddelandet...

Medlem sedan sep. 20026 425 inlägg
#14

Nu fick du lite kod att jobba med! Hurra för Engine^!

Medlem sedan jan. 2003188 inlägg
#15

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!!

Medlem sedan dec. 20003 887 inlägg
#16

Trevligt!

Men nästa gång du postar kod, så gör det ingenting om du använder dig av [kod]-taggen... ;)

Medlem sedan sep. 20026 425 inlägg
#17

Vad bra att det löste sig! :) Weee. :)

264 ms totalt · 4 externa anrop · v20260731065814-full.86ec41c2
128 ms — deklarationer (db)
0 ms — hämta statistik (cache)
134 ms — hämta tråd, inlägg och bilagor (db)
127 ms — ändringar (db)