eliminacion con sql server

[mjesus20]

hola a todos tengo el siguiente codigo para eliminar pero no me lo realiza

mi datakeys = "item"
y yo necesito que me elimine por iddeinventario tal cual dice mi delete alguien me puede ayudar



Sub datagrid_delete(ByVal sender As Object, ByVal e As DataGridCommandEventArgs)
TextBox1.Text = isediting.ToString + CStr(DataGrid1.DataKeys(e.Item.ItemIndex))
If Not isediting Then
Dim iddeinventario As Integer = Val(CStr(DataGrid1.DataKeys(e.Item.ItemIndex)))
dbConnection = New System.Data.SqlClient.SqlConnection("server='192.1 68.100.254'; user id='SA'; password=''; database='Sistema Administrativo'")
dbCommand = New System.Data.SqlClient.SqlCommand("DELETE FROM [Inventario] WHERE [Inventario].[IDDeInventario] =" & iddeinventario, dbConnection)
TextBox1.Text = dbCommand.CommandText
dbConnection.Open()
dbCommand.ExecuteNonQuery()
dbConnection.Close()
DataGrid1.CurrentPageIndex = 0
DataGrid1.EditItemIndex = -1
bindgrid()
End If
End Sub

[Aki]

Reemplaza la siguiente línea:

dbCommand = New System.Data.SqlClient.SqlCommand("DELETE FROM [Inventario] WHERE [Inventario].[IDDeInventario] = @iddeinventario", dbConnection)

[mjesus20]

y con que la reemplazo

[Aki]

Fijate que parte tu línea dbCommand dice:

...
[IDDeInventario] =" & iddeinventario, dbConnection)

y la que te envié dice:

...
[IDDeInventario] = @iddeinventario", dbConnection)

[mjesus20]

me aparece lo siguiente

los limites de matriz no pueden aparecer en los especificadores de tipo

en la siguiente linea

Dim iddeinventario As Integer = Val(CStr(DataGrid1.DataKeys(e.Item.ItemIndex)))

[mjesus20]

ademas me aparece que el @ no es un caracter valido

[Aki]

El primer mensaje de error no lo conozco y tal vez en el segundo te faltó cerrar las comillas dobles (")

[mjesus20]

las tengo cerradas

[mjesus20]

por favor alguien me podria ayudar a solucionar el problema

[RootK]

Prueba de ésta forma:

Sub datagrid_delete(ByVal sender As Object, ByVal e As DataGridCommandEventArgs)
TextBox1.Text = isediting.ToString + CStr(DataGrid1.DataKeys(e.Item.ItemIndex))
If Not isediting Then
Dim iddeinventario As Integer =
CType(dg.DataKeys.Item(e.Item.ItemIndex), Integer)
dbConnection = New System.Data.SqlClient.SqlConnection("server='192.1 68.100.254'; user id='SA'; password=''; database='Sistema Administrativo'")
dbCommand = New System.Data.SqlClient.SqlCommand("DELETE FROM [Inventario] WHERE [Inventario].[IDDeInventario] =" & iddeinventario, dbConnection)
dbConnection.Open()
dbCommand.ExecuteNonQuery()
dbConnection.Close()
DataGrid1.CurrentPageIndex = 0
DataGrid1.EditItemIndex = -1
bindgrid()
End If
End Sub

Salu2

[mjesus20]

a que te refieres con ese dg

te refieres al datagrid si es asi la linea la puse de la siguiente manera

Dim iddeinventario As Integer = CType(DataGrid1.DataKeys.Item(e.Item.ItemIndex), Integer)()


pero me aparece lo siguiente la expresion no es una matriz o un metodo y no puede tener una lista de argumentos