webForumDet fria alternativet

Dela upp nyheterna

ASP

6 svar · 528 visningar · startad av Sico

Medlem sedan maj 20002 597 inlägg
Frågan#1

Hejsan!

Tänkte dela upp nyheterna på min hemsida så scrollisten inte blir allt för lång. Om jag vill att endast dom 15 senaste nyheterna ska synas men dom andra, dvs den 16:e å uppåt ska läggas i en annan fil (akriv.asp).. hur gör jag det?

Jag använder mig av detta systemet men då kan man ju ej hitta den 16:e senaste nyheten å uppåt...


<%
	Set RSConn = Server.CreateObject("ADODB.Recordset")

	SQL = "SELECT TOP 15 * FROM news Order By news.ID DESC"

	RSConn.Open SQL, Conn, 1, 2

	Do Until RSConn.EOF
%>

'Blah blah blah .. här lägger jag in nyheten osv...

<%
RSConn.MoveNext	
Loop
RSConn.Close
Conn.Close
%>

Sen när jag fått detta å funka kommer nästa problem men det får ni se sen ;)

------------------
O Yeah!
I wouldn't if I couldn't

Medlem sedan sep. 200085 inlägg
#2

på din nyheter.asp bör väl

SQL = "SELECT TOP 15 * FROM news Order By news.ID DESC"

fungera..

på din arkiv.asp bör väl

SQL = "SELECT * FROM news WHERE news.ID NOT IN (SELECT TOP 15 news.ID FROM news Order By news.ID DESC) Order By news.ID DESC"

fungera.

Det är i alla fall en lösning..

[Redigerat av Linda den 21 dec 2001]

Medlem sedan maj 20002 597 inlägg
#3

hmm.. ännu ett problem... jag har en annan SQL sats på en sida.. lite bredare.. fick det inte att stämma på den


	SQL = "SELECT news.Title, news.ID, news.Date, news.Time, news.By, news.Text, members.ID, members.Name, members.User, members.Mail FROM members, news Where news.By = members.ID Order By news.ID DESC"

Hur får jag den att funka? på både nyheter.asp och arkiv.asp ? .. den krånglade för mig

------------------
O Yeah!
I wouldn't if I couldn't

Medlem sedan dec. 19995 874 inlägg
#4
SELECT news.Title, news.ID, news.Date, news.Time, news.By, news.Text, members.ID, members.Name, members.User, members.Mail FROM members, news Where news.By = members.ID AND news.ID NOT IN (SELECT TOP 15 news.ID FROM members, news WHERE news.By = members.ID ORDER By news.ID DESC) Order By news.ID DESC

och

SELECT top 15 news.Title, news.ID, news.Date, news.Time, news.By, news.Text, members.ID, members.Name, members.User, members.Mail FROM members, news Where news.By = members.ID Order By news.ID DESC

------------------
Mvh
Patrik aka Brimba

[Redigerat av Brimba den 21 dec 2001]

Medlem sedan maj 20002 597 inlägg
#5

nyheter.asp funkade det fint på men inte på arkiv.asp ..

Error Type:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver] You have written a subquery that can return more than one field without using the EXISTS reserved word in the main query's FROM clause. Revise the SELECT statement of the subquery to request only one field.
/arkiv.asp, line 26


<%
	Set RSConn = Server.CreateObject("ADODB.Recordset")

	SQL = "SELECT news.Title, news.ID, news.Date, news.Time, news.By, news.Text, members.ID, members.Name, members.User, members.Mail FROM members, news Where news.By = members.ID AND news.ID NOT IN (SELECT TOP 5 * FROM members, news WHERE news.By = members.ID ORDER By news.ID DESC) Order By news.ID DESC"

	RSConn.Open SQL, Conn, 1, 2

	Do Until RSConn.EOF
%>

Detta är rad 26


	RSConn.Open SQL, Conn, 1, 2

------------------
O Yeah!
I wouldn't if I couldn't

Medlem sedan dec. 19995 874 inlägg
#6

Byta ut * mot news.ID

Jag har redigerat mitt inlägg :)

------------------
Mvh
Patrik aka Brimba

Medlem sedan maj 20002 597 inlägg
#7

på nåt sätt funkade det bättre :)

satt jag å väntade aslänge på svar så hade du redan svarat.. så gay va... :D

------------------
O Yeah!
I wouldn't if I couldn't

262 ms totalt · 4 externa anrop · v20260731065814-full.6fe65c25
125 ms — deklarationer (db)
0 ms — hämta statistik (cache)
131 ms — hämta tråd, inlägg och bilagor (db)
128 ms — ändringar (db)