Home » Tip Bank » Windows And Windows Apis

Language: VB4/32,VB5,VB6
Expertise: Intermediate

Jan 8, 2000

The ODBCTOOL.DLL library contains three functions that make it easier to manage DSNs. To run the following code you must add a reference to the "ODBC Driver & Data Source Name Functions" library to your References dialog box. If you don't find this library listed in the References list, use the Start-Find dialog to locate it (it should be in the \Microsoft Visual Studio\Common\Tools\APE directory).

To get the list of installed ODBC drivers you can use the following code:

' Fill a listbox control with the list of all available DSNs
Dim odbcTool As New ODBCTool.Dsn
Dim Dsn() As String, i As Long
If odbcTool.GetOdbcDriverList(Dsn()) Then
    ' a True return value means success
    lstOdbcDrivers.Clear
    For i = 0 To UBound(dsn)
        lstOdbcDrivers.AddItem dsn(i)
    Next
Else
    ' a False value means error
    MsgBox "Unable to read ODBC driver list", vbExclamation
End If