¡ Hola ¡
Estaba revisando el agente y la repaginación que funcionaba en principio. Pero viendolo con mas detenimiento el CUANTOS funciona , pero el COMIENZO no, como veia que ponia registros mas o menos y aparecian mas o menos, pense que funcionaba , pero lo que hacee es poner más o menos registros pero no empieza desde comienzo sino siempre desde el principio.
el parametro quedo asi:
Function parametro(cadena As String, variable As String) As String
If Instr(cadena,variable)>0 Then
' LO HE ENCONTRADO
cadena=Strtoken(CADENA,PARAMETRO+"=",2)
If Instr(cadena,"&")>0 Then
parametro=Strtoken(cadena,"&",1)
Else
parametro=cadena
End If
Else
' NO ESTA ESE PARAMETRO
parametro="0"
End If
End Function