%
'on error resume next
%>
Distributor List
| Company |
Status |
<%
sql = "select * from distributor order by business_name"
set rs = conn.Execute(sql)
do while not rs.eof
if rs("approved") = 0 then
status = "Pending"
elseif rs("access") = 0 then
status = "Locked out"
elseif rs("create_new") = 0 then
status = "Limited"
else
status = "Normal"
end if
%>
| "><%=rs("business_name")%> |
<%=status%> |
<%
rs.movenext: loop%>