<% dim look_for %> admin
?submitted=yes" method="post"> Make some mod author happy today! - unlock there account, or lock it up and make them cry

<% look_for = Request.Form("look_for") if Request.QueryString("submitted") = "yes" then %> <% set tigCON = Server.CreateObject("ADODB.Connection") tigCON.Open(DSN) query = "select id, login, pass, name, email, active " & _ "from mods_login where " & _ "(login like '%" & look_for & "%') or " & _ "(pass like '%" & look_for & "%') or " & _ "(name like '%" & look_for & "%') or " & _ "(email like '%" & look_for & "%')" & _ "order by active" 'Response.Write("Query = [" & query & "]
") set tigRS = tigCON.Execute(query) if (tigRS.EOF) then %> Nothing in the database matches your search, try again? <% end if dim id do while not tigRS.EOF id = tigRS("id") %> <% if tigRS("active") then %> <% else %> <% end if %> <% tigRS.MoveNext loop tigRS.close tigCON.close %>
email author login pass In/Active
<%=tigRS("email")%> <%=tigRS("name")%> <%=tigRS("login")%> <%=tigRS("pass")%>activeNot active
<% end if %>