Newsgroup: it.comp.appl.access
Titolo: Proplema attesa generazione FILE PDF

Buongiorno a tutti!
Con Access 97 e sistema operativo VISTA Business ho questo problema :
A fine mese dopo la generazione di un fatturazione
riepilogativa con stampa in definitivo in PFD (Acrobat PDFWriter)
queste fatture e devo poi inviarle in posta elettronica tramite l'oggetto
MAPI32.
Tutto qui con XP sp2/3 tutto bene. Con S.O. Vista  e ACCESS 97
devo installare pdfFactory Pro (che funziona anche bene) per
fare lo stesso processo che ho descritto prima.
Ho però questo problema:
nel riepilogo di un cliente che ha circa 30/40 ft., genera
un file riepilogatico in un unico file di PFD di circa 240 kb,
l'oggetto MAPI non riesce a spedirlo al client di POSTA perchè secondo
le prove di debug che ho fatto non ha ancora finito
la generazione del file o c'è ancora della coda nello spool della stampante.
questo è l'evento:
cliente 1 2,3,
ciclo:
    NomeFilePdf = CLIFOR & "-" & CodCli & "-" & TTdoc & "-" & Format(Ndocum,
"00000") & "-" & AggiungiDataFile & "-" & DisAzienda & ".Pdf"
    strFileName = PathCorrente & "SPOOL\" & NomeFilePdf
    DoCmd.Hourglass True
    SetPdfFileName (strFileName)
   (qui c'è una funzione che regista le key di pdfFactory )
    DefaultPrinter = GetDefaultPrinter()
Stampa report :
Dim Criterio As String
Dim stDocName As String
stDocName = "StampafatturePdf"
StapPdf = True
Criterio = "[CODICECLIENTE]= '" & CodCli & "'" & " AND " & "[tipoDOcumento]=
'" & TTdoc & "'"
SetKeyValue "Software\Microsoft\Windows NT\CurrentVersion\Windows",
"Device", "pdfFactory Pro,winspool,FPP3:", REG_SZ
DoCmd.OpenReport stDocName, acNormal, , Criterio
For J = 0 To 7000
DoEvents
Next J
SetKeyValue "Software\Microsoft\Windows NT\CurrentVersion\Windows",
"Device", DefaultPrinter, REG_SZ
E adesso con una funzione invio all'oggetto MAPI:
FinePdf = LogOnPdfR(EEmail, NomeFilePdf, DesDoc, Ndocum, Ndocumf, Ditata,
RRsociale)
 Il for j = 0 to 7000
non sufficiente: gli ho messo anche uno  sleep di 7000 e non funziona.
(IL REPORT APPENDA SUPERA 3 PAGINE NON FUNZIA...)
Come faccio a capire quando la stampante ha finito di generare il file ??
C'è un evento ??
Grazie a tutti coloro che mi aiuteranno!
Ciao, Davide

 stampante.
Non conosco PdfFactory Pro, ma può darsi esistano delle impostazioni nel 
relativo Driver che aiutano a risolvere: hai provato?
La documentazione acclusa al prodotto non dice nulla (di solito ci sono 
degli esempi)?
Pensavo un'altra cosa: se sostituisci il ciclo "perditempo" con un Msgbox 
"quello che vuoi", cambia qualcosa?
Ciao: Oscar 

 ha scritto nel messaggio 
news:4937d029$0$40315$4faf...@reader5.news.tin.it...


 Ciao, Davide
Non hai risposto alla domanda però: un MsgBox() risolve il problema?
Oppure un ciclo While che insiste finchè il file (rilevabile con DIR()) non 
sia stato creato?
Ciao: Oscar

 ha scritto nel messaggio 
news:493a38bf$0$18149$4faf...@reader3.news.tin.it...


 Ciao,  Davide
Davide, non è questione "d'amare o meno" una soluzione: qui non siamo in 
politica e i problemi vanno risolti   ;-)
Nel tuo caso (un solo file riepilogativo generato) il MsgBox è accettabile.
Probabilmente più che un ciclo "perditempo" di parecchi secondi.
Scrivo "parecchi" perchè con computers più veloci, se ho ben capito, 
potrebbe essere necessario aumentarlo.
A meno di poter impostare un loop che insista fino alla generazione del 
file: ovvero la seconda domanda che t'ho fatto.
Ciao: Oscar