怎么在服务器端 动态的用options的add方法给select添加条目

<% rs.movefirst
   academy = Request.Form("sel")
   do while not rs.eof
      if rs("学院") = academy  then
       oOption = document.createElement("OPTION")
       choise.options.add(oOption)
       oOption.innerText = rs("专业")
      end if
      oOption = null
      rs.movenext
  loop
%>
单看这段程序 有什么问题么   困扰我好久了 就是不知道怎么解决啊