<% sql="Select * From menu where followid=0 order by SortNum" Set Rs=Conn.Execute(sql) do while not rs.eof %> <% rs.movenext loop Set Rs = Nothing %>