Dim DB_OleDBCommand As New System.Data.OleDb.OleDbCommand Dim DB_OleDBDataAdapter As New System.Data.OleDb.OleDbDataAdapter Dim dsFuel As New DataSet DB_OleDBCommand.Connection = frmMain.DB_OleDBConnection dsFuel.Clear() DB_OleDBCommand.CommandText = "SELECT ID, Name FROM Users ORDER BY Name" DB_OleDBDataAdapter.SelectCommand = DB_OleDBCommand DB_OleDBDataAdapter.Fill(dsFuel) With cbFuel .Items.Clear() .DataSource = dsFuel.Tables(0) .DisplayMember = "Name" .ValueMember = "ID" End With ' Key/Value Paare auslesen/setzen Dim Key As String = cbFuel.SelectedValue.ToString() ' auslesen cbFuel.SelectedValue = 10 ' setzen
Kategorien
-
Neueste Beiträge
- [CDS-Views] Fehler “Referenzinformationen fehlen oder falscher Datentyp” beheben
- [CDS-Views] Dynamische Befüllung von Variablen / Labels
- [ABAP] Daten einer Internetseite als interne Tabelle bereitstellen
- [ABAP] Transliteration von Texten
- [ABAP] UTC-Zeitstempel nach POSIX-Standard
- [RAP] ODATA V4 Service und Fiori Elements App implementieren
- [ABAP] Übernahme von Dokumenteninfosätzen beim Anlegen von Einkaufsbelegen unterdrücken
- [ABAP] OpenSQL: Stringfunktionen
- [ABAP] OpenSQL: NULL-Indicator zum Anzeigen von leeren Rückgabemengen
- [ABAP] OpenSQL: Set-Indicator für das Aktualisieren von Spalten