<<zurück>>

Chronik Vormoos

<% Dim sort sort = Request.QueryString("sort") IF sort = "" THEN SQL = "SELECT * FROM chronik" ELSE SQL = "SELECT * FROM chronik ORDER BY ID DESC" END IF SET getChronik = adoCon.EXECUTE(SQL) DO UNTIL getChronik.EOF = TRUE Datum = getChronik("Datum") Memo = getChronik("Memo") %> <% getChronik.MoveNEXT LOOP getChronik.Close SET getChronik = nothing %>
Sortierung (|)
 

<%=Datum%>

<%=Memo%>

<<zurück>>