<%Option Explicit%> <% If isEmpty(Session("UserID")) Then Response.Redirect("index.asp") End If %> <%response.write setupClubName%>
<%response.write setupClubName%> - Medier
Upload et nyt medie



Vælg et medie:
<% dim RS, SQL set RS = server.createobject("ADODB.recordset") SQL = "SELECT * FROM medier order BY medienavn" RS.Open SQL,Conn,2,3 if not RS.eof then do until RS.eof response.write "" rs.movenext loop end if RS.close set RS = nothing %>
vælg" & RS("medienavn")& "