With DBRecordset .ActiveConnection = DBConnection .CursorLocation = ADODB.CursorLocationEnum.adUseClient .LockType = ADODB.LockTypeEnum.adLockOptimistic .Open("SELECT @@IDENTITY") oder .Open("SELECT MAX(ID_Field) FROM Table") If .RecordCount = 1 Then Dim iZahl As Interger = .Fields(0).Value End If End With
Kategorien
-
Neueste Beiträge
- [SAP] MM-Berechtigungsobjekte
- [SAP] Steuerkennzeichen
- [ABAP] Prüfen, ob GUI UTF-8 unterstützt
- [ABAP] Fiori: Technische Kataloge lesen
- [ABAP] Fiori: Details zu techn. Katalogen lesen
- [ABAP] RFC-Verbindung prüfen
- [SAP] ABAP Cloud Developer Trial 2022 SP01 unter Windows installieren
- [ABAP] GTT: Globale Temporäre Tabellen zum Zwischenspeichern von Daten
- [SAP] ABAP Unit Testing – Writing Testable Code for ABAP
- [ABAP] ABAP2XLSX: Inhalt einer Worksheet in eine interne Tabelle schreiben