Jeg er selv ved at lave noget gejl til nogle spejdere og her har jeg noget kode
der hente de seneste 5 nyheder og viser dem på forside. Jeg giver dig lige hele
den kode, måske du kan bruge det til noget.
Hvis det kun er det med teksten du vil vide:
Response.Write LEFT(rs("tekst"),100) & "...<br>"
Denne tager de første 100 tegn
Tonni
----------------------
<%
' SQL forespørgsel
strSQL = "Select * from nyheder Order By NyhedsID Desc"
' Udfør forespørgsel (rs indeholder nu resultatet)
Set rs = Conn.Execute(strSQL)
' Gennemløb Recordset (rs) med en løkke
Counter = 1
do
If Counter =< 0 Then
rs.MoveNext
Else
' Udskriv til tabellen
If rs("Dato") <> "" then
Response.Write "<font style='font-size: 70%;'>" & rs("dato") & "</font><br>"
End If
If rs("Overskrift") <> "" then
Response.Write "<b>" & rs("overskrift") & "</b><br>"
End If
If rs("NyhedBilledeLille") <> "" then
Response.Write "<img src='nyheder/" & rs("NyhedBilledeLille") & "'
width='110' border='1'><br>"
End If
If rs("Tekst") <> "" then
Response.Write LEFT(rs("tekst"),100) & "...<br>"
End If
Response.Write "<a href='nyheder/default.asp#" & rs("NyhedsID") & "'>Læs
mere</a><br><br>" & VbCrlf
' Gå til næste Record i rs
rs.MoveNext
End If
Counter = Counter + 1
Loop until rs.eof or Counter = 6 'tager de første
%>
--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! =>
http://www.html.dk/tutorials