Bonjour

Je désire faire un update d'une string contenent un ' dans une table access et j'ai toujors un message d'erreur. J'ai essayé une string sans ' et ça fonctionne bien.

j'ai créé une classe de connection à la BD je vous soumet mon code et je vous invite à me donner vos suggestions merci

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Dim Str2 As String = "A'AAA"
                Dim SQL As String = "UPDATE TblNomCompagnie SET Description='" & Str2 & "' WHERE Id_Compagnie=" & InfoCompBd.Id & ";"
                Ad.ExecuterCommande(SQL)
et ma classe se lit comme suit:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Function ExecuterCommande(ByVal Sql As String) As Integer
        Try
            Me.OuvrirConnection()
            Dim cmd As New OleDbCommand()
            With cmd
                .Connection = Me._cn
                .CommandType = CommandType.Text
                .CommandText = Sql
                Return cmd.ExecuteNonQuery
            End With
 
        Catch ex As Exception
            Console.WriteLine(ex.Message)
            Throw New ApplicationException("")
        Finally
            Me.FermerConnection()
        End Try
    End Function
merci encore