<div>
this is becaue the objACC goes out of scope, and hence closes the application (and the form).<br />
<br />
please define the variable objAcc on your form level, and it shall work.<br />
<br />
and you might then check if objAcc is already set , and reuse it if you are to open several forms of that same other database ...
</div>


this is becaue the objACC goes out of scope, and hence closes the application (and the form).

please define the variable objAcc on your form level, and it shall work.

and you might then check if objAcc is already set , and reuse it if you are to open several forms of that same other database ...

<div>
Thanks Capricorn<br />
Please look for my follow up question about having the form open up on top...<br />
Brooks
</div>


Thanks Capricorn
Please look for my follow up question about having the form open up on top...
Brooks

<div>
<div class="content wysiwyg-content">
I use this code to open a form in another database:<br />
<br />
Private Sub btnOpenPlatinumTraveler_Cl<wbr />ick()<br />
&nbsp; &nbsp; Dim objACC As New Access.Application<br />
&nbsp; &nbsp; <br />
&nbsp; &nbsp; Set objACC = GetObject(&quot;T:\Diode Travelers Application\Source\DiodePl<wbr />atinumDiff<wbr />usionTrave<wbr />lerApplica<wbr />tion.accdb<wbr />&quot;)<br />
&nbsp; &nbsp; objACC.DoCmd.OpenForm (&quot;Switchboard&quot;), acNormal<br />
' &nbsp; &nbsp;objACC.Quit<br />
' &nbsp; &nbsp;Set objACC = Nothing<br />
End Sub<br />
<br />
But it opens the form and closes it immediately. &nbsp;I can use a breakpoint at End Sub to see the form is open. &nbsp;And I can use it normally. &nbsp;<br />
<br />
What needs to be done to keep the form open?<br />
Thanks,<br />
Brooks
</div>
</div>


I use this code to open a form in another database:

Private Sub btnOpenPlatinumTraveler_Click()
    Dim objACC As New Access.Application
    
    Set objACC = GetObject("T:\Diode Travelers Application\Source\DiodePlatinumDiffusionTravelerApplication.accdb")
    objACC.DoCmd.OpenForm ("Switchboard"), acNormal
'    objACC.Quit
'    Set objACC = Nothing
End Sub

But it opens the form and closes it immediately.  I can use a breakpoint at End Sub to see the form is open.  And I can use it normally.  

What needs to be done to keep the form open?
Thanks,
Brooks

Open a form in another database problem

Microsoft Access is a rapid application development (RAD) relational database tool. Access can be used for both desktop and web-based applications, and uses VBA (Visual Basic for Applications) as its coding language.