<% dim RS, SQL set RS = server.createobject("ADODB.recordset") SQL = "SELECT * FROM spillere ORDER By fornavn" RS.Open SQL,conn if not RS.eof then do until RS.EOF %> <% RS.MoveNext loop end if RS.close set RS=nothing %>

Action	Navn	Licensnr.	Telefon	Mobil	E-mail
&pageid=2">rediger/&pageid=2">slet	<%response.write RS("fornavn") & " " & RS("efternavn")%>	<%response.write RS("licensnummer")%>	<%response.write RS("telefon")%>	<%response.write RS("mobil")%>	"><%response.write RS("mail")%>