Discussion :

[poypoy75]

Bonjour,

J'ai un gros problème avec les ' dans une textbox.
En effet, je demande aux utilisateurs de remplir des textbox, et j'aimerai récupérer les données saisies pour les enregistrer dans une base de donnée SQL, cela fonctionne très bien, mais quand je met ' quelque part c'est la catastrophe, ca ne marche plus.
Je sais bien que ce problème a déjà été posé sur ce forum, mais je ne trouve aucune réelles réponses car j'ai très peu de compétence dans ce language et les réponses me paraissent compliquées à mettre en oeuvre.


Voici le code qui s'occupe d'enregistrer les champs dans la base :

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
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
Sub butvalid_Click(sender As Object, e As EventArgs)
 
        Dim oConnection As System.Data.SqlClient.SqlConnection
 
 
        oConnection = New System.Data.SqlClient.SqlConnection
 
 
        oConnection.ConnectionString = "Server=(local); Initial Catalog='intervention';" _
            & " Trusted_Connection=True;"
 
 
        oConnection.Open()
 
 
        Dim oCommand As System.Data.SqlClient.SqlCommand
        Dim sSQL As String
 
 
 
        sSQL = "INSERT INTO [demande](site,service,date_dem,delai_dem,nature,objet,detail,observation,etat)" _
            & " VALUES('" & ddlsite.SelectedItem.Text & "','" & ddlservice.SelectedItem.Text & "','" & Labelcal.Text & "','" & tbdelai.Text & "','" & ddlplatef.SelectedItem.Text & "','"& taobjet.Text & "','" & tadetail.Text & "','" & taobservation.Text & "','" & labetat.Text & "')"
 
 
        oCommand = New System.Data.SqlClient.SqlCommand(sSQL,oConnection)
 
        oCommand.ExecuteNonQuery()
 
 
 
 
        oConnection.Close()
End Sub

Ca m'aiderai vraiment si vous pouviez me donner une solution.
Merci d'avance

[bifidus]

Dans ton SQL aprés toutes tes chaines tu mets Replace("'","''") :

Code :

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

Labelcal.Text.Replace("'","''")

etc...

[Sphax]

Salut,

Il me semble, je dis bien il me semble car je n'en suis plus trés sur (ça doit etre facile a vérifier, il suffit d'essayer ) qu'il faut simplement "échappé" les guillemets simples avant de les mettre en base, et pour ça il faut les doubler : remplacer tous les ' par ''. Un simple MonText.Replace("'", "''") devrait suffir (eu... je pense que tous ces guillemets c'est pas facile à lire, mais l'idée est là)

[poypoy75]

Merci beaucoup à vous, ca marche