Recordset

Hittade under faq för asp hur man delar upp sidan på olika recordset, i koden står det din sökning gav inga träffar på order ?, kan man bara använda detta för sökmotorer,
det jag vill ha är en kod som delar upp gästboken på olika recodrset var 25 inlägg, någon som har en sådan kod.

Koden funkar på alla slags recordset, byt ut texten mot vad du vill att det skall stå om det inte finns några poster på SQL-satsens sökning...

------------------
PC-älskare prasslar i säven, och har malt i ryggen
www.webeye.nu
Är du med i facket?

Koden funkar ju inte, får upp felmeddelande
Expected statement

/rec.asp, line 85

=RStemp("namn")></td></tr>
^

Visa lite mer kod, så skall vi se om vi kan lösa problemet...

------------------
PC-älskare prasslar i säven, och har malt i ryggen
www.webeye.nu
Är du med i facket?

<table>
<%
mypage = Request("whichpage")
If mypage = "" then
   mypage = 1
End If
mypagesize = 10

SQL = "Select * From tabell Order by fält"

Set rstemp = Server.Createobject("ADODB.Recordset")
rstemp.cursorlocation = 3
rstemp.cachesize = 5
MdbFilePath = Server.MapPath("path/databas.mdb")
rstemp.open SQL, "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & MdbFilePath & ";"
If rstemp.EOF then
   Response.write "Inga träffar vid sökning av ordet " & sok
Else
   rstemp.movefirst
   rstemp.pagesize = mypagesize
   maxcount = Cint(rstemp.pagecount)
   rstemp.absolutepage = mypage
   howmanyrecs = 0
   howmanyfields = rstemp.fields.count -1
   Do While Not RStemp.EOF AND howmanyrecs < rstemp.pagesize
   counter = counter + 1
   If counter mod 2 = 0 then
      color = "CCCC99"
   Else
      color = "CCCC66"
   End If 
%> 
<tr bgcolor="<%=color%>"><td><%=RStemp("namn")></td></tr>
   <%
   rstemp.movenext
   howmanyrecs = howmanyrecs + 1
   Loop
   rstemp.close
   Set rstemp = nothing
   %>
   <tr><td><hr></td></tr>
   <tr><td>
   <%
   If maxcount <> 0 then
   response.write "sida " & mypage & " av " & maxcount & "<br>" & sidor:
   pad = "0"
   scriptname = request.Servervariables("script_name")
   for counter = 1 to maxcount
   If counter > = 10 then
      pad = ""
   End If
   ref = "<a href='" & scriptname & "?whichpage=" & counter & "&pagesize=" & mypagesize & "'>" & pad & counter & "</a> "
   response.write ref & " "
   if counter mod 10 = 0 then
      response.write "<br>"
   End If
   Next
   End If
End If
%>
</td></tr>
</table>

Hur är det med sökvägen till databasen, är den rätt?

Har sökt på rätt fältnamn? man skall nog undvika att använda svenska tecken som fältnamn... (åäö)...

------------------
PC-älskare prasslar i säven, och har malt i ryggen
www.webeye.nu
Är du med i facket?

Allting är rätt inställt,
men varför får jag upp fel,
Expected statement
/rec.asp, line 85

=RStemp("namn")></td></tr>
^

det pekar ju på att felet är =

du har glömt ett procenttecken före haken:

<%=RStemp("namn")%>

------------------
<A HREF="http://www.cartman.nu" TARGET=_blank>
If a packet hits a pocket on a socket on a port
and the bus is interrupted as a very last resort
and the address of the memory makes the data link abort,
then the socket packet pocket has an error to report.
</A>

OK nu var det uppklarat, får nu upp fel,
Syntax error

/rec.asp, line 101

If counter > = 10 then
-------------^

ni kanske borde se till att koderna funkar innan dom läggs ut. :e

Byt till:
If counter > 9 then

------------------
PC-älskare prasslar i säven, och har malt i ryggen
www.webeye.nu
Är du med i facket?