如何利用數據庫內容建立一個下拉式列表？

% myDSN="DSN=xur;uid=xur;pwd=xur"
mySQL="select * from authors where AU_ID100"
set conntemp=server.createobject("adodb.connection")
conntemp.open myDSN
set rstemp=conntemp.execute(mySQL)
if rstemp.eof then
response.write "噢,數據庫為空!"
response.write mySQL
conntemp.close
set conntemp=nothing
response.end
　end if%>
%do until rstemp.eof %>
%
rstemp.movenext
loop
rstemp.close
set rstemp=nothing
conntemp.close
set conntemp=nothing

' 清空對象
%>