<%@LANGUAGE=VBSCRIPT CODEPAGE=1252%> <% Option Explicit dim strTitel dim strDatum dim strTekst dim strId dim rs dim connectie dim teller Set connectie = Server.CreateObject("ADODB.Connection") Set rs = Server.CreateObject("ADODB.RecordSet") connectie.Open "Driver={MySQL};SERVER=mysqlhost;DATABASE=tanghet02;UID=jukte;PASSWORD=JUKte123;" rs.Open "SELECT * FROM berichten ORDER BY Id desc", connectie %>
<% teller=0 while not rs.eof if teller < 8 then strTitel=rs("titel") strDatum=rs("datum") strTekst =rs("tekst") Response.Write("") Response.Write("") Response.Write("") Response.Write("") Response.Write("") Response.Write("") Response.Write("") Response.Write("") Response.Write("") Response.Write("
  .: "& strTitel &" "& strDatum &"  

"& strTekst &"

 
.: Volgende activiteit
  juli

10/07 Gapersfeesten
  • terras
  • Jacky Fresh
  • voetbaltoernooi
  • Karaoké


30/07 - 01/08 Nachten Van De Jukte
  • ons jaarlijks festival
  • meer info op www.nachtenvandejukte.be
 
.: Onze andere sites...
Word fan en voeg ons toe!
Voeg ons toe als vriend!
Word onze vriend!
 
.: klik door...
 
.: foto van de week!

100 dagen
 
.: Voorstel activiteit
  Heb je soms leuke activiteiten in je hoofd rondspoken die je eens wil loslaten in de Jukte? Klik dan vlug op ons logo!

 
.: klik door... (2)
Jeugdwerkbeleidsplan