ge oss mer kod.
vad innehåller recset("kategori")? ett tal? Current_kat?
------------------
<A HREF="http://cartman.nu" TARGET=_blank>
can i borrow your goat?
</A>
7 svar · 220 visningar · startad av LordJens
Vad betyder felmeddleandet:
fel '80020009'
Undantag inträffade.
Jag får det på den här raden:
Do Until RecSet("kategori") <> Current_kat
------------------
.:: Jens has spoken ::.
ge oss mer kod.
vad innehåller recset("kategori")? ett tal? Current_kat?
------------------
<A HREF="http://cartman.nu" TARGET=_blank>
can i borrow your goat?
</A>
Ok, jag tänkte att om nån kunde förklara felmeddelandet skulle jag kanske kunna lösa problemet.
<% Do Until RecSet.EOF
Current_kat = RecSet("kategori")
%>
<B><%=RecSet("real_kat")%></B><BR>
<% Do Until RecSet("kategori") <> Current_kat %>
<%=RecSet("namn")%><BR>
<%=RecSet("url")%><BR>
<I><%=RecSet("beskrivning")%></I><P>
<% RecSet.MoveNext
Loop
Loop %>
Bättre så?
Current_kat och RecSet("kategori") är vanliga textsträngar.
------------------
.:: Jens has spoken ::.
försöker du loopa ett recordset inne i en loop av samma recordset :q
------------------
<A HREF="http://cartman.nu" TARGET=_blank>
can i borrow your goat?
</A>
Alltså, skriptet visar upp sökresultat. Det fungerar nästan. De rätta sökresultaten kommer, men i slutet får jag det irriterande felmeddelandet.
Så här ser det alltså ut i IE:
SÖKRESULTAT
Sökord: aftonbladet
Tidningar
Aftonbladet på nätet [url="http://www.aftonbladet.se"]http://www.aftonbladet.se[/url]
Aftonbladets hemsida, min startsida
fel '80020009'
Undantag inträffade.
/kdrc/linktest.asp, rad 61
jag kör två loopar eftersom jag vill att posterna skall prestenteras unter en kategori.
Typ:
Tidningar
-Aftonbladet
-Expressen
TV
-SVT
Krångligt, men försök förstå.
------------------
.:: Jens has spoken ::.
Du måste skapa ett nytt RecSet till den andra loopen. Jag skulle gjort så här.
<%
do until RS1.eof
response.write RS1("kategori") & "<br>"
Set RS2 = conn.execute("SELECT * FROM nått WHERE kategori = '"&RS1("sökord")&"' ")
Do until RS2.EOF
response.write "- " & RS("underkategorier") & "<br>"
RS2.MoveNext
Loop
RS1.MoveNext
Loop
%>
------------------
MVH // Cyprys
Cyprys
Synd att du inte kan köpa en voodoojordglob och sedan snurra på den fort som fan och skrämma skiten ur alla.
ok, det fungerar bättre, MEN med den nya koden
<% Do Until RecSet.EOF
Current_kat = RecSet("kategori")
%>
<B><%=RecSet("real_kat")%></B><BR>
<% Set RS2 = connect.execute("SELECT * FROM links WHERE kategori = '"&RecSet("kategori")&"' ")
Do Until RS2.EOF %>
<%=RecSet("namn")%><BR>
<%=RecSet("url")%><BR>
<I><%=RecSet("beskrivning")%></I><P>
<% RS2.MoveNext
Loop
RS2.Close
RecSet.MoveNext
Loop
Visas alla sökresultat 2 ggr :)
------------------
.:: Jens has spoken ::.