| Forum: ADO.NET |
Thema:
Anzeige vom Datagrid aktualisieren |
Von:
Ralf Ziola (
16.06.2005 09:58) |
Hallo Leute,
mein Programm liest alle Tabellen unserer DB aus und zeigt sie in einer Listbox an.
Klicke ich auf eine Tabelle, werden in einer CheckedListBox die Spalten angezeigt. Klicke ich auf ein paar Spaltenüberschriften, erscheinen diese nach Knopfdruck in einem Datagrid. Wenn ich jetzt eine neue Tabelle mit neuen Spalten auswähle, werden die mir im Datagrid zwar angezeigt, doch die spalten, die ich mir kurz vorher anzeigen lassen habe, erscheinen auch (mit Fragezeichen).
Was mache ich falsch ?
Mein Code:
Private Sub btnDaten_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDaten.Click
Cursor = Cursors.WaitCursor
Anzahl = clbSpalten.CheckedItems.Count
Dim Zeile As String
x = 0
For x = 0 To Anzahl - 1
Zeile = Zeile & clbSpalten.CheckedItems(x)
If x <> Anzahl - 1 Then Zeile = Zeile & ", "
Next
Dim strSQL As String = "SELECT " & Zeile & " FROM " & lbTabellen.SelectedItem
db_abfrage(strSQL)
Cursor = Cursors.Arrow
End Sub
Public Function db_abfrage(ByVal sql As String)
Dim daInhalt As New OleDbDataAdapter(sql, Con)
Con.Open()
daInhalt.Fill(ds)
Con.Close()
dgInhalt.DataSource = Nothing
dgInhalt.DataSource = ds.Tables(0)
End Function
gruss
ralf
Gruss
Ralf
Antworten
Vorsicht bei der Eingabe: Die Zeichen ' oder -- sind nicht erlaubt!
