<div class="postchkbox"> <select id="chkact" name="chkact"> <option value="0">无响应</option> <option value="1">背景调查</option> <option value="2">明确需求</option> <% Set Rs2=Server.CreateObject("ADODB.RecordSet") Rs2.Open "select id,em_user from employee where em_role="&Session("employee_id"),conn,1,1 Do while Not Rs2.bof and Not Rs2.eof %> <option value="t<%=Rs2("id")%>">转给<%=Rs2("em_user")%></option> <% Rs2.moveNext loop Rs2.close Set Rs2=Nothing %> </select> <input type="button" value="执行" onClick="postchk(1)" class="btn1" /> </div>