<%Checklogin()%> 管理区域
<%Set Rs=Server.CreateObject("ADODB.RecordSet") Rs.Open "select id,em_user from employee where em_role="&Session("employee_id"),conn,1,1 Do while not Rs.bof and not Rs.eof %>

<%=Rs("em_user")%>的客户画像:

<%Set Rs1=Server.CreateObject("ADODB.RecordSet") Rs1.Open "Select tagName,count(id) as count from tagTable where employeeId="&Rs("id")&" GROUP BY tagName",conn,1,1 Do while Not Rs1.Bof And Not Rs1.eof %> &tagName=<%=Server.urlEnCode(Rs1("tagName"))%>" ><%=Rs1("tagName")%>(<%=Rs1("count")%>) <% Rs1.moveNext loop %>
<%Rs1.Close:Set Rs1=Nothing%>
<% Rs.moveNext loop Rs.close Set Rs=Nothing Conn.Close Set Conn=Nothing %>