Essere in grado di controllare lo status di un driver ODBC tramite una connessione DSN utilizzando Visual Basic, Applications Edition può risparmiare tempo per terminare il programma se la connessione ODBC non esiste. VBA è utilizzato nelle applicazioni di Microsoft Office per automatizzare le attività 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.

istruzione

1 Avviare Microsoft Office Excel. Fare clic sulla scheda "Sviluppatore" seguito da "Visual Basic". Fare clic sul menu "Inserisci" e poi "modulo" per inserire un nuovo modulo.

2 Creare una nuova routine Sub:

Private Sub checkODBC ()

3 Creare le variabili oggetto che si utilizzeranno per controllare il driver ODBC:

Dim adoCNN As ADODB.Connection

Dim canConnect Come booleano

Set adoCNN = nuovo ADODB.Connection

4 Definire il nome ODBC, 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

Finisci se

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

If canConnect Then

MsgBox "connessione ODBC è pronto!"

Altro

MsgBox "connessione ODBC non è pronto!"

Finisci se

End Sub

7 Premere il tasto "F5" per eseguire la procedura.