Nyheter
<%
SQL = "SELECT * From news ORDER BY newsDate DESC"
Databas.Execute( SQL )
set RecSet=Databas.execute(SQL)
Do Until RecSet.EOF
%>
<% =RecSet("newsTitle")%> - <% d = RecSet("newsDate") %><%=Right("0" & Day(d),2)%> <% =LCase(Monthname(Month(d), True))%> <% =Year(d)%>
<%If Len(RecSet("newsIngress")) > 120 Then
Response.write Left(RecSet("newsIngress"),120) & "..."
Else
Response.write textfix(RecSet("newsIngress"))
End If
%>
">Läs mer
<%
RecSet.MoveNext
Loop
RecSet.Close
set RecSet = Nothing
%>