ASP - Problemas de imagen fpdf

   
Vista:

Problemas de imagen fpdf

Publicado por MOREN028 (1 intervención) el 20/12/2010 11:56:28
Buenas!

A ver si a alguien se le ocurre una idea con mi problema. Me explico, estoy creando un pdf con fpdf. Debe poner una serie de datos que provienen de mi base de datos. Tengo un bucle for para que para cada registro me ponga una imagen de fondo y coloque correctamente los datos. Todo está cuadrado pero tengo un problema que no sé resolver y me resulta extraño: La primera vez que incluyo la imagen en el pdf el bucle for me da un salto de 2 números!!!!

Os pongo el código para que lo veais:

for i=0 to total step 1
arra=i
set oConn = Server.CreateObject("ADODB.Connection")
set rs = Server.CreateObject("ADODB.Recordset")

oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& Server.MapPath("bd/datos.mdb")
SQL2="SELECT * from ficha where id=" & arraidatos(arra) & ""
rs.Open SQL2, oConn, 2,3

registro=arra
registro=registro+1
modulo=registro mod 6

if registro>5 then
if modulo=0 then
pdf.AddPage()

salto=0

end if
else
if arra=0 then
pdf.AddPage()


end if
end if
coorfoto=20+salto

----------------------- En este punto, la primera vez que se ejecuta el bucle for i vale 0

' pdf.image "fotos/fondoimpresionpdf.jpg", 30 , coorfoto, 150 , 37

-----------------------En este punto, i vale 2 justo después de poner la imagen (no entiendo por qué...)

response.write ("iantenombre=" & arra)
nombre=rs.Fields("nombre")
poblacion=rs.Fields("poblacion")
provincia=rs.Fields("provincia")
calle=rs.Fields("calle")
numero=rs.Fields("numero")
tipocomida=rs.Fields("tipocomida")
telefono=rs.Fields("telefono")
direccion= calle & ", " & numero

pdf.SetFont "Arial","B",14

pdf.SetY 21+salto
pdf.SetX 30
pdf.Cell 150,7, nombre,centrado,1,alinea

pdf.SetFont "Arial","",8
pdf.SetY 29+salto
pdf.Setx 61
pdf.Cell 44,8, direccion,centrado,0,alinea
pdf.Setx 136
pdf.Cell 44,8, poblacion,centrado,1,alinea
pdf.SetY 38+salto
pdf.SetX 61
pdf.Cell 44,8, tipocomida,centrado,0,alinea
pdf.SetX 136
pdf.Cell 44,8, provincia,centrado,1,alinea


pdf.SetFont "Arial","B",14
pdf.SetY 50+salto
pdf.SetX 103
pdf.Cell 45,8, telefono,centrado,0,alinea

salto=salto+45

next

A partir de la primera vez que el bucle for se ejecuta, i pasa a valer 2 y luego se va incrementando normalmente. ¿A alguien se le ocurre que puede estar pasando?
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder