大家帮忙给看下这段代码，想实现当userdept=adm时显示下拉列表，否则显示userdept

<%IF session("userdept")="adm" THEN %>  
  <select name="Deptname" size="1">
<%  
set rs=server.createobject("adodb.recordset")
sql="select * from sms_Deptinfo order by ID"
rs.open sql,cn,1,1
if not rs.EOF then

do while not rs.EOF%>
<option value="<%=trim(rs("deptname"))%>"><%=trim(rs("deptname"))%></option>
<%
rs.MoveNext
loop
else
%>
<option value="" selected>还没有类型</option>
<%  
end if
rs.Close
%>
  </select>  
<%ELSE%>
<%=session("userdept")%>发布时间
<%END IF%>

语句没有问题，HTML格式搞好就可以了

可是怎么不能正确显示呢，userdept的值为adm时也不能显示下拉列表的，再次请教，谢谢！