4
Access Laufzeitfehler 3061 ein Parameter wurde erwartet, aber es wuder zuwenig Parameter übergeben.
Hallo Zusammen,
Ich möchte gerne Daten speichern, doch ich erhalte immer die oben genannte Fehlermeldung.
Unter F1 habe ich nichts hilfreiches gefunden und in den Foren ist auch nichts, was bei mir passt.
Weiß jemand Rat?
Hier die Zeile die beim Debuggen makiert ist:
Set rs = Application.CurrentDb.OpenRecordset("Select max(ArtNr) as Max from tbl_Artikel where LiefNr = mid(NText1.Value, 1, 5)")
LG bumbum
Ich möchte gerne Daten speichern, doch ich erhalte immer die oben genannte Fehlermeldung.
Unter F1 habe ich nichts hilfreiches gefunden und in den Foren ist auch nichts, was bei mir passt.
Weiß jemand Rat?
Hier die Zeile die beim Debuggen makiert ist:
Set rs = Application.CurrentDb.OpenRecordset("Select max(ArtNr) as Max from tbl_Artikel where LiefNr = mid(NText1.Value, 1, 5)")
LG bumbum
Auf Facebook teilen
Auf Twitter teilen
Auf Reddit teilen
Auf Linkedin teilenBitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 127893
Url: https://administrator.de/contentid/127893
Ausgedruckt am: 22.11.2024 um 18:11 Uhr
4 Kommentare
Neuester Kommentar
Hi,
dieser Fehler tritt normalerweise auf, wenn z. B. ein DS nicht zugeordnet werden kann.
Bsp.
Zu möchtest für die Personal Nr 20 etwas in einer Tabelle speichern, aber die Personalnummer 20 gibt es gar nicht.
dieser Fehler tritt normalerweise auf, wenn z. B. ein DS nicht zugeordnet werden kann.
Bsp.
Zu möchtest für die Personal Nr 20 etwas in einer Tabelle speichern, aber die Personalnummer 20 gibt es gar nicht.
Hey,
okay, jetzt ist die Nummer aber vorhanden! ich habe das gerade geprüft, was könnte dann die Ursache sein??
LG bumbum
okay, jetzt ist die Nummer aber vorhanden! ich habe das gerade geprüft, was könnte dann die Ursache sein??
LG bumbum
Hallo bumbum!
Probiers mal damit!
Datentyp Text:
Datentyp Zahl:
Gruß Dieter
Probiers mal damit!
Datentyp Text:
Set rs = Application.CurrentDb.OpenRecordset("Select max(ArtNr) as Max from tbl_Artikel where LiefNr = '" & Mid(NText1.Value, 1, 5) & "'") Set rs = Application.CurrentDb.OpenRecordset("Select max(ArtNr) as Max from tbl_Artikel where LiefNr = " & Mid(NText1.Value, 1, 5)) Gruß Dieter
Hallo didi,
danke für deinen Hilfe, es hat gut geklappt, es war Datentyp Text.
LG bumbum
danke für deinen Hilfe, es hat gut geklappt, es war Datentyp Text.
LG bumbum
