[AccessD] OT: Opening Access report from Visual Basic

sorry, and how do I open the form like that in a normal form view ?

AccObj.DoCmd.OpenForm "Project Box Sheet", acPreview






>  AccObj.DoCmd.Maximize
>
> Oleg_123 at xuppa.com wrote:
>
>>Thanks Marty, this seems to be working; actually I made it work
>> yesterday with a slightly different code. Now, is there a way to for a
>> report to open at full size ? I guess someithing "On Load" event of the
>> report ?
>>
>>
>>
>>
>>>try this; close just some lines in wrong spot
>>>
>>>Sub testreport()
>>>Dim AccObj As Object
>>>Dim db As Object
>>>Dim dbPath As String
>>>dbPath = "G:\SHARED\Productivity Reports\Oleg\db2.mdb"
>>>  Set AccObj = CreateObject("Access.Application")
>>>  Set db =
>>>AccObj.Application.DBEngine.Workspaces(0).OpenDatabase(dbPath)
>>>
>>>      AccObj.Visible = True
>>>      AccObj.OpenCurrentDatabase dbPath, False
>>>      AccObj.DoCmd.OpenReport "Project Box Sheet", acPreview
>>>      AccObj.Visible = True
>>>      ' quit the application too if necessary
>>>      'AccObj.quit
>>>   Set db = Nothing
>>>   Set AccObj = Nothing
>>>   '
>>>End Sub
>>>
>>>Oleg_123 at xuppa.com wrote:
>>>
>>>
>>>
>>>>Hi Group,
>>>>
>>>>I am trying to open an Access Report from Visual Basic form, doesn't
>>>> seem to be working. I think that i used something like this in the
>>>> past. (I checked Microst Access 9.0 Object library in references)
>>>>
>>>>Dim Acc As Object, db As Object
>>>>Dim dbPath As String
>>>> Set AccObj = CreateObject("Access.Application")
>>>> Set db =
>>>>AccObj.Application.DBEngine.Workspaces(0).OpenDatabase(dbPathName)
>>>>
>>>>dbPath = "G:\SHARED\Productivity Reports\Oleg\db2.mdb"
>>>>     AccObj.OpenCurrentDatabase dbPath, False
>>>>     Set db = Nothing
>>>>     AccObj.DoCmd.OpenReport "Project Box Sheet", acPreview
>>>>     AccObj.Visible = True
>>>>
>>>>
>>>>-----------------------------------------
>>>>Get Breaking News from CNN, ABC, NBC, CBS Now.
>>>>http://www.xuppa.com/news/?link=webmail
>>>>
>>>>
>>>>_______________________________________________
>>>>AccessD mailing list
>>>>AccessD at databaseadvisors.com
>>>>http://databaseadvisors.com/mailman/listinfo/accessd
>>>>Website: http://www.databaseadvisors.com
>>>>
>>>>
>>>>
>>>>
>>>>
>>>_______________________________________________
>>>AccessD mailing list
>>>AccessD at databaseadvisors.com
>>>http://databaseadvisors.com/mailman/listinfo/accessd
>>>Website: http://www.databaseadvisors.com
>>>
>>>
>>
>>
>>
>>-----------------------------------------
>>Get Breaking News from CNN, ABC, NBC, CBS Now.
>>http://www.xuppa.com/news/?link=webmail
>>
>>
>>_______________________________________________
>>AccessD mailing list
>>AccessD at databaseadvisors.com
>>http://databaseadvisors.com/mailman/listinfo/accessd
>>Website: http://www.databaseadvisors.com
>>
>>
>>
>
>
> _______________________________________________
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com



-----------------------------------------
Get Breaking News from CNN, ABC, NBC, CBS Now.
http://www.xuppa.com/news/?link=webmail