Prob. Requete SQL et VB

Question

Salut,
j'ai un prob un peu con, j'execute une requete sql ds mon prob vb et elle est la suivante:STR_SQL "UPDATE CLIENT SET CLIENT.NOM_CLT '" & Trim$(Me.txtNom.Text) & "';"
CONN_BASE_DONNEES.Execute STR_SQL
mais elle marche tres tres tres bien SAUF qd mon Me.txtNom.text contien le caractère appostrophe "'" là elle deconne car il l'ajoute à la chaine et il le prends comme si c'est le début d'un parametre. 
y'a t-il une solution standard pour eviter ca?

Merci

Seedorf

Makabey · Answer

Si tu as VB6, utilise
Replace(Trim$(Me.txtNom.Text), "'", "''")
(Remplacer 1 apostrophe par 2)

Sinon vois mes sources, j'ai écrit une fonction pour VB5 et - (mais personne ne l'as testée :'(

cs_seedorf · Answer

Salut, 
ca marchera pas car ma requete donnera jamais de resultat sinon il donnera un faux resultat, j'ai besoin d'extraire les enregistrement ayant exactement la meme valeur du champ que mon txtNom.text

Y'a t-il autres idées?

seedorf

cs_pimousse75 · Answer

Public Function DoubleApostrophe(ze_texte As String) As String

    Dim n As Integer
    Dim buffer As String

    For n = 1 To Len(ze_texte)
        If Mid(ze_texte, n, 1) = "'" Then
            buffer = buffer & "''"
        Else
            buffer = buffer & Mid(ze_texte, n, 1)
        End If
    Next n

    DoubleApostrophe = buffer

End Function

cs_pimousse75 · Answer

Public Function DoubleApostrophe(ze_texte As String) As String

    Dim n As Integer
    Dim buffer As String

    For n = 1 To Len(ze_texte)
        If Mid(ze_texte, n, 1) = "'" Then
            buffer = buffer & "''"
        Else
            buffer = buffer & Mid(ze_texte, n, 1)
        End If
    Next n

    DoubleApostrophe = buffer

End Function

cs_seedorf · Answer

Salut, 
oui en effet ca marche et avec les deux methode, en fait les deux ils font la meme chose, mais j'avais pas bien remarqué pour la proposition de makabey alors je m'excuse. merci à makabey et a pimousse75.

Seedorf

Makabey · Answer

En fait tu dois comprendre que quand SQL vois deux apostrophes qui se suivent, ça veux dire que c'est pas la fin du paramètre mais que le paramètre lui-même contient un apostrophe, ex:

'l'avion'  boum, pcq recherche "l" {param inconnu}
'l''avion' ça marche pcq il vas rechercher "l'avion"

Prob. Requete SQL et VB

6 réponses

Discussions similaires