|
|
 |
|
| |
<%set rs=server.CreateObject("adodb.recordset")
rs.open "select * from [user] where Purview=1 order by id asc",conn,1,1
if rs.bof and rs.eof then
response.Write("")
else
i=0
do while not rs.eof
%>
| |
<%
rs.movenext
i=i+1
if i mod 3 =0 then response.Write(" ")
loop
end if
rs.close
set rs=nothing
%>
|
|
|
|
|
