Run-time error "2585" while trying to export to PDF

[miicker]

Hello everyone,



I have a strange problem. I'm trying to run the following code:

If rpNameNu <> rpName Then    Me!KnopPrint.Visible = False
    Me!KnopPDF.Visible = False
    Me!KnopSent.Visible = False
    DoCmd.OutputTo acOutputReport, rpNameNu, acFormatPDF, , no, , , acExportQualityPrint
End If

This needs to run a second after the report is open. But when I insert the code into On Load property, or the On Open property it won't work
Simply because the report is not jet open..

When I put the code in the On Current property, and open the report, and click somewhere random, the code does work!

Does someone know how I can let it run smooth?

I also tryed these functions to delay the export to pdf functionality:

Option Compare Database

Public Function Pause(NumberOfSeconds As Variant)
    On Error GoTo Error_GoTo


    Dim PauseTime As Variant
    Dim Start As Variant
    Dim Elapsed As Variant


    PauseTime = NumberOfSeconds
    Start = Timer
    Elapsed = 0
    Do While Timer < Start + PauseTime
        Elapsed = Elapsed + 1
        If Timer = 0 Then
            ' Crossing midnight
            PauseTime = PauseTime - Elapsed
            Start = 0
            Elapsed = 0
        End If
        DoEvents
    Loop


Exit_GoTo:
    On Error GoTo 0
    Exit Function
Error_GoTo:
    Debug.Print Err.Number, Err.Description, Erl
    GoTo Exit_GoTo
End Function

and:

Option Compare Database
Option Explicit
Private Declare Sub sapiSleep Lib "kernel32" _
        Alias "Sleep" _
        (ByVal dwMilliseconds As Long)
Sub sSleep(lngMilliSec As Long)
    If lngMilliSec > 0 Then
        Call sapiSleep(lngMilliSec)
    End If
End Sub

Both without succes.

Thanks in advance.

[pbaldy]

I would try doing the output from outside the report. If you think about it, while opening the report you try to output the report, which opens the report, which tries to output the report, which opens...

[Micron]

Yes, in whatever module is used to open the report, open it invisible. Next line should set the visibility of whatever KnopPrint is then make the report visible if it needs to be. Don't get the whole gist of the process though, because as far as I recall, you don't have to open a report to export it.

[pbaldy]

Actually I was thinking you could leave the visibility stuff in the report, just move the output. You don't have to open it to export it, unless you want to open it with a wherecondition and export the filtered result.

[miicker]

The data in the report is variabel, so that's why it needs to be opened first

[pbaldy]

Only if it's opened with a wherecondition rather than having criteria in the underlying query. If so, I'd still do it from outside, basically

Open report hidden
output to pdf
close report

Or use this instead of a wherecondition:

Emailing a different report to each recipient

so the filtering is done from within.

[miicker]

How can you open the report hidden and than export it to PDF?

[pbaldy]

Look at the arguments available for OpenReport; one lets you open it hidden.

[Micron]

The data in the report is variabel, so that's why it needs to be opened first

don't know what this means. All reports are "variable" and depend on the query results. Even if filtered, I'm fairly certain you don't have to open it to export it.