ASP 下拉选择框如何实现可输入

用数据库可以实现

<%
option explicit
response.buffer=true
dim conn
dim connstr
dim db
db="classname.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr

sql="select * from ANclass where classid=1
rs.open sql,conn,1,1
if not(rs.eof and rs.bof) then
%>
">
<%=rs("ClassName")%>

<% rs.movenext
do while not rs.eof%>
">
<%=rs("ClassName")%>

<% rs.movenext
loop
end if
rs.close
set rs = nothing
conn.Close
set conn = nothing
%>

相关问答

最新问答

成都到湖南火车票多少钱

钱钟书是什么星座

昆明可步茶业有限公司怎么样？

陕西特岗,事业单位能不能一起报名

民间中医治脑瘤专家

青岛统帅集团有限公司怎么样？

充分燃烧某糖，消耗的O2、生成的CO2和H2O的物质的量都相等，它的相对分子质量是它实验式相对分子质量的6

昆明电动车，现在买电动车落户有些什么规定？

柯南剧场版15在深圳有哪家电影院上映？11月4日~~~~~~~会加的~~~~~~~

奥迪a6l整车身漆面有颗粒

内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024