Solved

Runtime Error 2585 (this action can't be carried out while processing a form or report event)

Posted on 2008-06-16
1
1,618 Views
Last Modified: 2013-12-05
I have a command button (cmdPurchaseOrderPrint) on my form (Orders) that opens a print dialog box for a report.  When I click 'ok' to print the form I see Error # 2585, This action can't be carried out while processing a form or report event.  Debugging reveals the offending statement is RunCommand acCmdPrint.    

Here's the code behind the click event of the command button:
DoCmd.OpenReport "PurchaseOrder", acViewPreview

And here's the code behind the on open event of the report:

Private Sub Report_Open(Cancel As Integer)

On Error GoTo Error_Handling:

Dim cn As ADODB.Connection
Set cn = CurrentProject.Connection

Dim rstOrders As New ADODB.Recordset
Dim strSQL As String

If CurrentProject.AllForms("Orders").IsLoaded = False Then
    Dim OrderNum As String

Get_Input:
    OrderNum = InputBox("Enter Order #")
    If OrderNum <> "" Then
        strSQL = "SELECT Order_Num FROM tblOrders WHERE Order_Num = '" & OrderNum & "' "
        rstOrders.Open (strSQL), cn, adOpenForwardOnly, adLockReadOnly
        If rstOrders.EOF = True Then
            MsgBox "Order #" & OrderNum & " Not Found!", vbCritical
            rstOrders.Close
            GoTo Get_Input
        Else
            strSQL = "SELECT * FROM tblOrders WHERE Order_Num = '" & OrderNum & "' "
            Me.RecordSource = strSQL
        End If
    Else
        End
        DoCmd.Close
    End If

Else
    strSQL = "SELECT * FROM tblOrders WHERE Order_Num = " & Forms!Orders!Order_Num
    Me.RecordSource = strSQL
    RunCommand acCmdPrint    
End If

Exit Sub

Error_Handling:
If Err.Number = 2501 Then  'user canceled print dialog box
    End  
Else
    MsgBox Err.Number
    MsgBox Err.Description
End If

End Sub

Any idea what I'm doing wrong?

Thanks in advance.

0
Comment
Question by:hennessym
1 Comment
 
LVL 1

Accepted Solution

by:
hennessym earned 0 total points
ID: 21795351
Solved it - the key was to put RunCommand acCmdPrint in the OnActivate event.
0

Featured Post

Gigs: Get Your Project Delivered by an Expert

Select from freelancers specializing in everything from database administration to programming, who have proven themselves as experts in their field. Hire the best, collaborate easily, pay securely and get projects done right.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Introduction When developing Access applications, often we need to know whether an object exists.  This article presents a quick and reliable routine to determine if an object exists without that object being opened. If you wanted to inspect/ite…
A simple tool to export all objects of two Access files as text and compare it with Meld, a free diff tool.
Familiarize people with the process of utilizing SQL Server views from within Microsoft Access. Microsoft Access is a very powerful client/server development tool. One of the SQL Server objects that you can interact with from within Microsoft Access…
Show developers how to use a criteria form to limit the data that appears on an Access report. It is a common requirement that users can specify the criteria for a report at runtime. The easiest way to accomplish this is using a criteria form that a…

776 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question