Essere in grado di verificare lo stato di un driver ODBC tramite una connessione DSN utilizzando Visual Basic per applicazioni possono salvare che il tempo di terminare il programma se non esiste la connessione ODBC. VBA è utilizzato nelle applicazioni di Microsoft Office per automatizzare operazioni di routine altrimenti fatto manualmente. In Excel, è possibile utilizzare VBA per automatizzare il processo di importazione dei dati da un database di Access utilizzando una connessione ODBC.

Istruzioni

1

Avviare Microsoft Office Excel. Fare clic sulla scheda "Sviluppatore" seguita da "Visual Basic". Scegliere il menu "Inserisci" e poi "Modulo" per inserire un nuovo modulo.

2

Creare una nuova routine sub:

Private Sub checkODBC()

3

Creare le variabili di oggetto che verrà utilizzato per controllare il driver ODBC:

Dim adoCNN As ADODB.Connection

Dim canConnect As Boolean

Set adoCNN = New ADODB.Connection4

Definire il nome ODBC, il nome di login e la password:

adoCNN.Open "DSN Name", "username", "password"5

Controllare lo stato del driver ODBC:

If adoCNN.State = adStateOpen Then

canConnect = True

adoCNN.Close

End If6

Visualizzare una finestra di messaggio che informa l'utente dello stato della connessione ODBC:

If canConnect Then

MsgBox "ODBC connection is ready!"

Else

MsgBox "ODBC connection is not ready!"

End If

End Sub

7

Premere "F5" per eseguire la procedura.