martenk
Goto Top

Ausgabe Variable

Hallo,

habe diese Abfrage,

wie kann ich den Wert in eine Variable übergeben -

strSQL = "SELECT  gt_nummer from tbl_gutschriftnr WHERE (gt_nummer = (SELECT Max(gt_nummer) FROM tbl_gutschriftnr))"  

Content-ID: 1247053844

Url: https://administrator.de/contentid/1247053844

Ausgedruckt am: 22.11.2024 um 06:11 Uhr

SlainteMhath
Lösung SlainteMhath 10.09.2021 um 12:25:26 Uhr
Goto Top
Moin,

https://docs.microsoft.com/en-us/office/client-developer/access/desktop- ...

Am Ende der Seite ist ein Codebeispiel

lg,
Slainte
martenk
martenk 10.09.2021 aktualisiert um 13:24:30 Uhr
Goto Top
irgendwie ist in der abfrage schon ein Fehler

Set dbs = CurrentDb
strSQL = "SELECT gt_nummer from tbl_gutschriftnr WHERE (gt_nummer = (SELECT Max(gt_nummer) FROM tbl_gutschriftnr))"


Set rs = CurrentDb.OpenRecordset(strSQL, dbOpenSnapshot)
Do Until rs.BOF
Gas = rs!gt_nummer


Loop

Felder mit Memo oder OLE Objekten dürfen nicht im Aggregatargument enthalten sein
SlainteMhath
SlainteMhath 10.09.2021 aktualisiert um 13:36:28 Uhr
Goto Top
Verwende doch mal bitte Code Tags, das machts etwas einfacher.

Dein Query ist so auch nicht korrekt. Wahrscheinlich meinst du
SELECT max(gt_nummer) from tbl_gutschriftnr
? Also den größten Wert von gt_nummer der in der Tabelle gefunden wird - ich hoffe die Spalte ist indiziert face-smile
Vor dem "Do Until..." würde ich noch ein rs.MoveFirst packen, dann steht der Cursor auch defitiniv am Anfang des Recordsets. Wenn dann eh nur ein Record vorhanden ist, kannst du dir das "Do until.." ohnehin sparen.

Also etwa so:

Set dbs = CurrentDb
strSQL = "SELECT max(gt_nummer) from tbl_gutschriftnr"  
Set rs = dbs.OpenRecordset(strSQL, dbOpenSnapshot, dbReadOnly)
if not(rs.BOF and rs.EOF) then
  rs.MoveFirst
  Gas = rs!gt_nummer
end if
martenk
martenk 10.09.2021 um 13:36:20 Uhr
Goto Top
bekomme die gleiche Meldung
SlainteMhath
SlainteMhath 10.09.2021 um 13:37:14 Uhr
Goto Top
Was für einen Typ hat "gt_nummer" Optimalerweise wäre das ein Int
martenk
martenk 10.09.2021 aktualisiert um 13:43:45 Uhr
Goto Top
Zahl in Access nun - hatte ich vorher nicht

nun bekomme ich bei der Variablenübergabe
Gas = rs!gt_nummer

Element in dieser Auflistung nicht gefunden

es gibt aber
- tbl_gutschriftnr
und darin auch in der ersten zeile
gt_nummer
martenk
martenk 10.09.2021 um 14:06:58 Uhr
Goto Top
klappt nun - lieben DAnk