Estoy intentando enviar un informe a PDF utilizando NCONVERT.
El problema es q cuando el informe tiene varias paginas me crea un fichero por cada pagina.
Existe alguna manera de crear un unico fichero con todas las paginas?
For X=1 To Len(oPrn:aMeta)
WF:=cTarget+"\PDF\"+Substr(WNFactura,1,1)+Alltrim(Str(X))+Substr(WNFactura,4)+".WMF"
WF1:=cTarget+"\PDF\"+Substr(WNFactura,1,1)+Alltrim(Str(X))+Substr(WNFactura,4)+".PDF"
WF:=Alltrim(WF)
WF1:=Alltrim(WF1)
If File(WF)
Delete File &WF
End
If File(WF1)
Delete File &WF1
End
CopyFile(oPrn:aMeta[X],WF)
Sele 14
cEj:="NCONVERT.EXE -quiet -out pdf -c 5 &WF "
WaitRun( cEj )
If File(WF)
* Delete File &WF
End
Next
If cPdf
oPrn:End()
End
If nFra=1
MsgAlert("Ha sido creado el fichero" + Chr(13) + WF1 )
End
End
Este es el codigo que utilizo
Podriais echarme una mano
Gracias
Informe a PDF
Re: Informe a PDF
João Santos - São Paulo - Brasil
-
- Posts: 33
- Joined: Tue Jun 08, 2010 3:34 pm
- Location: Rosario, Santa Fe. Argentina
Re: Informe a PDF
Karinha, si querés, podés probar esta otra alternativa:
http://forums.fivetechsupport.com/viewt ... 38#p111738
http://forums.fivetechsupport.com/viewt ... 38#p111738
Libreria: FWH/FWHX 9.11 25/November/2009
Harbour: Harbour 2.0.0 Beta2
Compilador: Borland C++ 5.5.1 versión 32 bits
Editor de Recursos: UEstudio 10.0
Gestor de B.D: A.D.A ( Advantage Data Architect )
S.O: Windows XP
Harbour: Harbour 2.0.0 Beta2
Compilador: Borland C++ 5.5.1 versión 32 bits
Editor de Recursos: UEstudio 10.0
Gestor de B.D: A.D.A ( Advantage Data Architect )
S.O: Windows XP
Re: Informe a PDF
Muchas gracais por la contestacion.
Pero esta opcion requiere instalar PDF Creator.
Y quisiera seguri usando Nconvert que es mas "opaco" para el usuario.
Gracias
Pero esta opcion requiere instalar PDF Creator.
Y quisiera seguri usando Nconvert que es mas "opaco" para el usuario.
Gracias