Problème d'aporstophe, avec la fonction replace

B'jour!

J'ai consulté différentes solutions pour pouvoir insérer des champs contenant des apostrophes dans une base de données excel. En gros j'ai bien compris qu'il faut utiliser la fonction "replace" mais à chaque fois l'exemple est donné pour un argument "précis". En gros ils donnent l'argument "l'école" alors que moi ça sera un argument... pioché dans mon formulaire puisque venant de mon programme VB.

Voici la partie de code qui me pose problème, avec la fonction replace certainement mal utilisée. Je cherche à convertir les apostrophes du champ "synopsis" en priorité. Pour les champs "Titre" et "emplacement" je m'en occuperai par la suite, par copier coller de la bonne méthode :D



   SQL = "Insert into dvd (nomFilm,anneeFilm,synopsis,emplacementFilm) values ('" & txtTitreFilm.Text & " ',' " & txtAnneeFilm.Text                 & "','" & txtSynopsisFilm.Text & "','" & txtEmplacementFilm.Text & "')"
        recFilm.Open SQL
        SQL = Replace(txtSynopsisFilm.Text, "'", """")



Merci à vous de me permettre de progresser  :)

David

Salut,

Déjà, tu n'utilse pas les bonnes fonctions.
Utilise plutot les fonction du framework

Et dans ce sens irrait beaucoup mieux:
SQL = "Insert into dvd (nomFilm,anneeFilm,synopsis,emplacementFilm) values ('" & txtTitreFilm.Text.Replace("'"c, """"c) & " ',' " & txtAnneeFilm.Text.Replace("'"c, """"c) & "','" & txtSynopsisFilm.Text.Replace("'"c, """"c) & "','" & txtEmplacementFilm.Text.Replace("'"c, """"c) & "')"

__________
 Kenji

Merci beaucoup pour ta réponse.

Cependant ça ne fonctionne pas ici. Lorsque je remplace ma ligne par la tienne il me met d'abord le premier "c" en surbrillance. Je ne sais vraiment pas à quoi sert ce "c"... En supprimant les "c" il me met une autre erreur en me surlignant le ".Text" dans     txtTitreFilm.Text.Replace("'"c, """"c) & " ' en me disant "qualificateur incorrect".

Merci de votre aide!

David

Précision: Lorsque je mets la ligne qui m'a été donnée l'erreur est la suivante : Erreur de compilation:
Attendu: Séparateur de liste ou )

et il me surligne le premier "c" juste après    ('" & txtTitreFilm.Text.Replace


Merci ;)

PS: Je ne trouve pas comment corriger le titre de mon post et supprimer la faute de frappe à "apostrophe"... SVP :D

C'est pas plutôt Replace(c, "'", "''") ??
Dans le premier "", il y a UNE apostrophe (quote), dans le second, il y a DEUX apostrophes (et pas des guillemets)

@++

---

En utilisant ta proposition mortalino, j'ai la même erreur que si je supprime les "c" (peux-tu m'expliquer à quoi correspond le "c" stp?). J'ai donc cette erreur là:

Il me surligne le ".Text" dans     txtTitreFilm.Text.Replace("'"c, """"c) & " ' en me disant "qualificateur incorrect".

merci de toi aide ;)

Ah je sais pas, j'ai vu c donc je pensais que c'était une variable.
Pas encore en DotNet à 100% donc peux pas vraiment t'aider, désolé.

Regarde Replace dans ton explorateur d'Objets (F2), tu devrais trouver la syntaxe (ou dans F1)

@++

---

Hum... je ne suis pas non plus en DotNet... si? lol Je ne sais même pas la différence entre VB, VBA, .net et tout ça. Je ne m'en préoccupe pas... je devrais?

Bon, pour le replace, j'ai trouvé ça "Function Replace(Expression As String, Find As String, Replace As String, [Start As Long = 1], [Count As Long = -1], [Compare As VbCompareMethod = vbBinaryCompare]) As String
"

Ca ne m'avance pas beaucoup personnellement parce que je ne sais pas ce qu'ils entendent par "expression"... Mais je viens de remarque que je peux changer "c" par n'importe quoi d'autre, l'erreur reste toujours la même, c'est le .Text qui est surligné.
En supprimant .Text, ça plante encore plus.

Merci de votre patience ;)

David

Le c indique que c'est un caractere.

txtTitreFilm est t-il bien une TextBox ?

__________
 Kenji