Ver Mensaje Individual
  #13 (permalink)  
Antiguo 28/06/2005, 13:12
Avatar de Neuron_376
Neuron_376
 
Fecha de Ingreso: abril-2005
Mensajes: 1.051
Antigüedad: 20 años, 1 mes
Puntos: 2
Hola!

Para lo que tienes, creo que sería así:

dim oConnpais,strSQLpais, objRSpais

Set oConnpais=Server.CreateObject("ADODB.Connection")

oConnpais.Open ("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("mibase.mdb"))


strSQLpais="SELECT * from paises"
Set objRSpais= oConnpais.Execute(strSQLpais)%>
pais<br>
<select name="pais" style="width:175px;">
<% while (not objRSpais.Eof) %>
<option>
<%=Server.HTMLEncode(Cstr(objRSpais("pais")))%>
</option>
<% objRSpais.MoveNext
wend%>
</select>
<%

oConnpais.Close
set objRSpais=nothing
set oConnpais=nothing
__________________
NeuronaNet.com... la idea correcta.
http://www.NeuronaNet.com