Lo que yo deseo hacer es leer un archivo de excel y mostrarlo en formato html. Pues bien esa parte de leer el archivo de excel y mostrarlos en html ya lo realizo pero ahora quiero paginar esa salida o sea mostrar x cantidad de records por pagina. Yo me deje llevar por un codigo que tengo para paginar datos pero ese ejemplo es para leerlos de access. Quiero saber si las siguientes funciones las puedo utilizar leyendo el record de excel o que esta mal en el siguiente codigo:
Funciones: AbsolutePage, PageSize, CacheSize, PageCount
Codigo:
mostrar = 3500
' IF para saber que página mostrar
If Request.QueryString("page") = "" Then
pagina_actual = 1
Else
pagina_actual = CInt(Request.QueryString("page"))
End If
set objcon = Server.CreateObject("ADODB.Connection")
objcon.provider ="Microsoft.Jet.OLEDB.4.0"
objcon.ConnectionString = "Data Source=c:\Master.xls;Extended Properties =" & chr(34) & "Excel 8.0;HDR=YES;IMEX=1;" & chr(34) & chr(34) & chr(34)
objcon.Open
set tabla = Server.CreateObject("ADODB.Recordset")
tabla.PageSize = mostrar
tabla.CacheSize = mostrar
sql_statement1 = "Select * from [sheet1$]"
tabla.Open sql_statement1, objcon
cant_paginas = tabla.PageCount
'Si el pedido de página cae afuera del rango,
'lo modificamos para que caiga adentro
If pagina_actual > cant_paginas Then pagina_actual = cant_paginas
If pagina_actual < 1 Then pagina_actual = 1
'Si la cantidad de páginas da 0
If cant_paginas = 0 Then
Response.Write "No hay registros..."
Else
'Nos movemos a la página elegida
tabla.AbsolutePage = pagina_actual
'Mostramos el dato de que página estamos...
