Calling an Access report from VB 6 - MAXIMIZED!!

01-06-2003, 01:43 PM

Aminal

Freshman

Join Date: Dec 2002

Location: Minnesota

Posts: 36

Calling an Access report from VB 6 - MAXIMIZED!!

When I call an access report with the following code, it works GREAT, but I have to maximize the report window. IS there a way to have this done automatically?

Code:

Private Sub cmdPayView_Click()
    Dim Acc As Access.Application
    Set Acc = New Access.Application
    Acc.OpenCurrentDatabase strDataPath
    Acc.DoCmd.OpenReport "Employee Job Pay", acPreview
    Acc.Visible = True
    Set Acc = Nothing
End Sub

01-06-2003, 07:17 PM

couch612

Senior Contributor

Join Date: Sep 2002

Location: Brisbane, Australia

Posts: 1,209

Hi,

You could put a Maximize command in your code:

Private Sub cmdPayView_Click()
Dim Acc As Access.Application
Set Acc = New Access.Application
Acc.OpenCurrentDatabase strDataPath
Acc.DoCmd.OpenReport "Employee Job Pay", acPreview
Acc.Visible = True
Acc.DoCmd.Maximize
Set Acc = Nothing
End Sub

or put a DoCmd.Maximize in the Open event of the report.

__________________
Cheers,
Peter W.

Posting Rules

You may not post new threads

You may not post replies

You may not post attachments

You may not edit your posts

BB code is On

Smilies are On

[IMG] code is Off

HTML code is Off

Forum Rules