elie chucrallah wrote:
[color=blue]
>
> Dear Sirs,
>
> I am using access 97 database and connecting to it via VB6 using
> Microsoft DAO 3.6. I had office 2002 after opening a report using the
> follwing method then after pressing escape on the report the access
> database used to close by itself.
>
> now that i installed office 2003 the database is still open after
> pressing escape.
>
> Dim AccessApp As Access.Application
> Set AccessApp = New Access.Application
> With AccessApp
> .OpenCurrentDatabase gsDatabase
> .Visible = True
> .RunCommand acCmdAppMaximize
> .DoCmd.OpenReport "Activities", acViewPreview, , ""
> .RunCommand acCmdAppMaximize
> End With
>
> i don't mind writing in the access datatabse, i already wrote
>
> Private Sub Report_Open(Cancel As Integer)
> DoCmd.Maximize
> End Sub
>
> CloseCurrentDatabase closed the database but i need to close access too
>
> i wonder if there is an option in access i could do to keep my version
> unchanged[/color]
Use AccessApp.DoCmd.Quit to close Access.
--
MGFoster:::mgf00 <at> earthlink <decimal-point> net
Oakland, CA (USA)
