<%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 %>
">" width="90" border="0" />
<%= rs("NameEn") %>