Newsgroup: it.comp.appl.access
Titolo: apertura altro db dal menù creato con i modelli di access

Salve a tutti.
Ho un db che utilizza come menù la maschera pannello di controllo che
generano i modelli di MS Access basati sulla tabella Switchboard.
Nella maschera alla colonna Commdand ci si attribuisce un numero che
in base all'istruzione Visual Basic apre le maschere o i report ecc...
Allego parte dell'istruzione.
Private Function HandleButtonClick(intBtn As Integer)
' This function is called when a button is clicked.
' intBtn indicates which button was clicked.
    ' Constants for the commands that can be executed.
    Const conCmdGotoSwitchboard = 1
    Const conCmdOpenFormAdd = 2
    Const conCmdOpenFormBrowse = 3
    Const conCmdOpenReport = 4
    Const conCmdCustomizeSwitchboard = 5
    Const conCmdExitApplication = 6
    Const conCmdRunMacro = 7
    Const conCmdRunCode = 8
    Const conCmdOpenPage = 9
Avendo bisogno di chiudere il db aperto e aprirne un'altro riferito ad
un'altra ditta, scrivo nella tabella "switchboard" i nomi delle ditte
in modo da farle apparire nel pannello di controllo, ma alla colonna
Command della tabella Switchboard devo scrivere un numero che
nell'istruzione su riportata non è prevista. Ho provato a creare
"Const conCmdOpenApplication = 10 ma non so se è giusto e cmq non
saprei come scrivere il percorso/nomedb da aprire nella colonna
Argument. Scendendo nell'istruzione Visual Basic va bene se scrivo
Case conCmdOpenApplication
DoCmd.OpenApplication rs![Argument]?
Mi date una mano per favore?

 ha scritto nel messaggio 
news:7b552eaa-1488-4568...@v67g2000hse.googlegroups.com...
Salve a tutti.
Ho un db che utilizza come menů la maschera pannello di controllo che
generano i modelli di MS Access basati sulla tabella Switchboard.
Nella maschera alla colonna Commdand ci si attribuisce un numero che
in base all'istruzione Visual Basic apre le maschere o i report ecc...
Allego parte dell'istruzione.
Private Function HandleButtonClick(intBtn As Integer)
' This function is called when a button is clicked.
' intBtn indicates which button was clicked.
    ' Constants for the commands that can be executed.
    Const conCmdGotoSwitchboard = 1
    Const conCmdOpenFormAdd = 2
    Const conCmdOpenFormBrowse = 3
    Const conCmdOpenReport = 4
    Const conCmdCustomizeSwitchboard = 5
    Const conCmdExitApplication = 6
    Const conCmdRunMacro = 7
    Const conCmdRunCode = 8
    Const conCmdOpenPage = 9
Avendo bisogno di chiudere il db aperto e aprirne un'altro riferito ad
un'altra ditta, scrivo nella tabella "switchboard" i nomi delle ditte
in modo da farle apparire nel pannello di controllo, ma alla colonna
Command della tabella Switchboard devo scrivere un numero che
nell'istruzione su riportata non č prevista. Ho provato a creare
"Const conCmdOpenApplication = 10 ma non so se č giusto e cmq non
saprei come scrivere il percorso/nomedb da aprire nella colonna
Argument. Scendendo nell'istruzione Visual Basic va bene se scrivo
Case conCmdOpenApplication
DoCmd.OpenApplication rs![Argument]?
Mi date una mano per favore?
[risposta]
Se vuoi lasciare aperto l'mdb con il primo menů, puoi utilizzare la Shell o 
i suggerimenti sul sito comune (
www.sitocomune.com
) Sezione General - 6.183 
Aprire un qualsiasi file (di formato txt, pdf, tif ecc.) direttamente da un 
db access (2)
Ma sarebbe uno spreco di memoria e risorse del pc; invece potresti 
pianificare i passaggi tra i vari mdb ed impostare la chisura di uno che 
richiama l'altro mdb. Ma solo l'ultimo rimane aperto...
Ciao.
-- 
Sergio MAZZA