16/11/2006, 19:27
|
 | | | Fecha de Ingreso: diciembre-2001 Ubicación: Monterrey NL
Mensajes: 263
Antigüedad: 23 años, 10 meses Puntos: 0 | |
| Ayuda con Do While
Tengo este codigo.... pero los resultados se me multiplican....
Como puedo hacer para evitarlo???
Gracias
SQL="SELECT * FROM categorias, estados"
set Rs = Con.Execute(SQL)
RS.movefirst
Response.Write "<select name=""st"">"
Do While not RS.eof
Response.write ("<option>"&RS("st")&"")
RS.movenext
Loop
response.write "</select>"
RS.movefirst
Response.Write "<select name=""cat"">"
Do While not RS.eof
Response.write ("<option>"&RS("cat")&"")
RS.movenext
Loop
response.write "</select>"
Rs.Close
set Rs = nothing
Con.Close
set Con = nothing
%> |