Pffff, j'ai la tête en vrac. Je dois avoir les pattes palmées
C'est pas dans la date que ca coince, du moins pas pour l'instant.... Mais dans le transfert dans les champs adequats ...
Je m'en sort plus, je laisse la date en dehors
Code:As String = "SELECT USER, ObjektNr, HeftNr, Matchcode, MegalithNr, MegalithJobdesc, Produktteil, Split, Auflage, DavonBelege, VerpackungID, LieferID, ExVB, VBLage, VolleLagen, GewichtEx, AnzahlPal FROM T_Auftraege WHERE Matchcode='%1';" 'Bereitstellung --- ceci est ma date,
J'aimerai transferer tout le premier code, mis à part "AnzahlPal" dans ma deuxieme TableCode:
1
2
3
4
5
6 strPalUnique = Nz(.Fields("MegalithNr"), 0) & Format(Nz(.Fields("Produktteil"), 0), "00") & Format(P, "000") strSQLinsert = "INSERT INTO Temp_Paletten (USER, ObjektNr, HeftNr, Matchcode, MegalithNr, Auftrag, Produktteil, Split, Auflage, DavonBelege, VerpackungID, LieferID, ExVB, VBLage, VolleLagen, GewichtEx, PaletteNr, PaletteCode )" 'Bereitstellung, strSQLinsert = strSQLinsert & "VALUES(" & strValues & P & ") & (" & strPalUnique & ");" Debug.Print strValues & P & "," & strPalUnique
Avec "P" sur PaletteNr" et "strPalUnique sur PaletteCode" et là ca broute. Il y a pas moyen de dire à Access - toi va ici et toi ici ?