Sacar registro diario

[Bravenap]

Muy buenas. Tengo una función de ASP 3.0 para sacar un registro diario de una base de datos. La quiero adaptar a .Net pero hay algunas cosas que se me escapan.

Código:

<%
fechaBase = CDate("01/01/1980")
fechaActual = Date

iteracionDiaria = DateDiff("d",fechaBase,fechaActual)
iteracionSemanal = DateDiff ("w",fechaBase,fechaActual)

'Cambio de libro cada día
sqlLibros = "select id,autor,titulo from libros"
set rsLibros = Conn.Execute(sqlLibros)

'Lo siguiente supongo que se abrevia utilizando un SELECT COUNT(*)...
numLibros = 1
while not rsLibros.eof
	rsLibros.movenext
	numLibros = numLibros + 1
wend
rsLibros.movefirst
'calculamos resto de division entera con numLibros
posicion = iteracionDiaria mod numLibros

for i = 1 to posicion - 1
 rsLibros.movenext
next 
response.Write("<i>" & rsLibros("titulo") & "</i> " & rsLibros("autor"))
%>

¿Por qué posición nunca es mayor que el número de registros, en este caso 366?

[Jose_minglein2]

Hombre, simples matemáticas, porque si el número de registros es 366, el resto de cualquier número dividido entre 366, siempre será menor que éste. Si no, el cociente sumaría uno más, y el resto pasaría a 0.

P.ej.

367/366=1 resto 1.

[Bravenap]

Será por eso por lo que me ha quedado Matemáticas este año, je je. Mira que olvidarme de las simples matemáticas cuando estoy programando... es para echarmen de comer aparte.

Voy a ver si me curro una función cortita para .Net, sobre todo en el tema de SQL, y la pongo aquí.

Gracias y un saludo.