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 : Sélectionner tout - Visualiser dans une fenêtre à part 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 Table
Code : Sélectionner tout - Visualiser dans une fenêtre à part
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 ?
Partager