select con datos de la db

[normab]

Hola, tengo esta consulta donde quiero que me muestre los usuarios en un selec
<%
Dim Conexion,Tabla
Set Conexion=Server.CreateObject("adodb.connection")
Set Tabla=Server.CreateObject("adodb.recordset")
Conexion.Open "Driver={Microsoft Access Driver (*.mdb)}; " & "Dbq=" & Server.MapPath("db/base.mdb")

Dim Temp
Temp="Select * From usuarios "

Tabla.Open Temp, Conexion
If Not Tabla.EOF Then
%>
<p><select size="1" name="D1" type="text" value="<%=tabla.Fields("usuario")%>"> </select><input type="submit" value="Enviar" name="B1"><input type="reset" value="Restablecer" name="B2"></p>

<%
Tabla.Close
Conexion.Close
End If
%>
pero no los muestra....donde me equivoco?

[El_Metallick]

no veo el ciclo para mostrar todos los datos... deverias hacer un do while... eria algo asi:

Código:

<%
Do While Not Tabla.Eof
%>
<p><select size="1" name="D1" type="text" value="<%=tabla.Fields("usuario")%>"> </select><input type="submit" value="Enviar" name="B1"><input type="reset" value="Restablecer" name="B2"></p>
<%
Tabla.MoveNext
Loop
%>

Espero te sirva... saludos

[trasgukabi]

vale, pero mejor asi:

Código:

<%
Dim Conexion,Tabla
Set Conexion=Server.CreateObject("adodb.connection")
Set Tabla=Server.CreateObject("adodb.recordset")
Conexion.Open "Driver={Microsoft Access Driver (*.mdb)}; " & "Dbq=" & Server.MapPath("db/base.mdb")

Dim Temp
Temp="Select * From usuarios "

Tabla.Open Temp, Conexion
%><select name="D1" type="text" > <%
do while Not Tabla.EOF
%>
<option value="<%=tabla.Fields("usuario")%>"><%=tabla.Fields("usuario")%></option>

<%
tabla.movenext
loop
Tabla.Close
Conexion.Close
%></select><input type="submit" value="Enviar" name="B1"><input type="reset" value="Restablecer" name="B2">

[El_Metallick]

bueno ahi esta todo el ejemplo... es que la verdad que vengo saliendo de un trabajo de la universidad asique me da flojera escibir mas código... estoy mareado con tanto código pero bueno ya vendra un viernes... saludos amigos

PD: Al sorry por el off topic

[normab]

Gracias chicos! como siempre ...espectacular la ayuda

[normab]

hola, yo otra vez.
El codigo funciona pero yo lo quiero mandar a otra pagina y cuando lo recogo , siempre me muestra el primero de los usuarios , se envia de alguna manera en especial?