<% action = request.form("action") if action = "Delete" then selectcount = request.form("del").count qrystr ="delete from login Where " 'delete records for iii = 1 to selectcount qrystr =qrystr & "(login = '" & request.form("del")(iii) & "')" if iii < selectcount then qrystr =qrystr & " or " end if next set rsqrystr = conn.execute(qrystr) set rsqrystr = nothing end if %>
Edit Delete Detail
<% 'From menu sql = "select * from login" set rs = conn.execute(sql) response.write "มีทั้งหมด : " & rs.recordcount & " รายการ" if not rs.eof then if request("no") ="" then pageno =1 else pageno=request("no") end if total = rs.recordcount pagesize= 20 totalpage = total\pagesize if (total mod pagesize) <> "0" then totalpage= totalpage+1 else totalpage = 0 end if rs.Move pagesize*(pageno-1) a=1 if trim(pageno) <> trim(totalpage) then endrecord = pagesize else endrecord=(total mod pagesize) end if For a=1 to endrecord %> <% rs.movenext next set rs = nothing end if %>
Staff
 Login
  Last Login
 
Del
 <%=rs("login")%>  <% if( rs("status") = 0 ) then color_status = "blue" name_status = "Admin" elseif( rs("status") = 1) then color_status = "red" name_status = "Staff" end if %> (<%=name_status%>) <%=dateformatshort(rs("lastlogin"))%> <%=timeformat(rs("lastlogin"))%>   ','MemberEdit','toolbar=yes,status=yes,resizable=yes,width=450,height=260')">
">

หน้าที่ <%For b=1 to totalpage%> <%=b%> <%Next%>