OVH Cloud OVH Cloud

requête SQL

1 réponse
Avatar
José
Bonjour,
Je dois traiter une base qui contient des adresses avec des apostrophes et
tous mes malheurs semblent venir de là car tout fonctionne si l'adresse ne
comporte pas d'apostrophe.

Dim adoConnection As ADODB.Connection
Set adoConnection = New ADODB.Connection
ConnectString = "Provider=Microsoft.jet.oledb.4.0;Data
source=C:\SMT12.mdb;persist security info = false"
adoConnection.Open ConnectString
adoConnection.Execute ("UPDATE TClients set nom_voie='" & TextBox1.Text & "'
WHERE nom_voie='" & ComboBox1.Text & "'")

Lorsque je lance la requête avec une adresse qui contient une apostrophe
j'obtiens le message suivant :

Erreur de syntaxe (opérateur absent) dans l'expression 'nom_voie='de l'
etape"

Quelqu'un aurait-il une idée ?
D'avance merci
José

1 réponse

Avatar
Paul
tu doubles les apostrophes :

adoConnection.Execute ("UPDATE TClients set nom_voie='" &
replace(TextBox1.Tex,"'","''") & "'
WHERE nom_voie='" & replace(ComboBox1.Text ,"'","''")& "'")


"José" a écrit dans le message de news:
3fc33627$0$2777$
Bonjour,
Je dois traiter une base qui contient des adresses avec des apostrophes et
tous mes malheurs semblent venir de là car tout fonctionne si l'adresse ne
comporte pas d'apostrophe.

Dim adoConnection As ADODB.Connection
Set adoConnection = New ADODB.Connection
ConnectString = "Provider=Microsoft.jet.oledb.4.0;Data
source=C:SMT12.mdb;persist security info = false"
adoConnection.Open ConnectString
adoConnection.Execute ("UPDATE TClients set nom_voie='" & TextBox1.Text &
"'

WHERE nom_voie='" & ComboBox1.Text & "'")

Lorsque je lance la requête avec une adresse qui contient une apostrophe
j'obtiens le message suivant :

Erreur de syntaxe (opérateur absent) dans l'expression 'nom_voie='de l'
etape"

Quelqu'un aurait-il une idée ?
D'avance merci
José