<%sql ="select * from viplist where 科室='"&trim(session("chkkeshi"))&"'" openrs rs,sql,1,1 %> <%do while not rs.eof%> <% rs.movenext loop rs.close %>

姓名	资料修改	删除
<%response.write rs("truename")%>	<%response.write"修改"%>	<%response.write"删除"%>