<% mode = Request("mode") %> <% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("../../../database/train.mdb") %> Træningstider i schæferhundeklubben - Kreds 30, Greve

Træningstider og holdindeling
<% SQL = "Select * from info where web='Hold 1' ORDER BY id" set RS = conn.execute(sql) if not rs.EOF then %> <% DO WHILE NOT rs.EOF web = rs("web") navn = rs("navn") adresse = rs("adresse") postnr = rs("postnr") bynavn = rs("bynavn") mail = rs("mail") privattlf = rs("privattlf") mobiltlf = rs("mobiltlf") %> <% if mail <> "" then %> <% end if %> <% if privattlf <> "" then %> <% end if %> <% if mobiltlf <> "" then %> <% end if %> <% If Session("User_kreds30") <> "Administrator" Then %> <% else %> <% End If %> <% rs.MoveNext LOOP RS.Close end if %> <% SQL = "Select * from info where web='Hold 2' ORDER BY id" set RS = conn.execute(sql) if not rs.EOF then %> <% DO WHILE NOT rs.EOF web = rs("web") navn = rs("navn") adresse = rs("adresse") postnr = rs("postnr") bynavn = rs("bynavn") mail = rs("mail") privattlf = rs("privattlf") mobiltlf = rs("mobiltlf") %> <% if mail <> "" then %> <% end if %> <% if privattlf <> "" then %> <% end if %> <% if mobiltlf <> "" then %> <% end if %> <% If Session("User_kreds30") <> "Administrator" Then %> <% else %> <% End If %> <% rs.MoveNext LOOP RS.Close end if %> <% SQL = "Select * from info where web='Hold 3' ORDER BY id" set RS = conn.execute(sql) if not rs.EOF then %> <% DO WHILE NOT rs.EOF web = rs("web") navn = rs("navn") adresse = rs("adresse") postnr = rs("postnr") bynavn = rs("bynavn") mail = rs("mail") privattlf = rs("privattlf") mobiltlf = rs("mobiltlf") %> <% if mail <> "" then %> <% end if %> <% if privattlf <> "" then %> <% end if %> <% if mobiltlf <> "" then %> <% end if %> <% If Session("User_kreds30") <> "Administrator" Then %> <% else %> <% End If %> <% rs.MoveNext LOOP RS.Close end if %> <% SQL = "Select * from info where web='Hold 4' ORDER BY id" set RS = conn.execute(sql) if not rs.EOF then %> <% DO WHILE NOT rs.EOF web = rs("web") navn = rs("navn") adresse = rs("adresse") postnr = rs("postnr") bynavn = rs("bynavn") mail = rs("mail") privattlf = rs("privattlf") mobiltlf = rs("mobiltlf") %> <% if mail <> "" then %> <% end if %> <% if privattlf <> "" then %> <% end if %> <% if mobiltlf <> "" then %> <% end if %> <% If Session("User_kreds30") <> "Administrator" Then %> <% else %> <% End If %> <% rs.MoveNext LOOP RS.Close end if %> <% SQL = "Select * from info where web='Hold 5' ORDER BY id" set RS = conn.execute(sql) if not rs.EOF then %> <% DO WHILE NOT rs.EOF web = rs("web") navn = rs("navn") adresse = rs("adresse") postnr = rs("postnr") bynavn = rs("bynavn") mail = rs("mail") privattlf = rs("privattlf") mobiltlf = rs("mobiltlf") %> <% if mail <> "" then %> <% end if %> <% if privattlf <> "" then %> <% end if %> <% if mobiltlf <> "" then %> <% end if %> <% If Session("User_kreds30") <> "Administrator" Then %> <% else %> <% End If %> <% rs.MoveNext LOOP RS.Close end if %> <% SQL = "Select * from info where web='Hold 6' ORDER BY id" set RS = conn.execute(sql) if not rs.EOF then %> <% DO WHILE NOT rs.EOF web = rs("web") navn = rs("navn") adresse = rs("adresse") postnr = rs("postnr") bynavn = rs("bynavn") mail = rs("mail") privattlf = rs("privattlf") mobiltlf = rs("mobiltlf") %> <% if mail <> "" then %> <% end if %> <% if privattlf <> "" then %> <% end if %> <% if mobiltlf <> "" then %> <% end if %> <% If Session("User_kreds30") <> "Administrator" Then %> <% else %> <% End If %> <% rs.MoveNext LOOP RS.Close end if %> <% SQL = "Select * from info where web='Hold 7' ORDER BY id" set RS = conn.execute(sql) if not rs.EOF then %> <% DO WHILE NOT rs.EOF web = rs("web") navn = rs("navn") adresse = rs("adresse") postnr = rs("postnr") bynavn = rs("bynavn") mail = rs("mail") privattlf = rs("privattlf") mobiltlf = rs("mobiltlf") %> <% if mail <> "" then %> <% end if %> <% if privattlf <> "" then %> <% end if %> <% if mobiltlf <> "" then %> <% end if %> <% If Session("User_kreds30") <> "Administrator" Then %> <% else %> <% End If %> <% rs.MoveNext LOOP RS.Close end if %> <% SQL = "Select * from info where web='Hold 8' ORDER BY id" set RS = conn.execute(sql) if not rs.EOF then %> <% DO WHILE NOT rs.EOF web = rs("web") navn = rs("navn") adresse = rs("adresse") postnr = rs("postnr") bynavn = rs("bynavn") mail = rs("mail") privattlf = rs("privattlf") mobiltlf = rs("mobiltlf") %> <% if mail <> "" then %> <% end if %> <% if privattlf <> "" then %> <% end if %> <% if mobiltlf <> "" then %> <% end if %> <% If Session("User_kreds30") <> "Administrator" Then %> <% else %> <% End If %> <% rs.MoveNext LOOP RS.Close end if %> <% SQL = "Select * from info where web='Hold 9' ORDER BY id" set RS = conn.execute(sql) if not rs.EOF then %> <% DO WHILE NOT rs.EOF web = rs("web") navn = rs("navn") adresse = rs("adresse") postnr = rs("postnr") bynavn = rs("bynavn") mail = rs("mail") privattlf = rs("privattlf") mobiltlf = rs("mobiltlf") %> <% if mail <> "" then %> <% end if %> <% if privattlf <> "" then %> <% end if %> <% if mobiltlf <> "" then %> <% end if %> <% If Session("User_kreds30") <> "Administrator" Then %> <% else %> <% End If %> <% rs.MoveNext LOOP RS.Close end if conn.Close Set conn = nothing Set SQLstmt = nothing %>

 <%=rs("web")%>: <%=rs("navn")%>

