[vb.net] Mise a jour de plusieurs enregistrement du datagrid
cs_blueghost
Messages postés7Date d'inscriptionvendredi 4 juin 2004StatutMembreDernière intervention30 août 2005
-
30 août 2005 à 17:43
croati
Messages postés9Date d'inscriptiondimanche 24 septembre 2006StatutMembreDernière intervention15 juin 2010
-
30 sept. 2008 à 16:41
je veux mettre à jour les enregistrements pr lesquels la case valider (checkbox) a été coché e ncliquant sur le bouton update du template (header)
J'ai une erreur dans mon code que je n'arrive pas à résoudre.
voici le code de l'erreur :
L'index était hors limites. Il ne doit pas être négatif et doit être inférieur à la taille de la collection. Nom du paramètre : index
Description : Une exception non gérée s'est produite au moment de l'exécution de la demande Web actuelle. Contrôlez la trace de la pile pour plus d'informations sur l'erreur et son origine dans le code.
Détails de l'exception: System.ArgumentOutOfRangeException: L'index était hors limites. Il ne doit pas être négatif et doit être inférieur à la taille de la collection. Nom du paramètre : index
voici mon code :
Code:
,
----
case "updatecheck"
Dim oItem As DataGridItem
'Dim sKeys As New ArrayList
For Each oItem In datagrid1.Items
If CType(oItem.FindControl("valide"), CheckBox).Checked Then
Dim ID As Int32 = CType(datagrid1.DataKeys(oItem.ItemIndex), Int32)
dim valide as checkbox = CType(oitem.FindControl("valide"),checkbox)
'sKeys.Add((datagrid1.DataKeys(oItem.ItemIndex).ToString),(CType(oitem.FindControl("valide"),checkbox)))
Dim strUpdateStmt As String
strUpdateStmt =" UPDATE DETAIL_INVOICE SET" & _
" Cat =@Cat, Cut =@Cut, Color = @Color " & _
" WHERE ID = @ID"
Dim conn As OleDbConnection
Dim MyCommand As OleDbCommand
Dim strConn as string = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=D:\Inetpub\wwwroot\dailytec\TEST\invoices.mdb;"
conn = New OleDbConnection(strConn)
MyCommand = New OleDbCommand(strUpdateStmt, conn)
MyCommand.Parameters.Add(New OleDbParameter("@valide", valide))
MyCommand.Parameters.Add(New OleDbParameter("@ID", ID ))
conn.Open()
MyCommand.ExecuteNonQuery()
DataGrid1.EditItemIndex = -1
conn.close
BindData()
end if
next
end select
end sub
DATAGRID
Code:
,
----
<headertemplate> </headertemplate>
'>
A voir également:
[vb.net] Mise a jour de plusieurs enregistrement du datagrid