Rubrik: Datenbanken · DataSet/DataTable | VB-Versionen: VB2005 - VB2015 | 23.11.15 |
Alle verfügbaren OLE DB-Provider ermitteln Mit diesem .NET Code ermitteln Sie schnell alle im lokalen Netzwerk verfügbaren OLE DB-Provider. | ||
Autor: Dieter Otter | Bewertung: | Views: 8.374 |
www.tools4vb.de | System: WinXP, Win7, Win8, Win10, Win11 | Beispielprojekt auf CD |
Nachfolgender Code zeigt, wie man schnell und einfach alle im lokalen Netzwerk verfügbaren OLE DB-Provider ermitteln kann.
Erstellen Sie ein neues Projekt und platzieren auf die Form ein ListBox-Steuerelement, sowie eine Schaltfläche (Button1).
Beim Klick auf den Button werden alle verfügbaren Provider in der ListBox angezeigt.
Private Sub Button1_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button1.Click Dim OleDbList As OleDb.OleDbEnumerator = New OleDb.OleDbEnumerator ' Liste aller verfügbaren OLE DB-Provider ermitteln Dim dt As DataTable = OleDbList.GetElements() ' alle Provider in einer ListBox anzeigen ListBox1.Items.Clear() For Each dr As DataRow In dt.Rows ListBox1.Items.Add(dr.Item("SOURCES_NAME")) Next End Sub
Tipp:
Da die GetElements-Methode eine DataTable zurückgibt, kann man die Provider-Informationen auch per Einzeiler bspw. in einem DataGridView-Control anzeigen.
' alle OLE DB-Provider im DataGridView anzeigen Dim OleDbList As OleDb.OleDbEnumerator = New OleDb.OleDbEnumerator DataGridView1.DataSource = OleDbList.GetElements()