<% dim txtFilm(21,1) LeesFilmTekst %> > <% film= int(datevalue(date) mod 21) wmv= film & ".wmv" wmv= mediaserver & "filmwmv/" & wmv %> >
<% =Verd3 %><% =txtFilm(film,0) %> 


<% =Verd1 %><% =txtFilm(film,1) %> 
<% entry=",Film,Bekeken" WriteToLog(entry) %>