webForumDet fria alternativet

Ta flera poster från databas (nybörjare)

ASP

4 svar · 291 visningar · startad av [AMD]Zmaster

Medlem sedan mars 20021 716 inlägg
Frågan#1

Hej hej!

Har fått ihop en kod för att hämta poster från en tabell i databasen, men det blir bara senaste.. Jag vill att det ska hämtas alla senaste 10 st, och sedan knapp till sida 2 för att se de 10 näst senaste osv.. Eller iaf till att börja med så att de hämtas de 10 senaste och inte bara 1 senaste.
Försökt fram och tillbaka, men fattar inte..

Tacksam för hjälp

	Set rs = Connect.Execute("SELECT chronicles.id,sID,headline,preamble,date,foto,namn FROM chronicles LEFT JOIN admin ON admin.id=chronicles.writer WHERE public>0 ORDER BY date desc,chronicles.id desc LIMIT 0,1")
		If NOT rs.EOF Then
   	cID = rs("sID")
			If InStr(cID,":") Then
			cID = Left(cID,InStr(cID,":")-1)
			End If
		Set cat = Connect.Execute("SELECT namn FROM indexes WHERE id=" &cID)
		catName = ""
			If NOT cat.EOF Then
			catName = cat("namn")
			End If
		cat.Close()
		Set cat = Nothing
		Response.Write("<table cellspacing=""0"" cellpadding=""0"" border=""0"" width=""100%""><tr><td>")
		Response.Write("<a href=""" &URL(0,"viewChronicle")& "&amp;viewChronicle=" &rs("id")& """ style=""color: #000000;"">")
		Response.Write("<img src=""gfx/rub/u_purple.gif"" alt="""" width=""100%"" height=""8"" border=""0"" /><br /><img src=""gfx/rub/kronikan.gif"" alt="""" width=""298"" height=""21"" border=""0"" /><br />")
			If rs("foto") <> "" Then
			Response.Write("<img src=""" &rs("foto")& """ alt=""" &rs("namn")& """ width=""60"" height=""80"" align=""left"" border=""0"" />")
			End If
		Response.Write("<span class=""small""><i>&quot;" &max_l(rs("preamble"),130)& "&quot;</i></span>")
			If rs("namn") <> "" Then
			Response.Write("<br /><br /><span class=""small"">Läs hela " &rs("namn")& "s krönika <b>här</b>.</span>")
			End If
		Response.Write("</a>")
		Response.Write("</td></tr></table>")
		Response.Write("<img src=""gfx/none.gif"" alt="""" width=""1"" height=""10"" /><br />")
		End If
	rs.Close()
	Set rs = Nothing
Medlem sedan apr. 20022 743 inlägg
#2

Sök på "paging" :)

Medlem sedan dec. 200012 464 inlägg
#3
If InStr(cID,":") Then
cID = Left(cID,InStr(cID,":")-1)
End If

Och gör om datamodellen så att du inte sparar flera värden i en kolumn.

Medlem sedan mars 20021 716 inlägg
#4

Poffe skrev:

Sök på "paging" :)

Har tittat på ett nyhetsscript som hämtar ungefär likadant och som hämtar 10 senaste, men jag lyckas inte få ihop det ändå.
Ingen som kan visa bara delen med att hämta 10 senaste?, så borde jag kunna fixa ut så att man kanf å det på flera sidor..

Medlem sedan feb. 20032 027 inlägg
#5
SELECT chronicles.id,sID,headline,preamble,date,foto,namn FROM chronicles LEFT JOIN admin ON admin.id=chronicles.writer WHERE public>0 ORDER BY date desc,chronicles.id desc LIMIT 10
262 ms totalt · 4 externa anrop · v20260731065814-full.1dc6f849
126 ms — deklarationer (db)
0 ms — hämta statistik (cache)
132 ms — hämta tråd, inlägg och bilagor (db)
128 ms — ändringar (db)