Open Access From VB

[vicky666]

I want to open an access database from within visual basic, the code below seems to open access and then shuts it again, any ideas?Could something be running in the background that is conflicting with the code?
This is driving me mad


Dim appAccess As Access.Application
Dim strDB As String

strDB = "C:\Documents And Settings\Administrator\Desktop\UMS\AdReal.mdb"
Set appAccess = GetObject(strDB)

appAccess.Visible = True

 

[Nikita6003]

Hi Vicky - 'sme again

Just in case you miss the other post: change your code to

Dim appAccess As Access.Application
Dim strDB As String

strDB = "C:\Documents And Settings\Administrator\Desktop\UMS\AdReal.mdb"
Set appAccess = GetObject(strDB)

appAccess.Visible = True
appAccess.UserControl = True

Cheers
Nikki

 

[vicky666]

Thanks for the help it worked