opstarten database

[gdg59535]

kan ik vanuit een formulier in access 2010 een andere database opstarten met een knop ?

 

[Djoane]

Ja volgens mij wel.. zal zo ff kijken op mijn computer... (Nu via telefoon online)

 

[gdg59535]

dank,

 

[Djoane]

Heb even gekeken, op mijn computer staat helemaal geen access meer..

Maar als ik zo op google kijk, lijkt het me wel mogelijk... Maar hoe precies weet ik ook niet..

http://www.pfz.nl/forum/topic/2141-externe-acces-database-aanroepen-met-odbc/

Is dat wat?

 

[OctaFish]

Geen probleem; omdat ik met een omweg Access start een voorbeeldje met Word, dat je simpel kunt aanpassen naar Access.

Private Sub cmdWord_Click()
On Error GoTo Err_cmdWord_Click
Dim oApp As Object

    Set oApp = CreateObject("Word.Application")
    oApp.Visible = True
    Exit Sub

Err_cmdWord_Click:
    MsgBox Err.Description
    
End Sub

 

[gdg59535]

hoe kan ik dan de naam van de bepaalde database ingeven ? vb database 2011

 

[OctaFish]

Om alvast vooruit te lopen op de volgende vraag een voorbeeldje dat ook een formulier opent

Sub AccessOpenen_Click()
Dim oApp As Object
Dim sPath As String

    'Pad naar database
    sPath = "C:\Test\Testje.mdb"
    'Openen van Access en zichtbaar maken op scherm
    Set oApp = CreateObject("Access.Application")
    oApp.Visible = True
    'Database openen m.b.v. variabele sPath
    oApp.OpenCurrentDatabase sPath
    'Formulier fCategorie openen
    oApp.DoCmd.OpenForm "fCategorie"

End Sub

 

[gdg59535]

hallo werkt ! (alleen LPath vervangen door sPath in de derde laatste lijn )

 

[OctaFish]

Heb de code aangepast!