Update ou insert database et ' [Résolu]

Signaler
Messages postés
37
Date d'inscription
jeudi 4 avril 2002
Statut
Membre
Dernière intervention
18 octobre 2009
-
Messages postés
37
Date d'inscription
jeudi 4 avril 2002
Statut
Membre
Dernière intervention
18 octobre 2009
-
bonjour,
voila je met à jour une database via un module datagrid de telerik

grossomodo le datagrid va chercher les valeur de divers textbox d'un usercontrol.
tout marche nikel sauf quand je met de ' dans le texte exemple l'oeuf sa plante

voila mon code :
Dim editedItem As GridEditableItem = TryCast(e.Item, GridEditableItem)
Dim MyUserControl As UserControl = CType(e.Item.FindControl(GridEditFormItem.EditFormUserControlID), UserControl)
Dim ID As String = editedItem.OwnerTableView.DataKeyValues(editedItem.ItemIndex)("ID").ToString()
Dim Titre As String = CType(MyUserControl.FindControl("titre"), TextBox).Text

Try
SqlConnection.Open()

Dim updateQuery As String = "UPDATE Actuvdotnet set TitreNews='" & Titre & "' where ID='" & ID & "'"
SqlCommand.CommandText = updateQuery
SqlCommand.Connection = SqlConnection
SqlCommand.ExecuteNonQuery()


vous avez une idée merci d'avance.

2 réponses

Messages postés
37
Date d'inscription
jeudi 4 avril 2002
Statut
Membre
Dernière intervention
18 octobre 2009

j'ai trouvé désoler
fallais faire un
AssoPresident = AssoPresident.Replace("'", "''")
Messages postés
37
Date d'inscription
jeudi 4 avril 2002
Statut
Membre
Dernière intervention
18 octobre 2009

code plus visivble.
--------------------------------------------
Dim editedItem As GridEditableItem = TryCast(e.Item, GridEditableItem)

Dim MyUserControl As UserControl = CType(e.Item.FindControl(GridEditFormItem.EditFormUserControlID), UserControl)

Dim ID As String = editedItem.OwnerTableView.DataKeyValues(editedItem.ItemIndex)("ID").ToString()

Dim Titre As String = CType(MyUserControl.FindControl("titre"), TextBox).Text


Try

SqlConnection.Open()


Dim updateQuery As String = "UPDATE Actuvdotnet set TitreNews='" & Titre & "' where ID='" & ID & "'"

SqlCommand.CommandText = updateQuery

SqlCommand.Connection = SqlConnection

SqlCommand.ExecuteNonQuery()