7
Ausgabe Variable
Hallo,
habe diese Abfrage,
wie kann ich den Wert in eine Variable übergeben -
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))" 
Share on Facebook
Share on Twitter
Share on Reddit
Share on LinkedinPlease also mark the comments that contributed to the solution of the article
Content-Key: 1247053844
Url: https://administrator.de/contentid/1247053844
Printed on: May 9, 2024 at 07:05 o'clock
7 Comments
Latest comment
Moin,
https://docs.microsoft.com/en-us/office/client-developer/access/desktop- ...
Am Ende der Seite ist ein Codebeispiel
lg,
Slainte
https://docs.microsoft.com/en-us/office/client-developer/access/desktop- ...
Am Ende der Seite ist ein Codebeispiel
lg,
Slainte
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
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
Verwende doch mal bitte Code Tags, das machts etwas einfacher.
Dein Query ist so auch nicht korrekt. Wahrscheinlich meinst du
? Also den größten Wert von gt_nummer der in der Tabelle gefunden wird - ich hoffe die Spalte ist indiziert 
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:
Dein Query ist so auch nicht korrekt. Wahrscheinlich meinst du
SELECT max(gt_nummer) from tbl_gutschriftnrVor 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
bekomme die gleiche Meldung
Was für einen Typ hat "gt_nummer" Optimalerweise wäre das ein Int
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
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
klappt nun - lieben DAnk
