[Resolvido] PDF com FPDF - \n

Boa tarde,

Estou com problema para criar um pdf com este componente.

Não consigo pular de uma linha para outra dentro do CELL ou do Multicell.

Já tentei com html e usando \n

pdf.Cell 70,30,"Texto \n con \n salto",1,0,"L","R"

obrigado desde já

Meu codigo:

<%Response.Buffer = True %>

<%
Response.Charset = "ISO-8859-1"
%>
<!--#include file="conexaoSQL.asp"-->
<!--#include file="fpdf.asp"-->

<%
id = request.QueryString("id")
ComandoSQL = "SELECT * from pedido where idped = "&id&" "
Set rs = Conn.Execute(ComandoSQL)
cliente = rs("cliente")
ComandoSQL1 = "SELECT * from clientes where id = "&cliente&" "
Set rsc = Conn.Execute(ComandoSQL1)

Dim nomIma
nomIma = "logo.jpg"

Set pdf=CreateJsObject("FPDF")
pdf.CreatePDF "P", "mm", "A4"

pdf.SetPath("fpdf/")

pdf.SetFont "Arial","",10

pdf.Open()
'pu
pdf.AddPage()
pdf.SetTitle "Netel Pro"
pdf.Image nomIma, 10, 1, 25,6, "jpg", "http://www.grupoacierta.eu"
'pdf.text 95,5, "FACTURA"

'pdf.Cell 60,5, ,1,0,"L"
'pdf.Cell 300,200,""& rsc("nombre")&"",1,1,"C"

'pdf.multicell 150,30, rsc("nombre") ,1,"R","R",1

pdf.Cell 120
pdf.Cell 70,30,"Texto \n con \n salto",1,0,"L","R"

'pdf.Cell 70,30, rsc("direccion"),1,0,"L","R"
'pdf.Cell 60,5, ""& rsc("nombre")&"",1,0,"L"
pdf.SetFont "Arial","B",14
pdf.write 0, "Axouxere Informática S.L"
pdf.ln 2
pdf.SetFont "Arial","B",12
pdf.write 5, "Crucero 1 - Extramundi"
pdf.ln
pdf.write 5, "15910 Padrón - A Coruña"
pdf.ln
pdf.write 5, "e-mail: axouxere@axouxere.es"
pdf.ln
pdf.write 5, "www.axouxere.es"
pdf.ln 10
pdf.write 5, rsc("nif")
pdf.ln 10
pdf.Cell 30,5," " ,1,0,"L"
pdf.Cell 30,5, " ",1,0,"L"
pdf.Cell 30,5, " ",1,0,"L"
pdf.Cell 30,5, " ",1,0,"L"
pdf.ln 15

pdf.Cell 35,5, "REFERENCIA",1,0,"L"
pdf.Cell 100,5, "DESCRIPCIÓN",1,0,"L"
pdf.Cell 15,5, "CANT.",1,0,"L"
pdf.Cell 20,5, "PRECIO",1,0,"L"
pdf.Cell 20,5, "TOTAL",1,0,"L"
pdf.Ln()
pdf.SetFont "Arial","",10

pedido = rs("idped")

	ComandoSQL = "SELECT * from pedido_fijo where idped = "&pedido&""
	Set rsp = Conn.Execute(ComandoSQL)
	total = 0
	dim pedido2

do while not rsp.eof
total = cint(rsp("unidad")) * rsp("precio")
pdf.Cell 35,5,rsp("cod"),1,0,"L"
pdf.Cell 100,5,rsp("nombre"),1,0,"L"
pdf.Cell 15,5,rsp("unidad"),1,0,"L"
pdf.Cell 20,5,formatnumber(rsp("precio"),2),1,0,"L"
pdf.Cell 20,5,formatnumber(total,2),1,0,"L"
pdf.Ln()

'total = "[ Total: " & formatnumber(total,2)& " €]"
rsp.MoveNext
Loop
rsp.Close
Set rsp = Nothing

'pdf.Cell 185,10, ""& pedido& "", 1,0, "L"
'pdf.multicell 185,5, rs("obs") , 1,0, "L"
'pdf.multicell 185,5, pedido2 , 1,0, "L"

'pdf.multicell 200,5, pedido&teste&total &"\n" &teste&total,0,"L","L",1
'pdf.Ln()

'pdf.Output(server.MapPath("prueba.pdf")),F
pdf.Output()
pdf.Close()

rs.Close

Set rs= Nothing

conn.close

Set conn= Nothing
%>