GERAR ARQUIVOS EM PDF ATRAVES DO VB6

CLSCARLOS 26/08/2011 15:41:04
#382578

Pessoal, preciso de uma ajuda urgente de vcs... uso VB6.

Estou precisando gerar um arquivo em PDF, atraves do vb6... alguem tem sugestoes ?
Já tentei pelo PDFPrinter (um cls que baixei pela net mesmo), até consegui desse jeito:

Dim PDFPrinter As New PDFPrinter
PDFPrinter.PDFTitle = [Ô]DANFE[Ô]
PDFPrinter.PDFFileName = App.Path & [Ô]\Danfe.pdf[Ô]
PDFPrinter.PDFLoadAfm = App.Path & [Ô]\Fonts[Ô]
PDFPrinter.PDFConfirm = False
PDFPrinter.PDFView = True
PDFPrinter.PDFSetViewerPreferences = VIEW_HIDEMENUBAR & VIEW_HIDETOOLBAR
PDFPrinter.PDFFormatPage = FORMAT_A4
PDFPrinter.PDFOrientation = ORIENT_PORTRAIT
PDFPrinter.PDFSetUnit = UNIT_PT
PDFPrinter.PDFSetZoomMode = ZOOM_FULLWIDTH
PDFPrinter.PDFSetLayoutMode = LAYOUT_DEFAULT
PDFPrinter.PDFUseOutlines = True
PDFPrinter.PDFUseThumbs = False
PDFPrinter.PDFBeginDoc
[...]
PDFPrinter.PDFEndDoc

mas ele demora MUITO pra carregar, e meus usuarios vao ter que imprimir mais de 10 DANFE[ô]s (em PDF).

Ouço qualquer sugestão...
Desde já agradeço.