Hi,
Try this before to generate your PDF and good luck
FUNCTION ADOBE_INIT(pcFILENAME, pcTITRE)
*Fonction pour initialiser PDFWriter
IF EMPTY(pcTITRE)
pcTITRE = ""
ENDIF
*********************************************************
*Si WIN95, 98, ME
* Dans WIN.ini
*[Acrobat PDFWriter]
*PDFFilename=C:\temp\RAPPORT.pdf
*bDOCINFO=0
*Si WinNT, Win2000, WINXP
*Dans régistres:
*HKEY_CURRENT_USER/Software/Adobe/Acrobat PDFWriter/
*bDocInfo="0"
*PDFFilename="C:\TEMP\RAPPORT.pdf*"
* Note: * = Permanent
*********************************************************
IF "95" $ UPPER(OS(1))
PUTPROSTRG("Acrobat PDFWriter", "PDFFilename", pcFILENAME)
PUTPROSTRG("Acrobat PDFWriter", "bDocInfo", "0")
ELSE
LOCAL oREG
oREG = CREATEOBJECT("REGISTRY")
WITH oREG
.SetRegKey("PDFFILENAME", ;
pcFILENAME, ;
"Software\Adobe\Acrobat PDFWriter", ;
BITSET(0,31)+1, ; &&HKEY_CURRENT_USER
.T.)
.SetRegKey("bDocInfo", ;
"0", ;
"Software\Adobe\Acrobat PDFWriter", ;
BITSET(0,31)+1, ; &&HKEY_CURRENT_USER
.T.)
*Ne pas afficher le PDF, sinon "1"
.SetRegKey("bExecViewer", ;
"0", ;
"Software\Adobe\Acrobat PDFWriter", ;
BITSET(0,31)+1, ; &&HKEY_CURRENT_USER
.T.)
*!*.SetRegKey("StartDocTitle", ;
*!*pcTITRE, ;
*!*"Software\Adobe\Acrobat PDFWriter", ;
*!*BITSET(0,31)+1, ; &&HKEY_CURRENT_USER
*!*.T.)
*!*.SetRegKey("szTITLE", ;
*!*pcTITRE, ;
*!*"Software\Adobe\Acrobat PDFWriter", ;
*!*BITSET(0,31)+1, ; &&HKEY_CURRENT_USER
*!*.T.)
ENDWITH
ENDIF
ENDFUNC
Le travail est un moyen, pas une fin.
Louis Hudon
Hydro-Québec
Informatique en Équipement