Ver Mensaje Individual
  #1 (permalink)  
Antiguo 17/01/2008, 11:19
krisiun
 
Fecha de Ingreso: enero-2008
Mensajes: 12
Antigüedad: 16 años, 4 meses
Puntos: 0
Problema con intervalo

Estimado tengo el siguiente codigo para crear pdf desde asp, es bien similar a uno que extraje de este mismo foro pero les hice una ciertas modificaciones espero que me puedan ayudar ...

Código HTML:
<%@ Language=VBscript%>
<!--#include file="fpdf.asp"-->
<!--#include file="conn.asp"--><%
sql= "SELECT RUT_USUARIO AS rut FROM ADM_USUARIO where id_usuario = '1'"
set recDatos = conn.execute(sql)
if not ( recDatos.EOF ) then
  	dim intdato
	rut = recDatos("rut")
	intdato = recDatos.GetRows
	recDatos.Close
	set recDatos = nothing
	conn.close
	
		'Creación del documento PDF
	Set pdf = CreateJsObject("FPDF")
	pdf.CreatePDF "P","pt","Letter"
	pdf.SetPath("fpdf/")
	pdf.SetFont "Arial","",16
	pdf.Open()
	pdf.AddPage()
	pdf.Cell 100, 100, "Prueba de creación de PDF's on-line"
	alto = 25
	cY = 150
        'lo limito solo a 10 debido a que no he programado aún el cambio de página
	'for j = 0 to ubound(tblUsuario,2)
    pdf.Cell 100, intdato("rut")

	pdf.Output()
	pdf.Close()
else
	response.write "No se encontraron usuarios disponibles"
end if%> 
y al ejecutar me sale esto...

Código HTML:
Error de Microsoft VBScript en tiempo de ejecución error '800a0009' 

El subíndice está fuera del intervalo 

/home/prueba.asp, line 26 
Porfavor si alguien me puede echar una manito de antemano gracias.