If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Display Modes |
#1
|
|||
|
|||
Open Access, then database?
Access 2000
I have been able to open Word and Excell using this type of code, but trying it with access will open the app, but not the data. With Word it is: ' Open the document. ..Documents.open(path ...) But I don't know what replaces "documents" in trying to do it with access. Option Compare Database Private Sub Command0_Click() ' start Microsoft Access. Set accessapp = CreateObject("access.application") With accessapp ' Make the application visible. .Visible = True ' Open the document. .?????????.Open ("j:\etc...\MERGForms.mdb") End With End Sub Anyone know? Thanks! James |
#2
|
|||
|
|||
Open Access, then database?
Try
With accessapp ' Make the application visible. .Visible = True ' Open the document. .OpenCurrentDatabase("j:\etc...\MERGForms.mdb") End With Hope This Helps Gerald Stanley MCSD -----Original Message----- Access 2000 I have been able to open Word and Excell using this type of code, but trying it with access will open the app, but not the data. With Word it is: ' Open the document. ..Documents.open(path ...) But I don't know what replaces "documents" in trying to do it with access. Option Compare Database Private Sub Command0_Click() ' start Microsoft Access. Set accessapp = CreateObject("access.application") With accessapp ' Make the application visible. .Visible = True ' Open the document. .?????????.Open ("j:\etc...\MERGForms.mdb") End With End Sub Anyone know? Thanks! James . |
#3
|
|||
|
|||
Open Access, then database?
Gerald,
Thanks! That did it. Now I have three, Word, Excel and Access. James -----Original Message----- Try With accessapp ' Make the application visible. .Visible = True ' Open the document. .OpenCurrentDatabase("j:\etc...\MERGForms.mdb") End With Hope This Helps Gerald Stanley MCSD -----Original Message----- Access 2000 I have been able to open Word and Excell using this type of code, but trying it with access will open the app, but not the data. With Word it is: ' Open the document. ..Documents.open(path ...) But I don't know what replaces "documents" in trying to do it with access. Option Compare Database Private Sub Command0_Click() ' start Microsoft Access. Set accessapp = CreateObject("access.application") With accessapp ' Make the application visible. .Visible = True ' Open the document. .?????????.Open ("j:\etc...\MERGForms.mdb") End With End Sub Anyone know? Thanks! James . . |
Thread Tools | |
Display Modes | |
|
|