"
Response.Write "| "
Response.Write "Gruppe"
Response.Write " | "
Response.Write ""
Response.Write "Medl nr"
Response.Write " | "
Response.Write ""
Response.Write "Navn"
Response.Write " | "
Response.Write ""
Response.Write "Adresse"
Response.Write " | "
Response.Write ""
Response.Write "Stednavn"
Response.Write " | "
Response.Write ""
Response.Write "By"
Response.Write " | "
Response.Write ""
Response.Write "Tlf privat"
Response.Write " | "
Response.Write ""
Response.Write "Tlf mobil"
Response.Write " | "
Response.Write ""
Response.Write "Tlf arbejde"
Response.Write " | "
Response.Write ""
Response.Write "E-mail"
Response.Write " | "
Response.Write "
"
Do While Not rs.EOF
If rs("Permission") = "bestyrelse" Then
Response.Write ""
Response.Write "| "
Response.Write rs("Gruppe")
Response.Write " | "
Response.Write ""
Response.Write rs("MedlemsNr")
Response.Write " | "
Response.Write ""
Response.Write rs("Navn")
Response.Write " | "
Response.Write ""
Response.Write rs("Adresse")
Response.Write " | "
Response.Write ""
Response.Write rs("Stednavn")
Response.Write " | "
Response.Write ""
Response.Write rs("By")
Response.Write " | "
Response.Write ""
Response.Write rs("TelefonPrivat")
Response.Write " | "
Response.Write ""
Response.Write rs("TelefonMobil")
Response.Write " | "
Response.Write ""
Response.Write rs("TelefonArbejde")
Response.Write " | "
Response.Write "" & rs("Email") & " | "
Response.Write "
"
End If
rs.MoveNext
Loop
Response.Write "