Buen dia gente del foro, esta es la primera vez que mando una duda, espero y puedan ayudarme.
Estoy trabajando con una aplicacion en la cual ocupo imprimir una factura, estoy utilizando FPDF para ASP con la cual creo un pdf con los datos que se imprimiran en la factura en las posiciones que deben de ir.
El problema es que cuando abro la ventana donde se muestra el pdf, en lugar de mostrar el pdf lo que hace es mostrar una pantalla en blanco y despliega una caja de texto como si fuera un error sin datos, solo con la imagen del signo de interrogacion.
He estado leyendo y no encuentro respuesta, aqui les pongo el codigo que utilizo
Set pdf=CreateJsObject("FPDF")
pdf.CreatePDF "p","mm", "Letter"
pdf.SetPath("funciones/fpdf/")
pdf.Open()
pdf.AddPage()
xenc = 14
y1 = 36
xdetalle = 14
xtotales=184
ytotales=135
pdf.SetFont "Arial","",9 'Tamaño de la letra
PDF.Text xenc, y1, rsDetails("nbCliente")
y1 = y1+6
PDF.Text xenc, y1, rsDetails("de_Domicilio")
PDF.Text xenc+140, y1, rsDetails("Dia") & " " & rsDetails("Mes") & " " & rsDetails("Anio")
y1 = y1+6
PDF.Text xenc, y1, rsDetails("de_CiudadCliente")
MasDetalles = false
Total=0
TotalDin=0
if not (rsDetails.EOF and rsDetails.BOF) then
MasDetalles = true
end if
if MasDetalles then
DetailsARR = rsDetails.GetRows
end if
y1 = y1+13
for i=0 to ubound(DetailsARR,2)
PDF.Text xdetalle, y1, formatnumber(DetailsARR(31,i),0)
PDF.Text xdetalle+15, y1, "CAJAS DE " & DetailsARR(25,i)
PDF.Text xdetalle+140, y1, formatnumber(DetailsARR(46,I),2) & " US"
PDF.Text xdetalle+170, y1, formatnumber(DetailsARR(47,I),2)
Total=Total+DetailsARR(31,I)
TotalDin=TotalDin+DetailsARR(47,I)
Letra = DetailsARR(49,I) + " "
y1 = y1+5
next
PDF.Text xtotales, ytotales, formatnumber(TotalDin,2)
PDF.Text xtotales, ytotales+14, formatnumber(TotalDin,2)
PDF.Text xdetalle+48, ytotales+24, trim(Letra)
PDF.Output()