<% if (isNull(request.cookies("cookieUserID"))) or (request.cookies("cookieUserID")="") then response.redirect "index.asp" end if %>

<% 'Events.. if len(request.querystring("chkSel")) > 0 then 'its lengthy, bu i don car s = "DELETE FROM tblUser WHERE UserID IN (" & request.querystring("chkSel") & ");" 'response.write s cn.execute(s) end if 'Pageload.. Dim LB Dim strWhere Dim i Dim s LB = request.querystring("LB") response.write "" 'x = swapIt(x) x = swapIt(x) response.write "" x = swapIt(x) s = "SELECT * FROM tblUser ORDER BY strUserName;" 'response.Write s i = 1 'x = swapIt(x) set rst = cn.execute(s) while not rst.eof response.write "" x = swapIt(x) i = i + 1 rst.movenext wend rst.close cn.close response.write "" %>

" 'listHeading response.write "
	User List				Delete
" & i & "	" & rst("strUserName") &"