Hej,

I VB har man ju tillgång till objekt för att visa drives, dir, och files.
Finns det något motsvarande för att visa ODBC-källor..DSN-er ??


Mvh
Martin

Japp,
Starta ett nytt projekt och lägg till referensen "ODBC Driver & Data Source Name Functions".
Dubbelklicka på formuläret och skriv in följande:

Dim myodbc As New ODBCTool.Dsn
Dim sDrivers() As String
Dim sSources() As String
Dim i As Integer
With myodbc
.GetOdbcDriverList sDrivers
.GetDataSourceList sSources
End With
Debug.Print "--------------------------------------"
Debug.Print "ODBC Drivers"
Debug.Print "--------------------------------------"

For i = LBound(sDrivers) To UBound(sDrivers)
Debug.Print sDrivers(i)
Next i
Debug.Print "--------------------------------------"
Debug.Print "ODBC Sources"
Debug.Print "--------------------------------------"
For i = LBound(sSources) To UBound(sSources)
Debug.Print sSources(i)
Next i

TACK !!!
Precis vad jag var ute efter....



/Martin