Hola, aqui te dejo un pequeño codigo que te puede ayudar a realizar esto.
`
Código PHP:
dim sql,con,rs,contados,mover,penultimo
set con = server.createobject("ADODB:conection")
con.open "Provider=Microsoft.Jet.OLedb.4.0;Data source=" & server.mappah("datos.mdb")
set rs = server.createobject("ADODB.Recordset")
sql = "Select * From tabla"
rs.open sql,con,1,2
mover = 0
contados = rs.recordcount - 1
for mover = 1 to contados
rs.movenext
if mover = contados then
penultimo = rs.fields("Campo")
end if
next
response.write ("Tu penultimo registro es" & " " & penultimo)
Bueno un saludo amigo espero haberte ayudado.