Discussion :

[fclus]

Bonjour,

Dans une instruction UPDATE, je veux concaténer 2 champs alphanumériques qui peuvent contenir des quotes ==> '
Du coup, mon instruction est erronée
Je passe donc par une instruction qui remplace le quote par un espace
Comment éviter cela
Merci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
StrSql = "UPDATE TblImport SET TblImport.imdesce = Replace([imdesce]," & Chr(34) & "'" & Chr(34) & "," & Chr(34) & " " & Chr(34) & ")"
 
StrSql = "INSERT INTO TblOffreDet ( odnumero, odnumligne, oditemnb, oditem, oddesc, odqte, odtype )" & _
" VALUES (" & "'" & [Forms]![FrmOffreEnt]![oenumero] & "', " & _
Ligne & ", " & _
Item & ", " & _
"'" & Rec!imcodeart & "', " & _
"'" & Rec!imdesce & " " & Rec!imtype & "', " & _
Rec!imqte & ", " & _
"'E')"

[zoom61]

Salut,

Au lieu de remplacer par un espace, il faut mettre deux fois la "quote".

@+.

[fclus]

Merci Vincent, je vais essayer ça