Lista de años en un drop down list

[luise32]

hola, necesito q un combo se actualice cuando sea necesario segun el año actual, ACLARO QUE ES UNA APLICACION WEB CON VARIOS DE ESTOS COMBOS DE FECHA, SE MANEJAN BASES DE DATOS CON ORACLE.

Ejemplo: estamos en el 2007 y necesito q el drop down list contenga los años desde 1970 hasta el 2007, pero si llegamos al 2008 el drop down list debe tener ese nuevo año en lista. como hago??? depronto el sysdate de SQL tiene alguna opcion para hacerlo???
gracias!!!

[guitar24]

yo lo hice en vb.net de la siguiente manera:
en la parte de codigo capturé la fecha del sistema y rellené el combo desde la fecha inicial hasta la fecha del sistema, así se te actualizará cada año sin que tengas que ir al código a modificarlo.
Espero haberte sido de ayuda, saludos

[luise32]

q pena pero sera q podria colocar el ejemplo q usted hizo para guiarme??? se lo agradeceria mucho....

[guitar24]

ahí te va:
Creo la variable fecha: dim fecha as new Date
Recojo la fecha del sistema: dim f= fecha.Now
en tu caso sólo necesitas el año actual, entonces sería: dim anho=f.Year
Y ahora rellenas el combo: desde drowndroplist.items.add(1970)... hasta drowndroplist.items.add(anho)
Saludos,

[luise32]

Solucione el problema pero de otra forma :D aqui esta por si a alguien le interesa

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

Dim m As Integer
xcon.Open()
xsel.CommandText = "select to_char(sysdate,'yyyy') from dual" 'PARA REALIZAR CONSULTAS EN BASES DE DATOS
m = xsel.ExecuteScalar()
xcon.Close()

Dim anio As Integer = 1970

Do While anio <= m
Me.DropDownList1.Items.Add(anio)
anio += 1
Loop

End Sub
End Class

Jeje, tanto lio q me hice en la cabeza y la solucion estuvo en mis manos, gracias por la ayuda me abrieron el camino :D

[nemagonnn]

aquí pongo el código que yo utilizo hecho VB

'llenar combo año
Dim intAnho As Integer = Year(Now()) + 1
Dim i As Integer
Dim sec As Integer = 0
For i = intAnho To 1970 Step -1
dropAnho.Items.Insert(sec, New ListItem(i, i))
sec = sec + 1
Next


el problema que veo en el código de luis es que está castigando la bd con esa consulta para sacar el año

[__Pamela]

yo lo modique asi para .net que es lo mismo para no utilizar la base de datos

Function LlenarAño()
Dim m As Integer

m = Year(Now.Date)


Dim anio As Integer = 1970

Do While anio <= m
Me.dropAño.Items.Add(anio)
anio += 1
Loop

End Function

[Aquaventus]

Hola __Pamela no es necesario que respondas este post... es de hace 4 años..., no tiene sentido revivirlo. Saludos!.