9 svar · 257 visningar · startad av MickeA.com
Hej
Har en gästbok, HTML, ASP & ACCESS.
Inlkäggen visas m h a en loop som visar varje inlägg i en tabell.
Jag vill att endast 10 inlägg ska synas / sida.,
Hur ska jag göra?!
Lägga till typ "i" för varke inl'gg som checkar att när i = 10 så ska en ny sida skapas, eller?!
Sök på paging
Men vafaan, hittar ju massor, men inget som relaterar till en gb....
Spelar väl ingen roll om det är gb eller inte egentligen?
kanske inte, men jag fattar ju intew ett skit av allt som finns.
All handlar ju bara om pagingkod som INTE FUNKAR och jag hittar iunga vettiga svar.
De vettiga svar som finns är bvara mySQL databaser...
<%
intPage = Request.QueryString("page")
If intPage = "" Then
intPage = 1
End If
Set objCon = Server.CreateObject("ADODB.Connection")
' Öppna databas
Set objRS = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT * FROM tabell"
objRS.Open strSQL, objCon, 1, 3
With objRS
.PageSize = 10
.AbsolutePage = intPage
End With
i = 1
If NOT objRS.EOF Then
Do Until objRS.EOF OR i = objRS.PageSize
' Loopa ut
i = i +1
objRS.MoveNext
Loop
End If
For i = 1 To objRS.PageCount
If i = intPage
Response.Write(i & vbCrLf)
Else
Response.Write("<a href=""gb.asp?page=" & i & """>" & i & "</a> " & vbCrLf)
End If
Next
objCon.Close
objRS.Close
Set objCon = Nothing
Set objRS = Nothing
%>
Eftersom du inte orkade leta. Säg till om du vill ha framåt och bakåtlänkar också.
Vadå "inte orkade leta"??
Jág har suttit här sen jag skrev tråden och sitter fortf. o letar, så kom inte o säg at jag inte "orkar leta".....
Tack så mkt iaf. ska kolla lite till
Det var lite sarkastiskt menat. ;) Har uppdaterat koden eftersom det fanns några fel. Testa den gärna och se om det funkar. :)
kollade artikeln på aspsidan.... Fattar lite mer, men itne allt, jag måste ju trycka in pagingkoden i mitt redan existerande script.
På ngt kontsigt sätt, jaja, nu måst ejag sova...