Discussion :

[jvv 64]

Bonjour à tous,
J'utilise une connection ADO à une table Access et pour trouver un enregistrement j'utilise :

Code :

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

rsCLI.Find "[CliNom] = '" & CboCli & "'" & "", , , 1

Ca marche bien sauf que si il y a une apostrophe dans cbocli ca plante. j'ai vu en cherchant qu'il fallait remplacer les ' par des "" (2 guillemets) je me retouve avec:

Code :

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

rsCLI.Find "[CliNom]=" & """""" & CboCli & """""", , , 1

mais ca plante aussi. Si quelqu'un a la solution je suis preneur.
Merci d'avance.
VINCENT

[Le Pharaon]

Code :

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

1
2
CboCli = Replace(CboCli, "'","''")
rsCLI.Find "[CliNom] = '" & CboCli & "'" & "", , , 1

[La Praline]

Bonjour,

En recherchant "recordset.find" sur google, et en prenant le second lien ( http://mysql.ifrance.com/archive/index.php/t-758.html ) tu pourra lire qu'il faut remplacer

Code :

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

'

par

Code :

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

\'

...

Google est notre ami... L'envie de se creser la tête aussi...


~~ La Praline ~~
... un choco qui sait se servir de google...

[jvv 64]

Merci beaucoup à tous les deux, CboCli = Replace(CboCli, "'","''") marche nickel !!!