Lo que yo deseo hacer es leer un archivo de excel y mostrarlo en formato html pero paginado. Pues bien esa parte de leer el archivo de excel y mostrarlos en una pagina en formato html ya lo realizo pero ahora quiero paginar la salida de html o sea mostrar x cantidad de records del archivo de excel por pagina. Yo me deje llevar por un codigo que tengo para paginar datos pero ese codigo 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...
Con el codigo de esta manera me presenta el siguiete error
Error Type:
ADODB.Recordset (0x800A0CB3)
Current Recordset does not support bookmarks. This may be a limitation of the provider or of the selected cursortype.
/master2.asp, line 229
La linea 229 es en donde dice
tabla.AbsolutePage = pagina_actual
Gracias a todos por su ayuda