Tid:

<%=adresse%>

Holdansvarlig(e):

<%=postnr%>

Føl:

<%=mail%>

Formål:

<%=privattlf%>

Indhold:

<%=mobiltlf%>
 
">ret | ">slet

 <%=rs("web")%>: <%=rs("navn")%>

Tid:

<%=adresse%>

Holdansvarlig(e):

<%=postnr%>

Føl:

<%=mail%>

Formål:

<%=privattlf%>

Indhold:

<%=mobiltlf%>
 
">ret | ">slet

 <%=rs("web")%>: <%=rs("navn")%>

Tid:

<%=adresse%>

Holdansvarlig(e):

<%=postnr%>

Føl:

<%=mail%>

Formål:

<%=privattlf%>

Indhold:

<%=mobiltlf%>
 
">ret | ">slet

 <%=rs("web")%>: <%=rs("navn")%>

Tid:

<%=adresse%>

Holdansvarlig(e):

<%=postnr%>

Føl:

<%=mail%>

Formål:

<%=privattlf%>

Indhold:

<%=mobiltlf%>
 
">ret | ">slet

 <%=rs("web")%>: <%=rs("navn")%>

Tid:

<%=adresse%>

Holdansvarlig(e):

<%=postnr%>

Føl:

<%=mail%>

Formål:

<%=privattlf%>

Indhold:

<%=mobiltlf%>
 
">ret | ">slet

 <%=rs("web")%>: <%=rs("navn")%>

Tid:

<%=adresse%>

Holdansvarlig(e):

<%=postnr%>

Føl:

<%=mail%>

Formål:

<%=privattlf%>

Indhold:

<%=mobiltlf%>
 
">ret | ">slet

 <%=rs("web")%>: <%=rs("navn")%>

Tid:

<%=adresse%>

Holdansvarlig(e):

<%=postnr%>

Føl:

<%=mail%>

Formål:

<%=privattlf%>

Indhold:

<%=mobiltlf%>
 
">ret | ">slet

 <%=rs("web")%>: <%=rs("navn")%>

Tid:

<%=adresse%>

Holdansvarlig(e):

<%=postnr%>

Føl:

<%=mail%>

Formål:

<%=privattlf%>

Indhold:

<%=mobiltlf%>
 
">ret | ">slet

 <%=rs("web")%>: <%=rs("navn")%>

Tid:

<%=adresse%>

Holdansvarlig(e):

<%=postnr%>

Føl:

<%=mail%>

Formål:

<%=privattlf%>

Indhold:

<%=mobiltlf%>
 
">ret | ">slet