Visa senaste nyheten

4 svar · 161 visningar · startad av Bj 13 jan. 2001

BjMedlem sedan sep. 2000314 inlägg

Frågan13 jan. 2001 10:29#1

Hur gör man för att visa senaste inlägget i följande kod?

Set objCon = Server.CreateObject ("ADODB.Connection")
Set objRec = Server.CreateObject ("ADODB.Recordset")
objCon.Open strcon
SQL = "SELECT \* FROM nyheter ORDER BY ID DESC"
objRec.Open SQL, objCon

%>
<head>
<title>Nyheter</title>
</head>
<body bgcolor="#FFFFFF" link="#0000FF" vlink="#0000FF">

<%
DO UNTIL objRec.EOF
%>

\<tr\>
  \<td width="129" bgcolor="#DEDDDC"\>\<b\>\<font color="#000000"\>\<%=objRec("datum")%\>\</font\>\</b\>\</td\>
  \<td width="357" bgcolor="#DEDDDC"\>\<b\>\<font color="#000000"\>\<%=objRec("Rubrik")%\>\</font\>\</b\>\</td\>
\</tr\>
\<tr\>
  \<td width="492" colspan="2"\>\<%=objRec("Meddelande")%\>\<br\>
    \<b\>Författare:\</b\> \<a href="mailto:\<%=objRec("Email")%\>"\>\<%=objRec("Namn")%\>\<hr color ="red" size="1"\>\</td\>
\</tr\>

</table>
</center>
</div>
<% objRec.MoveNext
LOOP %>

M@rtinMedlem sedan dec. 19992 085 inlägg

13 jan. 2001 11:08#2

Du ändrar ORDER BY ID DESC till ORDER BY datum DESC...
Du måste alltså ha ett fält med datum i databasen..

------------------
//M@rtin || Peachy.nu\\

"Passa på o va glada nu för man vet aldrig när det blir roligt nästa gång."

nakozMedlem sedan dec. 1999653 inlägg

13 jan. 2001 11:15#3

ledsen att behöva säga de, men det beror ju faktist helt på vilket format datumet ligger i...

det som m@rtin sa, funkar om datumet är inskrivet som Now().
men står de ex. 13/1 -01 så kommer 7/12 -00 ändå stå före.

jag tycker koden ser bra ut... och jag antar att de du vill ha hjälp med är detta:

<%
Set objCon = Server.CreateObject ("ADODB.Connection")
Set objRec = Server.CreateObject ("ADODB.Recordset")
objCon.Open strcon
SQL = "SELECT TOP 1 * FROM nyheter ORDER BY ID DESC"
objRec.Open SQL, objCon
%>

MVH

------------------
nakoz :)

[Redigerat av nakoz den 13 jan 2001]

BjMedlem sedan sep. 2000314 inlägg

13 jan. 2001 21:53#4

Tack nakoz! Exakt så var det som jag ville ha det.
Finns det ngt ställe där dessa olika SQL SELECT är dokumenterade?

VideMedlem sedan dec. 19998 577 inlägg

14 jan. 2001 00:47#5

En "liten" dokumentation på SQL: http://www.devguru.com/Technologies/jetsql/quickref/jet_sql_intro.html

------------------
Function onLick(name)
Punch.name(in_the_ear)
End Function
Jourhavande Vide