Código:
pero no me arroja el resultado deseado se supone que debe desplegar tres select con datos cargados desde la BD pero no lo hace solo me arroja uno<!--#include file="secure/abrir_coneccion.asp"--> <% %> <% if IsEmpty(Request("num")) then num = "0" else num = Request("num") end if fin = Cint(num)*3 for i = 1 to fin sSQL = "select * from meses order by cod_mes ASC" set Rs = db.execute(sSQL) Response.Write("i=" & i) Response.Write("<select name='mes"&i&"' class='bordes><option selected value="&i&">Mes</option>") Do While Not Rs.Eof Response.Write("<option value="&Rs("cod_mes")&">"&Rs("mes")&"</option>") Rs.MoveNext Loop Set Rs = Nothing Response.Write("</select>") next %>
por que sera eso