forum

er tabellerne joinet ?

hvis du giver posterne en id der har autonummerering kan du bare trække de to nyeste poster ud ved at se på deres id!

Denne SQL-sætning kan anvendes til at finde den record hvor dato er nyeste:
sql = "select top 1 * from tabelnavn order by dato desc"
Set RS = conn.Execute(sql)

Denne sætning kan finde de to nyeste:
sql = "select top 2 * from tabelnavn order by dato desc"
Set RS = conn.Execute(sql)

RS("dato") ' er dato på nyeste
RS.MoveNext
RS("dato") ' er dato på næst nyeste

Sorry jeg så ikke at det var to tabeller.

nice work så blev jeg også det klogere ;o)
det sidste hvad betyder det? desc

Set RS1 = conn.Execute("select top 1 * from tabel1 order by dato desc")
Set RS2 = conn.Execute("select top 1 * from tabel2 order by dato desc")

Så har du de to nyeste fra hver tabel.

Hvis ikke så må du lave 2 * SQL:

SELECT TOP 1 tabel1.dato1 FROM tabel1 ORDER BY tabel1.dato1 DESC;
og
SELECT TOP 1 tabel2.dato2 FROM tabel2 ORDER BY tabel2.dato2 DESC;

og sammenligne datoerne:

If rs(dato1) > rs(dato2) then
msgbox("Dato 1 er højst....
Else
msgbox("Dato 2 er højst
End if

hvad betyder DESC

Du er hurtig coltau...

Desc betyder descenting = faldende

Desc betyder sorteret bagfra. Når man vælger en sortering i sql med "order by" så får man den mindste record først. I di ttilfælde vil du jo have den højeste først. (Senetset dato)
"top 1" betyder at man bare vil have den ene record.

Hurtig betyder mange stavefejl. :-)

det var sgu smart! ;o) man lærer noet nyt hver dag!

coltau, det var også næsten det jeg havde tænkt mig at gøre først, men jeg viste ikke om det var rigtigt, så jeg ville lige spørge først.
Jeg skal lige hjem, så prøver jeg det af også skal du nok få dine point...hvis det virker self. :)

Det virker sq fint nok, men jeg kan ikke få det flettet ordenligt ind i mit eget script.

SQLLASTDATE1 = "SELECT TOP 1 F_Treads.T_Date FROM [F_Treads] WHERE (FID = "& rsForum("ID") &") ORDER BY F_Treads.T_Date DESC"
Set rsLastDate1 = forumtemp.execute(SQLLASTDATE1)
SQLLASTDATE2 = "SELECT TOP 1 F_Replies.R_Date FROM [F_Replies] ORDER BY F_Replies.R_Date DESC"
Set rsLastDate2 = forumtemp.execute(SQLLASTDATE2)
SQLLASTPOSTER1 = "SELECT TOP 1 F_Treads.T_Alias FROM [F_Treads] WHERE (FID = "& rsForum("ID") &") ORDER BY F_Treads.T_Alias DESC"
Set rsLastPoster1 = forumtemp.execute(SQLLASTPOSTER1)
SQLLASTPOSTER2 = "SELECT TOP 1 F_Replies.R_Alias FROM [F_Replies] ORDER BY F_Replies.R_Alias DESC"
Set rsLastPoster2 = forumtemp.execute(SQLLASTPOSTER2)

If (rsLastDate1.BOF Or rsLastDate1.EOF) Then
LastPost = "No posts"
Else
If rsLastDate1("T_Date") > rsLastDate2("R_Date") Then
    LastDate = rsLastDate1("T_Date")
Else
    LastDate = rsLastDate2("R_Date")
End If
If rsLastPoster1("T_Alias") > rsLastPoster2("R_Alias") Then
    LastPoster = rsLastPoster1("T_Alias")
Else
    LastPoster = rsLastPoster2("R_Alias")
End If
LastPost = ""& LastDate &"<br>"& LastPoster &""
End If

Den finder godt nok den nyeste dato, men den skriver den nyeste dato ved alle forums'ne der er skrevet noget i...det skal den jo ikke, det siger jo sig selv. Den finder heller ikke det nyeste Alias ordenligt.

Håber du kan hjælpe med mit lille problem her.

Jeg kan ikke gennemskue hvad det er du vil. Det her forstår jeg.
Du har to tabeller, F_Treads og F_Replies er det spørgsmål og svar i et forum. ?
Og du vil blot vise det nyeste indlæg - hvad enten det er et spørgsmål eller et svar. ?

F_Treads og F_Replies indeholder spørgsmål og svar fra forumet og jeg vil vise det nyeste indlæg og den sidste der har postet.

må, men f*ck det, jeg skal nok finde ud af det og du skal self. have dine point, for din hjælp.