RE:listas desplegables con tablas
<%
set BaseDatos = server.CreateObject ("adodb.connection")
BaseDatos.Open ("ASP")
sql_tabla ="select * from miTabla"
set rsTabla = BaseDatos.Execute(sql_tabla)
if not rsTabla.eof then
rsTable.movefirst
end if
%>
<SELECT id=select1 name=select1 style="HEIGHT: 22px; WIDTH: 421px">
<%
cCadena = " selected "
Do While not rsTabla.eof%>
<OPTION <%=cCadena%> > <%=rsTabla("campo")%> </OPTION>
cCadena = ""
rsTabla.movenext
<%Loop%>
</SELECT></P>
<%rsTabla.close%>
<%set rsTabla = Nothing%>
<%BaseDatos.close%>
<%Set BaseDatos = Nothing%>
Es muy posible que tenga algun error, ya que lo escribi directamente.
Saludos...
Guy.-