collapse

* Benutzer Info

 
 
Willkommen Gast. Bitte einloggen oder registrieren. Haben Sie Ihre Aktivierungs E-Mail übersehen?

* Wer ist Online

  • Punkt Gäste: 62
  • Punkt Versteckte: 0
  • Punkt Mitglieder: 0

Es sind keine Mitglieder online.

* Forenstatistik

  • stats Mitglieder insgesamt: 13808
  • stats Beiträge insgesamt: 64171
  • stats Themen insgesamt: 8679
  • stats Kategorien insgesamt: 5
  • stats Boards insgesamt: 16
  • stats Am meisten online: 415

Autor Thema: (ACC00) 1 Parameter erwartet, zuwenige übergeben  (Gelesen 2237 mal)

Offline bejay

  • Newbie
  • Beiträge: 19
(ACC00) 1 Parameter erwartet, zuwenige übergeben
« am: Juni 13, 2012, 07:44:37 »
Ich erhalte obenstehende Fehlermeldung und rätsel wo ich den Fehler gemacht habe:

Code: (vb) [Auswählen]
Public Sub Inventurbuchung()
Dim db As DAO.Database
Dim RN As Long 'Referenznummer
Dim RB As String 'Referenzbezeichnung
Dim AI As Long 'Adressschlüssel
Dim M As Integer 'Menge
Dim D As Long 'DID
Dim S As Long 'SizeKey
Dim Q As Long 'Qualität
Dim V As Long 'Verpackungseinheit
Dim C As Date 'Charge
Dim T As Date 'Datum
Dim SQLinsert As String

Set db = CurrentDb
RN = 0 'Inventurbuchung immer 0
RB = "Inventurbuchung"
AI = 0 'Inventurbuchung immer 0
M = Forms![Bestand1]![txtMenge]
D = Forms![Bestand1]![cmbDesign]
S = Forms![Bestand1]![cmbSize]
Q = Forms![Bestand1]![cmbQuality]
V = Forms![Bestand1]![cmbPack]
C = Forms![Bestand1]![txtCharge]
T = Now
SQLinsert = "INSERT INTO Warenbewegung (RefNr, RefBez, AdressID, Menge, DID, SizeKey, QUID, VEID, Charge, Datum)" & _
            "VALUES (" & RN & "," & RB & "," & AI & "," & M & "," & D & "," & S & "," & Q & "," & V & ",'" & C & "','" & T & "')"
db.Execute (SQLinsert), dbFailOnError

Die Formularfelder mit dem Prefix txt sind Textfelder, mit dem Prefix cmb sind Combos die ihren Inhalt aus Selects der entsprechenden Tabellen erhalten.


Gruß bejay
 

Offline database

  • Moderator
  • Access Guru
  • *****
  • Beiträge: 4178
Re: (ACC00) 1 Parameter erwartet, zuwenige übergeben
« Antwort #1 am: Juni 13, 2012, 08:22:37 »
Hallo,

Wenn zum Zeitpunkt des Zusammensetzens des SQL-Strings ALLE Variablen mit Daten befüllt sind (überprüfen!)
liegt es möglicherweise am Format des Datums das du an den SQL-String übergibst.

T = Str(CDbl(Now))

Versuche bei Fehler in dieser Variante auch mal hier die Hochkommata wegzulassen ( ... ,'" & T & "')"

siehe dazu auch http://www.donkarl.com?FAQ6.8
Viele Grüße
Peter

Tipps und Links:
---------------------------------------------------------
1. http://www.donkarl.com
2. http://www.access-entwicklerbuch.de/2007/index.php?page=buch
3. http://www.xlam.ch/pos/rules.htm
3.a Reservierte Worte
4. http://www.functionx.com/vbaccess/index.htm
5. http://www.dbwiki.net

Nicht vergessen: Jede(r) hat mal klein angefangen!
Bitte keine Fragen per PN senden - Fragen gehören ins Forum!
 

Offline DF6GL

  • Global Moderator
  • Access-Oberguru
  • *****
  • Beiträge: 23143
Re: (ACC00) 1 Parameter erwartet, zuwenige übergeben
« Antwort #2 am: Juni 13, 2012, 15:53:09 »
Hallo,

wenn  "Charge" (?!)  und "Datum" Datumsfelder ( und ohne Uhrzeit) sind, dann sollte das so lauten:

Dim M As LONG 'Menge
 
 
T = Date
SQLinsert = "INSERT INTO Warenbewegung (RefNr, RefBez, AdressID, Menge, DID, SizeKey, QUID, VEID, Charge, Datum)" &  _
            " VALUES (" & RN & ",     '" & RB & "'       ," & AI & "," & M & "," & D & "," & S & "," & Q & "," & V & "," & Format(C,"\#yyyy-mm-dd\#")  & "," & Format(T,"\#yyyy-mm-dd\#")   & ")"


und Hochkommata um "RB" herum beachten!

Offline database

  • Moderator
  • Access Guru
  • *****
  • Beiträge: 4178
Re: (ACC00) 1 Parameter erwartet, zuwenige übergeben
« Antwort #3 am: Juni 13, 2012, 19:20:17 »
Hallo,

....   Format(C,"\#yyyy\-mm\-dd\#")  & "," & Format(T,"\#yyyy\-mm\-dd\#")   & ")"

Hmmm.... funktioniert das ohne die Backslashes vor den Minus?
Viele Grüße
Peter

Tipps und Links:
---------------------------------------------------------
1. http://www.donkarl.com
2. http://www.access-entwicklerbuch.de/2007/index.php?page=buch
3. http://www.xlam.ch/pos/rules.htm
3.a Reservierte Worte
4. http://www.functionx.com/vbaccess/index.htm
5. http://www.dbwiki.net

Nicht vergessen: Jede(r) hat mal klein angefangen!
Bitte keine Fragen per PN senden - Fragen gehören ins Forum!