<%@LANGUAGE="JAVASCRIPT" CODEPAGE="1252"%> <% var Recs_Sites = Server.CreateObject("ADODB.Recordset"); Recs_Sites.ActiveConnection = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;DATABASE=kin;UID=kin;PWD=maloja;OPTION=3;"; Recs_Sites.Source = "SELECT * FROM sites WHERE enddate <= CURDATE() ORDER BY enddate DESC"; Recs_Sites.CursorType = 0; Recs_Sites.CursorLocation = 2; Recs_Sites.LockType = 1; Recs_Sites.Open(); var Recs_Sites_numRows = 0; %> <% var Repeat1__numRows = 1; var Repeat1__index = 0; Recs_Sites_numRows += Repeat1__numRows; %> <% var Repeat2__numRows = 10; var Repeat2__index = 0; Recs_Sites_numRows += Repeat2__numRows; %> KiN Webredactie

KiN site van de maand


<% while ((Repeat1__numRows-- != 0) && (!Recs_Sites.EOF)) { %>

<%=(Recs_Sites.Fields.Item("name").Value)%>

      " target="_blank"><%=(Recs_Sites.Fields.Item("theURL").Value)%> (<%= DoDateTime((Recs_Sites.Fields.Item("enddate").Value), 1, 4105) %>)

<%=(Recs_Sites.Fields.Item("description").Value)%>

<% Repeat1__index++; Recs_Sites.MoveNext(); } %>
Eerdere sites: <% while ((Repeat2__numRows-- != 0) && (!Recs_Sites.EOF)) { %>

<%=(Recs_Sites.Fields.Item("name").Value)%> (<%= DoDateTime((Recs_Sites.Fields.Item("enddate").Value), 1, 4105) %>)
" target="_blank"><%=(Recs_Sites.Fields.Item("theURL").Value)%>
<%=(Recs_Sites.Fields.Item("description").Value)%>

<% Repeat2__index++; Recs_Sites.MoveNext(); } %>


laatste verandering 16/09/05 -- vragen of opmerkingen
<% Recs_Sites.Close(); %>