[VBA/ACCESS] Disconnessione da database Oracle

[silver81]

in una maschera di access ho creato un pulsante che connette access al database di oracle in questo modo:

Dim ws As Workspace
Dim condb As Database
Dim LConnect As String

LConnect = "ODBC;DSN=nome origine dati;UID=username;PWD=password;"
Set ws = DBEngine.Workspaces(0)
Set condb = ws.OpenDatabase("", dbDriverPrompt, False, LConnect)
condb.Close

adesso voglio creare un pulsante che disconnetta il access da oracle ma non so come fare, penso che si debba usare closeconnection ma non so come si usa potreste aiutarmi?

Grazie

[oregon]

Basta questa riga

condb.Close

che hai gia' scritto ...

[silver81]

Oregon con conndb.close non chiudo la connessione infatti le tabelle sono ancora accessibili dopo il comando quindi penso ci voglia una funzione specifica affinche quando io tenti di accedere alle tabelle dopo la chiusura della connessione mi esca la finestra di accesso odbc.

Grazie lo stesso.

[oregon]

Come fa ad essere ancora accessibile il DB se hai chiuso l'oggetto condb ?

Come ti accorgi che sono accessibili le tabelle (ovviamente dal codice ...)

Puoi anche eliminare l'oggetto ws con

Set ws = Nothing

[silver81]

Mi accorgo che sono ancora collegato perchè quando provo ad aprire una tabella in access mi fa vedere subito il contentuto mentre dovrebbe aprirsi la finestra odbc chiedendomi la password

[oregon]

Guarda che una cosa e' operare da Access (dalla sua interfaccia) e un'altra e' operare dal codice ... Access mantiene una connessione che chiude quando si chiude Access stesso ...
Da codice, la connessione la chiudi con il metodo Close ...

[silver81]

Vorrei creare un pulsante per scollegarmi dal database oracle senza chiudere access ma non riesco a trovare un modo per farlo.

[silver81]

Si pero access continua ad essere collegato e pultroppo è un errore perchè devo dare la possibilità a diversi utenti con diversi privilegi l'accesso al database, quindi se prima si collega un utente con tutti i privilegi e poi dopo un utente senza privilegi quest'ultimo continua ad usare la connessione dell'utente precedente.

[silver81]

HO trovato un modo per disconnettere da access la connessione al driver odbc di oracle con la seguente stringa inserita in un pulsate che ho creato con evento su clic:

CurrentProject.AccessConnection.Close

ma pultroppo ha funzionato solo la prima volta poi in seguito la disconnessione non è avvenuta più e non so spiegarmi il prechè, potreste aiutarmi?