% if Session("Rank") <> 1 then Response.Redirect "../notauthorised.html" end if if request("delete") = 1 then Str = request("check") Str = split(Str, ",") SQL = "delete from MemberInfo where" for i = 0 to ubound(Str) SQL = SQL & " ID = " & Str(i) if i<>ubound(Str) then SQL = SQL & " OR " end if next dbstart_temp conn.execute(SQL) end if %> <% TodaysDate = Date SQL = "sp_getusers" dbstart set RS = cmd.Execute %>
E D I T M E M B E R I N F O | Site Home Admin Home Edit Members |